ich habe die zwei Makros:
Private Sub Workbook_Open()
Dim raZelle As Range, raBereich As Range
With Worksheets("Kalender")
Set raBereich = .Range("C12:C999")
.Unprotect "dragon"
For Each raZelle In raBereich
If raZelle.Value
Private Sub Workbook_Open()
Dim raZelle As Range, raBereich As Range
With Worksheets("Kalender")
Set raBereich = .Range("G13:G999")
.Unprotect "dragon"
For Each raZelle In raBereich
If raZelle.Value
Jedes Makro funktioniert für sich auf dem Arbeitsblatt "Kalender".
Nun möchte ich jedoch dass beide Makros zusammen auf dem Arbeitsblatt "Kalender" laufen.
Was muss geändert werden, dass es ein Makro ist?
Sonnigen Gruß
Frank