Zelleninhalte durch einen CommandButton löschen?
Ich möchte mit einem CommandButton einige Zelleninhalte auf anderen Tabellenblättern löschen. Mein Gedanke war so etwas:
Private Sub Reset_click()
Sheets("Tabellenblatt").Range("Zellenname").ClearContents
End Sub
Leider funktioniert das nicht.
Vielen Dank für Hilfe. Liebe Grüße
3 Antworten
Versuch es mal so:
Private Sub Reset_click()
Worksheets("Tabelle1").Range("A12:S20").ClearContents
End Sub
verreisterNutzer
26.10.2017, 11:27
@XxJojo12345
Gerde getestet und funktioniert bei mir:
Private Sub Reset_click()
Worksheets("Tabelle1").Range("rot").ClearContents
End Sub
Von gutefrage auf Grund seines Wissens auf einem Fachgebiet ausgezeichneter Nutzer
Microsoft Excel
Also bei mir klappt das tadellos.
.
Private Sub CommandButton1_Click()
Sheets("Tabelle1").Range("Löschzellen").ClearContents
End Sub
Setze mal einen Haltepunkt in die Zeile um zu schauen, ob sie überhaupt ausgeführt wird
Woher ich das weiß:Berufserfahrung – IT-Administrator (i.R.)
Zum Löschen des Zelleninhalts musst du auch andernen Code verwenden:
Worksheets("Tabelle2").Range("A1").Clear
Ich habe meinen Zellen aber Namen gegeben, weil sie sich möglicherweise noch verschieben.
Ich habe also anstatt A12:S20 meinen Zellennamen reingeschrieben, es passiert aber nix.