Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
372to376
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
372to376
372to376
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

makro automatisieren

makro automatisieren
29.01.2004 15:33:03
rudi pauli
hello
ich muss mehrere hundert excel-sheets umformatieren (schriftart, schriftgrösse, ausrichtung linksbündig sowie automatische zellhöhe/spaltenbreite).
in einem einzelnen dokument kann ich auf einfachste weise ein makro aufzeichnen/ausführen. kann ich dieses makro mit einem befehl auf alle meine excel-sheets anwenden?
herzlichen dank für eine antwort
gruss
rudi

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

Betreff
Datum
Anwender
Anzeige
AW: makro automatisieren
29.01.2004 15:51:25
Tobias
Hallo rudi

'---------------------------------

Sub FormattAll()
Dim intSheetCounter As Integer
Dim intCounter As Integer
intSheetCounter = Sheets.Count 'Zählen aller worksheets
For intCounter = 1 To intSheetCounter
Sheets(intCounter).Select
Call MeinFormattierungsMakro
Next intCounter
End Sub



Sub MeinFormattierungsMakro()
'Das ist eine Beispielsformattierung
Range("A1:C6").Select
With Selection.Interior
.ColorIndex = 6
.Pattern = xlSolid
End With
Range("B3").Select
Selection.Interior.ColorIndex = 3
End Sub

'-----------------------------------
Gruss Tobias
Anzeige
AW: makro automatisieren
29.01.2004 16:26:06
rudi pauli
thanx very much!
greets
rudi

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige