DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
buyurun kodunuz.merhaba,
ben seçilmiş tüm alanı 1 kerede silebileceğim bir yol sordum.
activasheet.selection.clear
Sub Boşluk_Sil()
On Error Resume Next
Selection.SpecialCells(xlCellTypeBlanks).EntireRow.Delete
End Sub