CodeName von neu angelegten Worksheets
10.10.2003 03:29:32
Heinrich Schewe
folgender Code bringt mir den Codenamen, wenn das VBE-Fenster geöffnet ist. Wenn nicht, kommt ein leerer String. Woran liegt das, bzw. wie komme ich an den Codenamen? (Excel 97, VBA Extensibility 5.3 aktiviert)
Sub test()
Dim cn As String
Dim wks As Worksheet
Set wks = ThisWorkbook.Worksheets.Add
cn = wks.CodeName
MsgBox "Codename = " & cn
End Sub
Ich hoffe es kann mir jemand weiterhelfen...
Gruß,
Heinrich