Re: Symbolleiste
16.11.2002 15:12:50
martin
hallo nepumuk,folgender laufzeitfehler erscheint beim schließen der arbeitmappe:
die methode 'visible' für das objekt 'commandbar' ist fehlgeschlagen.
was habe ich verkehrt gemacht?
Private Sub Workbook_Activate()
Application.CommandBars("Standard").Visible = False
Application.CommandBars("Format").Visible = False
Application.CommandBars("Auswertung").Visible = True
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.CommandBars("Standard").Visible = True
Application.CommandBars("Format").Visible = True
Application.CommandBars("Auswertung").Visible = False
End Sub
Private Sub Workbook_Deactivate()
Application.CommandBars("Standard").Visible = True
Application.CommandBars("Format").Visible = True
Application.CommandBars("Auswertung").Visible = False
End Sub
Private Sub Workbook_Open()
Application.CommandBars("Standard").Visible = False
Application.CommandBars("Format").Visible = False
Application.CommandBars("Auswertung").Visible = True
End Sub
gruß
martin