Zoombereich
15.06.2006 20:00:34
Kurt
habe jetzt 3 std mit recherchen verbracht ohne Erfolg. Ich hoffe es kann mir hier jemand helfen.
Ich habe diesen Code gefunden:
Sub Ansicht()
[A1:G1].Select
ActiveWindow.Zoom = True
[A1].Select
End Sub
Dieser funktioniert nur mit einer Schaltfläche, ich möchte aber, dass dieser Bereich A1:G1 immer beim öffnen automatisch eingestellt ist.
Könnte mir da jemand weiter helfen?
Danke an alle, die sich meiner annehmen.
LG Kurt