İki Hücreyi Kontrol Ederek UserForm Çalıştırmak

[htsumer]

Sub auto_open() olayında Sayfa1'deki A1 ve A2 Hücrelerini kontrol edecek,
eğer her iki hücre eşit ise UserForm1 çalışsın, eşit değilse UserForm2 çalışması için Makro koduna ihtiyacım var.

Teşekkürler

 

[Huseyinkis]

Ekteki kodları denermisiniz.


Sub Autpen()
If Sheets("Sayfa1").Cells(1, 1).Value = Sheets("Sayfa1").Cells(2, 1).Value Then
UserForm1.Show
Else
UserForm2.Show
End If
End Sub

 

[htsumer]

Çok teşekkür ederim..Tamamdır...