Worksheet-Variable mit Codename füllen
26.03.2020 11:33:20
Sebastian
würd gerne eine Worksheetvariable mit dem Codenamen füllen. Geht das?
Hier der herkömmliche Weg, welcher funktioniert:
Sub Normal()
Dim wbkWorbook As Workbook
Dim wksWorksheet As Worksheet
Set wbkWorbook = ThisWorkbook
Set wksWorksheet = wbkWorbook.Worksheets("Tabelle1")
MsgBox wksWorksheet.Name
End Sub
Sub MitCodename()
Dim wbkWorbook As Workbook
Dim wksWorksheet As Worksheet
Set wbkWorbook = ThisWorkbook
Set wksWorksheet = wbkWorbook.Worksheets("tbl_CodenameTabelle1")
MsgBox wksWorksheet.Name
End Sub
LG Sebastian