Adresi belli olan hücreleri silmek

[Muhammet Okumuş]

Arkadaşlar merhaba,
F sütununda $A$2, $B$6 gibi adresler mevcut. F sütununda bulunan adreslere göre hücre nasıl silebilirim. Örneğin F sütununda ilk adres olan $A$2 hücresini nasıl silebilirm. A2 boş olacak, sonra B6 .... bu şekil döngüye almam gerekiyor.

 

[Necdet]

Merhaba,

Aşağıdaki kodları bir modüle kopyalayıp dener misiniz?

Sub HucreSil()
    
    Dim i As Long
    
    Application.ScreenUpdating = False
    
    For i = 2 To Cells(Rows.Count, "F").End(3).Row
        Range(Cells(i, "F").Text).ClearContents
    Next i
    
    Application.ScreenUpdating = True
    
    MsgBox "Hücreler Silinmiştir....", vbInformation, "N. YEŞERTENER"
    
End Sub

 

[Muhammet Okumuş]

Çok teşekkür ederim Sn Necdet Bey.