Hi Liebe VBA-Freunde,
ich versuche mich gerade in VBA und würde gerne eine Zeile mit einzelnen Zell-Inhalten löschen.Ich habe immer eine unterschiedliche Anzahl an Zeilen, also muss dieses Problem dynamisch gelöst werden.
Man könnte so anfangen: Die Position der 1.Zeile kann ich angeben.Aber danach fällt es mir schwer die Zeilen mit Inhalten zu löschen.Ich habe auch schon ein Makro ZeileLöschen geschrieben,welches lautet:
Sub ZeileLöschen(ByVal z, ByVal Anz As Integer, ByVal SheetName As String)
Dim i As Integer
For i = 1 To Anz Step 1
Worksheets(SheetName).Rows(z).Delete Shift:=xlDown
Next i
End Sub
Bitte helfen!!!
|