Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
24.04.2024 17:19:09
Anzeige
Archiv - Navigation
136to140
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
136to140
136to140
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

VBA auf alle Sheets eines Workbooks anwenden

VBA auf alle Sheets eines Workbooks anwenden
23.07.2002 16:44:31
Konrad
Hallo zusammen,
es gibt doch irgendeine Möglichkeit, dass man auf alle Tabellen ein Makro anwendet. Irgendwas mit for each workbook in workbooks hab ich da noch im Kopf. Allerdings wird es dann nur auf dem aktiven Sheet benutzt und hört danach auf. Hab ich einen Fehler gemacht oder ist der Befehl doch anders???
Grüße
Konrad

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: VBA auf alle Sheets eines Workbooks anwenden
23.07.2002 17:01:20
Nepumuk
Hallo Konrad
du musst natürlich die Tabellen auch anwählen. Geht so:

Gruß
Nepumuk

Re: VBA auf alle Sheets eines Workbooks anwenden
23.07.2002 18:46:04
MAlexander
Moin Konrad,
Moin, Nepumuk

"Anwählen" ist absolut nicht notwendig.

Abgewandelt lautet der bei weitem schnellere Code:

Dim Arbeitsblatt As Worksheet
For Each Arbeitsblatt In Worksheets

with Arbeitsblatt

Hier kommt dein Code rein, immer mit einem . (= Punkt"); z.B.
.cells(Schießmichtot.row,Binschontot.column) = "Machwas"
Next Arbeitsblatt

Dadurch hat man auch das ganze Gezappel auf den Bildschirm nicht
mehr - und wenn man dann noch screenupdating und calculation einsetzt, dann geht alles ratzfatz.

MAlexander

Anzeige

307 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige