Registriert seit: 05.09.2018
Version(en): 2013
Hallo zusammen.
Ich habe eine Tabelle. Da möchte ich mit einem Button mehrere Bereiche leeren. Als Makro habe ich das im Netz gefunden:
Code:
Sub Leeren()
' Leeren Makro
Range("C3:E9").Select
Selection.ClearContents
End Sub
Das klappt wunderbar. Allerdings habe ich in der Tabelle ca. 50 Bereiche, die nicht miteinander verbunden sind. Muss ich für jeden Bereich also fünfzig Mal
Code:
Range("Bereich").Select
Selection.ClearContents
in das Makro packen oder geht das eleganter?
Danke im voraus,
Suwo
Registriert seit: 12.10.2014
Version(en): 365 Insider (32 Bit)
Moin!
Zeichne mal per Rekorder auf, wie eine Mehrfachmarkierung (bei gedrückter Strg-Taste) aussieht.
Allerdings gehe ich davon aus, dass Du falsch an die Sache herangehst.
Dazu brauche ich aber mehr Infos.
Gruß Ralf
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag.
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
Registriert seit: 10.04.2014
Version(en): Microsoft 365, mtl. Kanal
Hi,
meinst du so? Schreibe deine infrage kommenden Bereiche wie im Beispiel in Klammern.
Code:
Option Explicit
Sub Leeren()
' Leeren Makro
Range("A1:B10,C3:E9,G6:I8").ClearContents
End Sub
Gruß Günter
Jeder Fehler erscheint unglaublich dumm, wenn andere ihn begehen.
angebl. von Georg Christoph Lichtenberg (1742-1799)
Registriert seit: 05.09.2018
Version(en): 2013
Moin.
Ich glaube Günters Lösung ist schon super. Mehr Infos kann ich aber erst nächste Woche geben, bin im Urlaub.
Gruß,
Suwo
Registriert seit: 12.10.2014
Version(en): 365 Insider (32 Bit)
03.10.2018, 08:22
(Dieser Beitrag wurde zuletzt bearbeitet: 03.10.2018, 08:22 von RPP63.)
Moin!
Na dann: Weiterhin schönen Urlaub!
(Ich war vorgestern noch im Mittelmeer schwimmen und durfte gestern einen Temperatursturz von 20° und Nieselregen "genießen")
Dennoch oder auch trotzdem:
Wenn es eine Art Vorlage ist, die Du erst leerst und nach Ausfüllen unter neuem Namen speicherst, gibt es eine sinnvollere Variante ohne VBA:
Speichere die geleerte Datei als Vorlage .xltx und öffne sie mittels Datei, Neu
Gruß Ralf
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag.
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
Registriert seit: 05.09.2018
Version(en): 2013
Hallo.
Ja, an eine Vorlage hatte ich auch schon gedacht. Aber ich stelle die Datei nur zur Verfügung. Und obwohl ich bei weitem kein PC Profi bin, gibt es immer noch einige, die sich schwerer tun mit der Dateiverwaltung (speichern unter, etc...) als ich :19: . Daher wollte ich die Sache mit dem Zellen leeren verwirklichen. Trotzdem danke für den Hinweis.
MfG,
Suwo
Registriert seit: 12.10.2014
Version(en): 365 Insider (32 Bit)
Eine Vorlage, die mittels Datei, Neu geöffnet wird, kann man im Ggs. zu Deiner Lösung eben nicht versehentlich überschreiben.
Es öffnet sich grundsätzlich der Speichern-Unter-Dialog!
Der Rest besteht dann aus einer ca. eine Minute langen Schulung.
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag.
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
Registriert seit: 05.09.2018
Version(en): 2013
Hallo RPP63.
Ich stimme Dir vollkommen zu. Man soll es nicht glauben, ich habe aber schon Leute am PC gesehen, die waren irritiert, weil in einem Excel Kalender die Woche mit Sonntag statt mit Montag anfing, oder das Wochenende statt mit grün und blau, mit gelb und rot formatiert war. Zugegeben zeigt das vermutlich nur den Unwillen sich mit Änderungen auseinander zu setzen, als wirkliche Unfähigkeit. Anstrengend ist das aber trotzdem.
MfG,
Suwo
