alle zeilen von spalte K ein "VV"steht löschen
12.12.2003 10:04:50
peter
wer kann mir beim Umbau dieses Makros helfen.
Sub allemitVV()
Dim intRow As Integer
intRow = 2
While Cells(intRow, 11).Value <> ""
If Cells(intRow, 11).Value = "VV0340" Then
Rows(intRow).Delete
Else
intRow = intRow + 1
End If
Wend
End Sub
Diese Zeile muss so geändert werden, dass alle Zeilen gelöscht werden wenn der Eintrag in Spalte K mit "VV" beginnt.
If Cells(intRow, 11).Value = "VV0340" Then
Gruss
Peter