wie kann ich per VBA erreichen, daß nach Öffnen einer Arbeitsmappe die rechte Maustaste deaktiviert ist und das man keinen Zugriff auf die Taskleiste hat bzw. diese nicht sichtbar ist?
Ich bedanke mich schon im Voraus.
Tschüß Micha
also die nachfolgenden Makros wären zum Aus- bzw. Einblenden der Menüleiste:
Sub Einblenden()
For Each bar In Application.CommandBars
bar.Enabled = True
Next
With ActiveWindow
.DisplayHeadings = True
.DisplayHorizontalScrollBar = True
.DisplayVerticalScrollBar = True
.DisplayWorkbookTabs = True
End With
With Application
.DisplayFormulaBar = True
.DisplayStatusBar = True
End With
End Sub
Sub Ausblenden()
For Each bar In Application.CommandBars
bar.Enabled = False
Next
With ActiveWindow
.DisplayHeadings = False
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
.DisplayWorkbookTabs = False
End With
With Application
.DisplayFormulaBar = False
.DisplayStatusBar = False
End With
End Sub
Wie das mit dem deaktivieren der rechten Maustaste geht, oder ob das überhaupt möglich ist, muß Dir jemand anderes beantworten, da ich das nicht weiß.
MfG,
Oliver
Sub Einblenden() bzw. Sub Ausblenden() in Private Sub Workbook_Open() für das Öffnen bzw. Private Sub Workbook_BeforeClose(Cancel As Boolean) für das Schließen in dem Makro ab und kopiere beides in "Diese Arbeitsmappe". Danach wird die Menüleiste beim Öffnen automatisch ausgeblendet und beim Schließen wieder eingeblendet.
Das Einblenden beim Schließen muß sein, da die Menüleisten sonst dauerhaft, auch bei anderen Arbeitsmappen, ausgeblendet bleiben würden.
So, dann viel Spaß,
Oliver