[Excel 2007] Nieuw werkblad tussenvoegen met macro

[TranceSetter]

Ik ben bezig een macro te schrijven waarbij het nodig is om een werkblad tussen bestaande werkbladen kan toevoegen. Het lukt mij echter alleen om hem aan het begin of einde toe te voegen.

Dit is wat ik heb:

code:

    'Delete Overview Sheet and add a new one.
    Application.DisplayAlerts = False
    Sheets("Overview").Select
    ActiveWindow.SelectedSheets.Delete
    Sheets.Add(After:=Worksheets(Worksheets.Count)).Name = "Overview"
    Application.DisplayAlerts = True

Deze sheet wordt nu achteraan toegevoegd, maar hij moet tussen de sheets "Macro" en "PivotTable" in worden gezet.

[Verwijderd]

in plaats van de worksheetscount vraag je de index van worksheet "macro" op : worksheets("Macro").index

[TranceSetter]

Tof, die werkt inderdaad. Bedankt voor de snelle reply