Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
01/05/2019 15:57
Konu Sahibi
haziran4
Yorumlar
8
Okunma
374
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
haziran4

haziran4

Aktif Üye
6706
 44
 55
 188
 15/05/2009
0
 Eskişehir
 
 Ofis 2007
 01/07/2019,11:46
Çözüldü 
iyi çalışmalar;

Calisiyor_Ayrildi Alanı Ayrılmış ise Aktif_Pasif Alanı Ayrılmış Yazsın.
Personel_Ozel_Durumu Alanı boş ise (açılır Seçilmemiş ise) ve Vize_Bitis_Trh Alanı Tarih geçmiş ise Aktif_Pasif Alanı Pasif Yazsın.
Değilse Aktif_Pasif Alanı Aktif Yazsın formülü Formda Form_Current 'e nasıl yazabiilirim.



haziran4, 15-05-2009 tarihinden beri AccessTr.neT üyesidir.

berduş

berduş

Uzman
65596
ha....
 29
 1.401
 30/07/2014
218
 -
 
 Ofis 2019 64 Bit
önceki sorunuzdan bağımsız mı yani bir önceki konunuzda istediğiniz koşullardan bağımsız ise aşağıdaki kodu deneyebilirsiniz?

Visual Basic Code
1
2
3
4
5
6
7
8
If isnull(Calisiyor_Ayrildi) or Calisiyor_Ayrildi="" Then
    Me.Aktif_Pasif = "Ayrılmış"
    Exit Sub
elseif Vize_Bitis_Trh Alanı Tarih<date     then 
    Me.Aktif_Pasif = "Pasif
    Exit Sub
else Personel_Ozel_Durumu Alanı<>"" then Me.Aktif_Pasif = "Aktif"
End If



...........
haziran4

haziran4

Aktif Üye
6706
 44
 55
 188
 15/05/2009
0
 Eskişehir
 
 Ofis 2007
 01/07/2019,11:46
Üstad ilginiz için Teşekkür ederim.

aşagıda ki resimde çizerek anlattmaya çalıştım.

[Resim: do.php?imgf=6cfe529a3f281.jpg]


haziran4, 15-05-2009 tarihinden beri AccessTr.neT üyesidir.

berduş

berduş

Uzman
65596
ha....
 29
 1.401
 30/07/2014
218
 -
 
 Ofis 2019 64 Bit
aşağıdaki şekilde dener misiniz?

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Form_Current()

If Calisiyor_Ayrıldı = "Ayrılmış" Then
    Me.Aktif_Pasif = "Ayrılmış"
    Exit Sub
ElseIf Vize_Bitis_Trh < Date Then
    Me.Aktif_Pasif = "Pasif"
    Exit Sub
ElseIf Personel_Ozel_Durumu <> "" Then Me.Aktif_Pasif = "Aktif"
End If

End Sub




...........
haziran4

haziran4

Aktif Üye
6706
 44
 55
 188
 15/05/2009
0
 Eskişehir
 
 Ofis 2007
 01/07/2019,11:46
Tarihi geçmiş olarak seçtim ve Personel özel durumunuda boş değilde seçim yaptım pasif yazdı personel ozel durumu seçildiğinde çalışıyor da seçili ise aktif olacaktı


haziran4, 15-05-2009 tarihinden beri AccessTr.neT üyesidir.

berduş

berduş

Uzman
65596
ha....
 29
 1.401
 30/07/2014
218
 -
 
 Ofis 2019 64 Bit
Private Sub Form_Current()
If Calisiyor_Ayrıldı = "Ayrılmış" Then
    Me.Aktif_Pasif = "Ayrılmış"
    Exit Sub
ElseIf Personel_Ozel_Durumu = "Dolu" Then Me.Aktif_Pasif = "Aktif"
ElseIf Vize_Bitis_Trh < Date Then     Me.Aktif_Pasif = "Pasif"
End If
End Sub



...........

Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Formda Metin Kutularında Veri Görünmemesi U.ALTUN 12 212 03/08/2019, 16:59
Son Yorum: berduş
Çözüldü Formda Metin Kutusu İçerik Kontrolü hbal09 4 193 10/07/2019, 16:20
Son Yorum: berduş
Çözüldü Formda Açılır Kurularda 3101 Hatası Veriyor haziran4 11 358 24/05/2019, 16:22
Son Yorum: haziran4
Çözüldü Formda Liste Kutusu Çift Tıklama Boş Gelme Sorunu haziran4 1 260 10/05/2019, 11:36
Son Yorum: ozanakkaya
Çözüldü Sorguda Koşullu Formül Kullanma haziran4 9 506 07/05/2019, 16:46
Son Yorum: haziran4

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2019 MyBB Group.