Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: 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
Anzeige

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

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige