Yillik_Vize_Bitis_Trh Alanı Tarih Geçmiş ise Aktif_Pasif Alanı Pasif Yazsın Değil ise Aktif_Pasif Alanı Aktif Yazsın buraya kadar oluyor. Vize_Bitis_Trh Alanı Boş ises de Aktif_Pasif Alanı Kapalı Yazsın nasıl yapabilirim

If Me.Yillik_Vize_Bitis_Trh < Date Then

Me.Aktif_Pasif = "Pasif"
 
Else
Me.Aktif_Pasif = "Aktif" (Kalın Yeler Oluyor)

Else

If Me.Yillik_Vize_Bitis_Trh ="" Then
Me.Aktif_Pasif = "Kapalı"

End If
End İf

If Me.Yillik_Vize_Bitis_Trh < Date Then Me.Aktif_Pasif = "Pasif"

If Me.Yillik_Vize_Bitis_Trh >= Date Then Me.Aktif_Pasif = "Aktif"

If Not IsDate(Me.Yillik_Vize_Bitis_Trh) Then Me.Aktif_Pasif = "Kapalı"

(27/04/2019, 18:51)haliliyas yazdı:

If Me.Yillik_Vize_Bitis_Trh < Date Then Me.Aktif_Pasif = "Pasif"

If Me.Yillik_Vize_Bitis_Trh >= Date Then Me.Aktif_Pasif = "Aktif"

If Not IsDate(Me.Yillik_Vize_Bitis_Trh) Then Me.Aktif_Pasif = "Kapalı"

Teşekkür Ederim anlık oluyor kaydedip tekrar açtığımda olmuyor.

Merhaba,

If Me.Yillik_Vize_Bitis_Trh < Date Then

    Me.Aktif_Pasif = "Pasif"

ElseIf Me.Yillik_Vize_Bitis_Trh >= Date Then

    Me.Aktif_Pasif = "Aktif"

ElseIf Not IsDate(Me.Yillik_Vize_Bitis_Trh) Then

    Me.Aktif_Pasif = "Kapalı"

End If

şeklinde deneyin. Çalışmaz ise örnek uygulamanızı ekleyin.

aktif_pasif alanını tablo ile ilişkilendirdiniz mi?
bazen dikkatten kaçıyor ilişkilendirilmemiş oluyor, kontrol eder misiniz ilişkilendirilmiş mi?

Ben yanlış yere yamışım oldu teşekkür ederim.