Bildschirm fixieren
02.08.2013 12:16:31
Sonja
ich habe vor bei meinem Programm die Fenster so zu fixieren oder anzupassen, dass der Benutzer nicht unendlich scollen soll, sondern wirklich nur das auf dem Bildschirm angezeigt wird, wo etwas drin steht oder interessant für ihn ist. Mit meinem Code funktioniert das leider nicht. Habe auch mit dem Recorder versucht, aber irgendwie klappt das nicht. Den Code habe ich bei "dieseArbeitsmappe"untergebracht.
Sub Makro1()
' Makro1 Makro
' Bildschirmgröße automatisch
Range("A1:N23").Select
ActiveWorkbook.CustomViews.Add ViewName:="Ganzer Bildschirm", PrintSettings _
:=True, RowColSettings:=True
ActiveWindow.DisplayGridlines = False
ActiveWindow.Zoom = True
End Sub
Liebe Sommergrüße
Sonja