Skip to main content

AccessTr.neT


Formda Formül Kullanma

Formda Formül Kullanma

Çözüldü #1
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.
Cevapla
#2
önceki sorunuzdan bağımsız mı yani bir önceki konunuzda istediğiniz koşullardan bağımsız ise aşağıdaki kodu deneyebilirsiniz?
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
Cevapla
#3
Ü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.
Cevapla
#4
aşağıdaki şekilde dener misiniz?
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
Cevapla
#5
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.
Cevapla
#6
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
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task