hallo forum wie kann man sowas realisieren: wenn tab1 spalte2, beginnend ab b2 leer, also "" oder " " (inhalt 4 leerzeichen), dann zeile löschen. abfrage bis b100. dank im vorraus gruss mehmet
Sub LoeschenWennLeer() 'Löscht die Zeilen 2 bis 100, wenn Spalte "B" 'leer, oder wenn mehr als ein Leerzeichen 'hintereinander vorhanden Dim intC AsInteger Application.ScreenUpdating = False For intC = 100 To 2 Step -1 If Cells(intC, 2) = "" Or InStr(1, Cells(intC, 2), " ") > 0 Then _ Rows(intC).Delete Next Application.ScreenUpdating = True EndSub
Gruß Sepp
Anzeige
AW: wenn zelle "" oder " " dann löschen
mehmet
klappt underbar dank dir sepp weisst du, warum ich vom ersten beitrag keinen feedback bekomme? gruss mehmet