Anzeige
Archiv - Navigation
160to164
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
160to164
160to164
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

für alle sheets

für alle sheets
18.09.2002 18:02:27
ingo
Hallo,
wie sage ich, daß ich alle sheets dieser datei mit dem gleichen zoom versehen will?
(ActiveWindow ersetzen durch? ?)

danke für jeden tip,
ingo

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

Betreff
Datum
Anwender
Anzeige
Re: für alle sheets
18.09.2002 19:55:29
Herbert
so:
Sub Zoom()
Dim i As Integer
For i = 1 To 64
Sheets(i).Activate
    ActiveWindow.Zoom = 100
Next i
End Sub
  
gruß Herbert


Re: für alle sheets
19.09.2002 09:46:22
ingo
Danke Herbert,
eigentlich logisch mit der for-schleife.
makro schaut jetzt so aus und taugt...

gruß,
ingo
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige