Bladnummer van EXCEL blad bepalen

[ThecodeMaster]

Ik heb een routine waarin gebruik gemaakt wordt van een bladnaam.
Echter ik zou graag het bladnummer willen weten.
Hoe bepaal ik dat.

Hieronder het stukje code:
Set NieuwTab = Workbooks(strBestandNaam).Worksheets.Add
NieuwTab.Name = strNieuwTabBlad
' activeren nieuw tabblad
Workbooks(strBestandNaam).Worksheets(strNieuwTabBlad).Activate
strSheetName = Workbooks(strBestandNaam).Worksheets(strNieuwTabBlad).Name
Workbooks(strBestandNaam).Sheets(strSheetName).Select

Het gaat dan om de waarde van strSheetName.

Werner

 

[ThecodeMaster]

Bladnummer van EXCEL blad

Ik heb het al gevonden, na enig zoekwerk in de HELP.

intTeller = Sheets(strSheetName).Index

Werner