DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Sub dene()
For [COLOR="Red"]i = 1 To 100[/COLOR]
If Cells(i, [COLOR="Blue"]2[/COLOR]) = "" Then
Cells(i, [COLOR="blue"]1[/COLOR]) = ""
End If
Next i
End Sub
Teşekkürler dellerlim, makro bilmiyorum, makrosuz bir yolu var mı acaba?:???:
Veri den filtee uygulayın. ilgili kolondaki filtreden sadece boş olanları seçin.
Çıkan listeden soldaki hücrelerin hepsini seçip del ile silin