Makroda 2. bir çalışma sayfası

[giraysener]

merhaba arkadaşlar aşağıdaki makro kodunu nasıl düzeltebilirim kod 2 farklı sayfadaki hücreleri kontrol edicek

If Sheets ("Sayfa1")
Range("C5") =
Sheets ("Sayfa2")
Range("D5") Then
MsgBox ("öğretim görevlisinin dersi mevcut")
Else
MsgBox ("SORUN YOK")
End If

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki şekilde denermisiniz.

If Sheets("Sayfa1").Range("C5") = Sheets("Sayfa2").Range("D5") Then
MsgBox ("Öğretim görevlisinin dersi mevcut !")
Else
MsgBox ("Sorun yok.")
End If

 

[giraysener]

Çok teşekkür ederim işe yaradı makrom çalıştı peki bu yöntemle 3 safyaı kontrol etme şansım varmı

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki şekilde kullanabilirsiniz.

If Sheets("Sayfa1").Range("A1") = Sheets("Sayfa2").Range("A1") [COLOR=red]And[/COLOR] _
Sheets("Sayfa1").Range("A1") = Sheets("Sayfa3").Range("A1") Then
MsgBox "Hücrelerdeki değerler aynı !"
End If

Ya da döngü ile kontrol edebilirsiniz.