Gruppe
Funktion
Problem
Ich habe für jeden Mitarbeiter eine Zeittabelle und für jeden Monat eine Zeittabelle angelegt. Wie kann ich von den Mitarbeiterblättern auf die Monatsdaten zugreifen?
StandardModule: Modul1
Sub Anlegen()
Dim i%
For i = 1 To 31
Worksheets.Add after:=Worksheets(Worksheets.Count)
ActiveSheet.Name = i
Next i
End Sub
Sub Schutz()
Dim i%
For i = 1 To 5
Worksheets(i).Unprotect
Next i
End Sub