Blatt aus Vorlage erstellen

Viele Dateien, gerade im beruflichem Umfeld, müssen regelmäßig aktualisiert und meist von verschiedenen Anwendern enutzt werden. In solchen Fällen macht es Sinn, die regelmäßig wiederkehrenden Abläufe in Makros zu packen. So lösen sie gleich zwei Probleme. Zum Einen kann selbst ein Anwender der die Datei nicht kennt mit ihr arbeiten indem er einfach das Makro startet, zum Anderen können Sie sich sicher sein, dass sie jederzeit ein gleichbleibendes Ergebnis erzielen.

Dazu erstellen Sie ein Vorlagenblatt, welches ausgeblendet wird. Starten Sie dann das Makro über einen Button, können Sie diese Vorlage einblenden lassen, kopieren, umbenennen und die Vorlage wieder ausblenden. Der Anwender reproduziert auf diesem Weg ein (z.B. monatlich) gleichblendes Tabellenblatt.

In diesem Zusammenhang ist es auch wichtig die Tabellenblätter eindeutg zu referenzieren. Wie sie den Namen eines Blattes auslesen, erfahren Sie hier.

Sub BlattAusVorlage()

' vorher erstelltes Vorlagenblatt einblenden
    Sheets("Vorlage").Visible = True
' Vorlagenblatt kopieren
    Sheets("Vorlage").Copy After:=Sheets(1)
' neues Blatt benennen
    Sheets(2).Name = "Neu"
' Vorlagenblatt wieder ausblenden
    Sheets("Vorlage").Visible = False
   
End Sub