Archiv der Kategorie: Office

Aus dem Büro

Sheets erstellen

Publiziert am Juni 9, 2017 von www

Ein einfaches Makro um Tabellenblätter zu erstellen: – Die gewünschten Namen der Tabellenblätter im Excel in eine Liste schreiben, markieren und das Makro ausführen:

Sub ws_creator()

Dim rng As Range

For Each rng In Selection

    Sheets.Add After:=Sheets(Sheets.Count)
    Sheets(Sheets.Count).Name = rng

Next rng

End Sub

Sub ws_creator()

Dim rng As Range

For Each rng In Selection

Sheets.Add After:=Sheets(Sheets.Count)

Sheets(Sheets.Count).Name = rng

Next rng

End Sub

Veröffentlicht unter Excel, Excel VBA | Schreib einen Kommentar

Archiv der Kategorie: Office

Sheets erstellen

Kürzlich geschrieben

Kürzlich kommentiert