HERBERS Excel-Forum - das Archiv
Bewerten Sie hier bitte das Excel-Portal

Thema: Eintrag in allen Sheets | Herbers Excel-Forum

Eintrag in allen Sheets
highman4

Hallo Excelfreunde,
Ich möchte in einem Workbook mit 150 Sheets in allen Sheets Zelle K10 einen Eiintrag (nur ein Änderungsdatum) vornehmen.
Kann man das mit einen kleinen VBA Code automatisieren, damit ich nicht jedes Sheet einzeln öffnen muß?
Vielen Dank für Eure Hilfe
freundliche Grüsse
Marco

AW: Eintrag in allen Sheets
David

Hallo Marco,
so z. Bsp.:
Sub alle()
Dim ws As Worksheet
For Each ws In Worksheets
ws.Range("A1") = Date + 1
Next
End Sub
Gruß
David
AW: Eintrag in allen Sheets
highman4

Vielen Dank David,
ich hab es begriffen.
Viele Grüsse
Marco
warum denn vba
Matthias

Hallo
Alle Tabellen markieren und in K10 Deine Änderung eintragen - Fertig.
Gruß Matthias