Zelle löschen
04.02.2003 09:27:31
Joerg
ich möchte über den Inhalt eines Textfeldes
eine Zelle Löschen und habe folgenden Code geschrieben:
Spalte = Trim(Str(Val(TextBox31.Text) + 1))
If TextBox10.Value = "" Then
GoTo Sprung:
End If
'Zeile Löschen
Worksheets("Drucker").Select
Cells(Spalte, Spalte).Row.Delete Shift:=xlUp
spalte soll die Zeile definieren die Gelöscht werden soll aber es
geht nicht wo ist hier der Fehler.
Gruß Jörg