vbext_ws_Maximize
Peter
Früher lief bei mir dieser Code (Aufteilung Excel VBA auf Bildschirm)
Wenn ich es nun aufrufe, wird reklamiert, dass "vbext_ws_Maximize" nicht als Variable deklariert ist.
Ich weiss aber gar nicht, wie das zu deklarieren wäre? Oder muss sonst wo irgendwas aktiviert werden?
Wer weiss mehr?
Danke, Peter
Sub VBE_einblenden_unten()
Dim H&, W&
Application.VBE.MainWindow.Visible = True
With Application.VBE.MainWindow
.WindowState = vbext_ws_Maximize
H = .Height
W = .Width
.WindowState = vbext_ws_Normal
.Width = W
.Left = 0
.Top = H / 2
.Height = H / 2
End With
End Sub
Anzeige