Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 13:18:36
Übersicht von Excel Konstanten
16.10.2025 11:48:44
Makro von Excel in Word aufrufen
16.10.2025 11:16:26
SUMMEWENN erweitern
16.10.2025 09:40:53
Mehrere Konferenzen ohne Personenüberschneidung terminieren
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1068to1072
1068to1072
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA Code

Forumthread: VBA Code

VBA Code
14.04.2009 13:51:29
Hugo
Guten Tag,
ich würde dringend einen VBA Code benötigen welchen ich bei einer Schaltfläche einfügen kann.
Ich möchte dann per klick das alle Einträge in den Zellen A11:AA45 der ganzen Arbeitsmappe gelöscht werden.
Bin für jede Hilfe Dankbar und wünsche nachträglich frohe Ostern.
LG Hugo
Anzeige

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Makrorekorder
14.04.2009 13:59:46
Steffen
Hallo Hugo,
nimm Dir doch mal den Makrorekorder....., das hilft bei einfachen Dingen ungemein.
viele Grüße
Steffen
AW: Makrorekorder
14.04.2009 14:03:32
Hugo
Hi,
Danke für Deine Antwort. Ja ist mir klar, aber wie soll ich dem Makrorekorder sagen, dass er die ganze Arbeitsmappe löschen soll?
Und die Anzahl der Arbeitsblätter varriert auch ständig :(.
LG Hugo
Anzeige
Range("A11:AA45").Delete
14.04.2009 14:05:09
steffen
so etwa?
AW: Range("A11:AA45").Delete
14.04.2009 14:07:33
Hugo
Hi,
geht leider auch nur auf einem Blatt und nicht in der ganzen Mappe:(
Gruss Hugo
AW: Range("A11:AA45").Delete
14.04.2009 14:09:11
Hugo
Sorry, hab den Haken vergessen.
Anzeige
AW: Makrorekorder
14.04.2009 14:14:34
{mskro}
Hallo Hugo

Sub Löschen()
For Schleife = 1 To Sheets.Count
Sheets(Schleife).Range("A11:AA45").ClearContents
Next Schleife
End Sub


Gruß Manfred

AW: VBA Code
14.04.2009 14:09:35
ede
Hallo
hier mal am Beispiel einer Schleife über alle Blätter.
For i = 1 To Sheets.Count
Sheets(i).Select
Range("A11:AA45").Select
Selection.ClearContents
Next i
Gruss
Anzeige
Jetzt hab ichs kapiert :)
14.04.2009 14:11:42
steffen
Dim Blatt
For Each Blatt In ActiveWorkbook.Worksheets
Blatt.Range("A11:A45").Delete
Next
Viel Spaß
Danke Ede
14.04.2009 14:17:50
Hugo
Hi,
dank an alle für die Hilfen. Besonderer Dank an Ede, es funktioniert so.
Schönen Tag allen.
mfg Hugo
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige