Sub leeren()
Application.ScreenUpdating = False 'Bildschirmaktualisierung aus sonst Flippereffekt
Sheets(1).Select 'Tabelle 1 wählen
Range("a5:a10,b12:b14").Select 'hier die Löschbereiche eintragen
Selection.ClearContents
Application.ScreenUpdating = True 'Bildschirmaktualisierung ein
Range("A1").Select
End Sub
Sub leeren()
Sheets(1).Range("a5:a10,b12:b14").ClearContents
End Sub
Sub leeren()
Sheets(1).Range("A5:A10,B12:B14").ClearContents
End SubFehler: Der Button funktioniert nicht.
Fehler: Zellen werden nicht geleert.
Falls du keine Schaltfläche verwenden möchtest, kannst du auch eine Tastenkombination nutzen:
Somit kannst du die Zellen auch ohne Button leeren.
Wenn du spezifische Zellen in einer Tabelle leeren möchtest, kannst du den Code leicht anpassen:
Sub leeren()
Sheets(1).Range("B2:B5,D3:D7").ClearContents
End SubHierbei werden die Zellen B2 bis B5 und D3 bis D7 geleert. Du kannst die Zellreferenzen je nach Bedarf ändern.
Application.ScreenUpdating-Feature, um das Flackern des Bildschirms zu vermeiden, während das Makro läuft:Sub leeren()
Application.ScreenUpdating = False
Sheets(1).Range("A5:A10,B12:B14").ClearContents
Application.ScreenUpdating = True
End Sub1. Kann ich mehrere Zellenbereiche auf einmal leeren?
Ja, du kannst mehrere Bereiche im Range-Befehl angeben, z.B. Range("A1:A10, B1:B10").
2. Wie entferne ich eine Schaltfläche aus meinem Excel-Dokument?
Klicke mit der rechten Maustaste auf die Schaltfläche und wähle „Schaltfläche löschen“, um die Excel-Schaltfläche zu entfernen.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen