textboxlardaki tarihler farklı olursa makro çalışşın

[aydın3838]

selamlar

sorum şu text1 de bu günün tarihi var
text2 ye ise text1 den farklı bir tarih girilirse msgbox çalıştırıbilirmi

saygılar

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)

If TextBox1.Text = Date < ("TextBox2.Text = Date") Then
MsgBox "farklı bir tarih girilmiş"
Exit Sub
End If
End Sub

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki kod ile uyarı mesajı alabilirsiniz.

Private Sub TextBox2_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    If TextBox1 <> TextBox2 Then MsgBox "Farklı bir tarih girilmiş !", vbExclamation
End Sub

 

[aydın3838]

tesşekkürler
<> hiç aklıma gelmemişti sağolun