Anzeige
Archiv - Navigation
1148to1152
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
Inhaltsverzeichnis

Makro für viele Tabellenblätter anwenden

Makro für viele Tabellenblätter anwenden
mat
Hallo liebes Forum,
ich habe eine Arbeitsmappe mit 40 Tabellenblättern.
Über das Makro Sub format() formatiere ich jedes Tabellenblatt einzeln. Wie kann ich das Makro über alle Tabellenblätter automatisch laufen lassen (Ausnahme Sheet Data)
Viele Grüße
Mat

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Makro für viele Tabellenblätter anwenden
24.03.2010 22:23:59
JOWE
Hallo Mat,
so sollte es klappen:
Sub ftSheets()
Dim sh As Object
For Each sh In ActiveWorkbook.Worksheets
If sh.Name  "Data" Then
'hier Deine Formatierungen für das jeweilige Sheet (sh.)
'zum Beispiel:
sh.Range("A1:C1").Interior.ColorIndex = 3
End If
Next
End Sub
Gruß
Jochen
Anzeige

268 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige