Satır Silme

[udentr2002]

Merhaba arkadaşlar.

H stünunda boş bir hücre gördüğünde o boş hücrenin olduğu satırı silen bir makro nasıl yapılabilir?

 

[İhsan Tank]

Merhaba arkadaşlar.

H stünunda boş bir hücre gördüğünde o boş hücrenin olduğu satırı silen bir makro nasıl yapılabilir?

merhaba

Private Sub CommandButton1_Click()
Dim hucre As Range
For Each hucre In Range("[COLOR="Red"]h1:h65[/COLOR]")
If hucre = Empty Then
hucre.Rows.Select
Selection.Delete Shift:=xlUp
End If
Next hucre

bu kodu dener misiniz
kırmızı bölümü ayarlayınız
ekli dosyayı inceleyiniz
kod alıntıdır.

 

[Seyit Tiken]

Sub Düğme1_Tıklat()
[H:H].SpecialCells(4).EntireRow.Delete
End Sub

 

[udentr2002]

Seyit hocam ellerinize sağlık teşekkür ederim. Kodu kullandım

Not : Çılgın 86 emeğine sağlık fakat kodlar çalışırken bir mantık hatası var sanırım. çünkü diğer bilgiler karışıyor