Ich möchte meine Excel Datei umbenennen, sa das bei öffnen diese Datei oben am
Menüleiste statt z.B Microsoft Excel-Mappe1, Name Meine Datei erscheint,,,("evtl" mit VBA)
Besten Dank
stef
Private Sub Class_Initialize()
Set xlApp = Application
End Sub
Private Sub xlApp_WorkbookActivate(ByVal Wb As Workbook)
Application.Caption = Wb.FullName
End Sub
Private Sub Workbook_Open()
Application.Caption = "Die Mappe von stef"
ActiveWindow.Caption = ""
End Sub
Sub Workbook_Open()" und "End Sub
" in die schon vorhandene Routine.