234 Aufrufe
Gefragt in Tabellenkalkulation von b25812 Mitglied (509 Punkte)
Hallo,
ich habe eine Tabelle1 und möchte Via VBA und einem CommandButton in der
Tabelle2 die Inhalte von Spalte A löschen außer die Zelle A1.
Kann mir dort einer helfen?

Gruß Thomas

2 Antworten

0 Punkte
Beantwortet von m-o Profi (19.3k Punkte)
Hallo Thomas,

versuch es mal so:

Private Sub CommandButton1_Click()
Dim lngLetzte As Long

With ThisWorkbook.Worksheets("Tabelle2")
lngLetzte = .Cells(.Rows.Count, 1).End(xlUp).Row
.Range(.Cells(2, 1), .Cells(lngLetzte, 1)).ClearContents
End With

End Sub

Den Namen der Tabelle2 musst du natürlich auf deine Verhältnisse anpassen.

Gruß

M.O.
0 Punkte
Beantwortet von b25812 Mitglied (509 Punkte)
Hallo M.O.

danke für die schnelle Antwort, geht Super !!!

Gruß Thomas
...