Bildposition per VBA immer mittig ?
21.12.2005 06:50:53
Max
Dazu hab ich für die Zielzellen Namen definiert, damit auch beim Einfügen oder Löschen von Spalten und Zeilen der Link stets zur richtigen Zelle verweist.
Nun mein Anliegen:
Beim Springen in eine Zielzelle möchte ich dass der Bildbereich so hoch scrolt, das die Zielzelle immer ganz oben im Bild zu sehen ist.
Per Hand klapt es (nach dem Springen zur Zielzelle) mit "Strg+CursorDown" und dann wieder "Strg+CursorUp" die Zielzelle ganz oben zu positionieren, da die Zielzelle immer den Anfang einer neuen Tabelle bildet.
bloss als VBA klappt das so nicht, das Bild wird immer horizontal mittig zur aktiven Zelle positioniert. So sah mein Makro aus:
Sub Sprung()
Range("Zielzelle1").Select
Selection.End(xlDown).Select
Selection.End(xlUp).Select
End Sub
Der "ActiveWindow.SmallScroll Down:=XX" Befehl könnte sicher helfen, jedoch muss Excel dann immer im Vollbild und bei gleicher Auflösung betrieben werden damit das Ergebniss stimmt...
Frage:
Gibt es einen Befehl der die aktivie Zelle per VBA nach ganz oben scrollt?