ich möchte gern die Spalte K ab Zeile 5
prüfen, wenn eine 0 drin steht soll raus, alle anderen Werte drin lassen.
mfg walter mb
Sub sb0Del()
Dim liZeile As Integer
For liZeile = 5 to Cells(Rows.Count, 11).End(xlUp).Row
If Range("K" & liZeile).Value=0 Then
Range("K" & liZeile).Value = ""
End If
Next
End Sub
Dieses Makro muss ausgeführt werden, wenn das Tabellenblatt mit der entsprechenden K-Spalte das aktive Blatt ist.Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen