VBA auf alle Sheets eines Workbooks anwenden

Forumthread: VBA auf alle Sheets eines Workbooks anwenden

23.07.2002 18: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

Re: VBA auf alle Sheets eines Workbooks anwenden

23.07.2002 19:01:20

Nepumuk
Re: VBA auf alle Sheets eines Workbooks anwenden

23.07.2002 20:46:04

MAlexander

Re: VBA auf alle Sheets eines Workbooks anwenden

23.07.2002 19: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 20: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

VBA auf alle Sheets eines Workbooks anwenden

Forumthread: VBA auf alle Sheets eines Workbooks anwenden

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

Forumthreads zu verwandten Themen

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread