Makro Satırının Türkçe Açıklaması.

[Bora K]

Merhabalar
Tam olarak ne diyoruz burada?

ElseIf .Cells(m, 8) <> "" And _
r.Offset(0, 4).Value = .Cells(m, 8) Then

 

[uzmanamele]

Merhabalar
Tam olarak ne diyoruz burada?

ElseIf .Cells(m, 8) <> "" And _
r.Offset(0, 4).Value = .Cells(m, 8) Then

Vba sayfasında, Locals bölümü aktifleştirip F8 ile satır satır kodu çalıştırırsanız ne yaptığını daha iyi anlayabilirsiniz.

m: değişken;
m. satır 8. sütunda veri varsa ve m. satır 4. sütundaki değere eşitse devam eder...

 

[Bora K]

Teşekkür ederim Süleyman bey.
F8 le ilerlerken bazı yerleri direkt atlıyor. (O kısma hiç uğramıyor sürekli aynı yerde dönüp dolaşıyor)
Uğramadığı yeri nasıl kontol edebiliriz acaba?

 

[ExcelF1]

Kodun tamamını görmeden bu konuda bir şey söylemek zor olur. Bir şart yapısı kullanıyorsanız bu mümkündür. If - End If gibi...