 |
Excel: Alle BlΣtter einer Arbeitsmappe formatieren
Will man einer kompletten Arbeitsmappe durchgehend ⁿber alle TabellenblΣtter dieselbe Formatierung zuweisen, markiert man am besten vor der VerΣnderung alle BlΣtter der Arbeitsmappe. Dafⁿr mⁿssen Sie das erste Tabellenblatt komplett durch einen Klick auf die graue SchaltflΣche zwischen der Spalten- und Zeilenbeschriftung markieren und die [Shift]-Taste gedrⁿckt halten, wΣhrend Sie auf das letzte Tabellenblatt klicken. Um einzelne BlΣtter aus dieser Gruppe zu entfernen, betΣtigen Sie [Strg], wΣhrend Sie auf die Registerzunge dieser Tabelle klicken. Es ist jedoch praktischer, Formatierungen, welche die gesamte Arbeitsmappe betreffen, in einem Makro zusammenzufassen. Damit das Makro Arbeitsmappen jeder Gr÷▀e bearbeiten kann, mu▀ es erst ermitteln, wie viele TabellenblΣtter die Mappe enthΣlt, und diese dann komplett in die Gruppe aufnehmen. Das unten aufgefⁿhrte Makro markiert alle TabellenblΣtter einer Arbeitsmappe und formatiert sie komplett in der Schriftart Arial, 14░. Makro-Listing zum Formatieren aller BlΣtter einer Mappe: Sub Alle_auswΣhlen() ReDim Matrixvariable(1 To Sheets.Count) For Each Blattname In Sheets BlattzΣhler = BlattzΣhler + 1 Matrixvariable(BlattzΣhler) = Blattname.Name Next For y = 1 To BlattzΣhler Next Sheets(Matrixvariable()).Select With Selection.Font .Name = "Arial" .Size = 14 End With End Sub
|
 |