workbook.open

• workbook.open von miranda vom 20.11.2003 15:09:50
  • AW: workbook.open - von Nayus am 20.11.2003 15:20:43
  • AW: workbook.open - von Mischa Richter am 20.11.2003 15:23:45
  • AW: workbook.open - von GerdW am 20.11.2003 16:30:45

Betrifft: workbook.open
von: miranda
Geschrieben am: 20.11.2003 15:09:50
Hallo Leute

Ich will folgendes machen. Wenn ich eine Datei öffne, will ich automatisch ein Makro starten, dass verschieden Leisten ausschaltet. Ich habe folgendes Makro dazu:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.CommandBars("Worksheet Menu Bar").Enabled = False
ActiveWindow.DisplayWorkbookTabs = False
Application.CommandBars("Standard").Visible = False
Application.CommandBars("Formatting").Visible = False
Application.DisplayFormulaBar = False
ActiveWindow.DisplayHeadings = False
End Sub

Private Sub Workbook_Open()
Application.CommandBars("Worksheet Menu Bar").Enabled = True
ActiveWindow.DisplayWorkbookTabs = True
Application.CommandBars("Standard").Visible = True
Application.CommandBars("Formatting").Visible = True
Application.DisplayFormulaBar = True
ActiveWindow.DisplayHeadings = True
End Sub

Wo muss ich aber dieses Makro hinschreiben? Wenn ich den Code der Tabell aufrufe, wird eine Prozedur Worksheet verlangt. Kann mich jemand weiterhelfen, wäre echt dankbar! Danke!

Betrifft: AW: workbook.open
von: Nayus
Geschrieben am: 20.11.2003 15:20:43
Hallo

VBA Editor - Microsoft Excel Objects - ThisWorkbook doppelklicken und den Code hineinkopieren.

Gruß,
Nayus

Betrifft: AW: workbook.open
von: Mischa Richter
Geschrieben am: 20.11.2003 15:23:45
der code muss auf das Modulblatt: DieseArbeitsmappe
nicht auf das Modulblatt Tabelle1!
und dann

Private Sub Workbook_Open()
End Sub

Betrifft: AW: workbook.open
von: GerdW
Geschrieben am: 20.11.2003 16:30:45
Dein Code ist wohl vertauscht, was in open steht muss nach
beforeClose und umgekehrt.

Gerd