Mokro ile ctrl+h(değiştir) kullanınca veri yoksa uyarı vermesin

[osman1309]

merhaba

makro ile ctrl+h(değiştir) yapınca değişcek veri yoksa uyarı veriyor uyarı vermesini istemiyorum.....değişecek eşleşen veri bulamıyor...... diye uyarı


say2 = WorksheetFunction.CountA([bo4:bo18]) + 3
For i = 4 To say2

Range("B:B").Replace What:=Sayfa1.Cells(i, 67), Replacement:=Sayfa1.Cells(i, 68), LookAt:=xlPart, MatchCase:=True
Range("D").Replace What:=Sayfa1.Cells(i, 67), Replacement:=Sayfa1.Cells(i, 68), LookAt:=xlPart, MatchCase:=True

Next i

 

[osman1309]

çözümü buldum.....aramanın sonuna diğer seçenekleri de ekleyince gelmiyor..

LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=True, SearchFormat:=False, ReplaceFormat:=False