ich habe ein Anwendung entwickelt, wo beim Start die Symbolleisten usw. ausgeblendet werden. Dies habe ich mit folgenden Code gemacht:
'Symbolleisten ausblenden
Private Sub Workbook_Open()
Dim cb As CommandBar
For Each cb In Application.CommandBars
cb.Enabled = False
Next cb
With ActiveWindow
.DisplayHeadings = False
.DisplayHorizontalScrollBar = True
.DisplayVerticalScrollBar = False
.DisplayWorkbookTabs = False
End With
With Application
.DisplayStatusBar = False
.DisplayFormulaBar = False
End With
Wenn ich jetzt durch drücken auf einen bestimmten Button eine andere Mappe öffne, dann sehe ich auf einmal die Zeilen und Spaltenleiste z.B. AA AB AC usw.
In der Mappe gehe ich mit folgendem Code auf eine bestimmte Zelle:
'Userform einblenden und ausführen lassen
'Tabelle wird nicht angezeigt
Private Sub Worksheet_Activate()
ActiveCell.Offset(45, 85).Select
LB_ambulant.Show
End Sub
Wie kann ich verhindern, dass die Zeilen- und Spaltenleiste angezeigt wird?
Danke im Voraus
Benjamin