Boş Hücreleri Silme isimli içerikte, bir veri aralığındaki boş hücrelerin tümden temizlenerek aralarda boş alan bırakılmaması örneklendirilmiştir.
Eğer bir hücre boşsa, aşağıdaki makro onu kontrol edersek silme işlemini gerçekleştirmektedir.
Makro meraklılarına ya da bu tür bir ihtiyacı olanlara faydalı olması temennisiyle.
Eğer bir hücre boşsa, aşağıdaki makro onu kontrol edersek silme işlemini gerçekleştirmektedir.
Kod:
Sub Bos_Hucreleri_Silme()
For i = Range("B" & Rows.Count).End(xlUp).Row To 1 Step -1
If Cells(i, 2) = "" Then
Rows(i & ":" & i).Delete Shift:=xlUp
End If
Next
Rows("1:1").Insert
End Sub
