code für scrollen
08.03.2004 11:32:02
Rico
Ich habe ein Makro aufgezeichnet welche ich als "Navigation" brauche. Nun sollte ich aber dieselben buttons in den verschiedenen Bereichen reinkopieren können und als Ziel will ich natürlich, dass dann die gewünschte Stelle auf dem Bildschirm erscheint. Mit dem unten aufgeführten Code klappt das ja nur wenn ich als Ausgangs-Position die Zelle A5 markiert habe (ToRight:=7).
Wie kann ich das machen, dass ich unabhängig von der grad markierten Zelle zu der gewünschten Stelle komme?
Sub gehe_zu_Kalk2()
Range("H5").Select
ActiveWindow.SmallScroll ToRight:=7
End Sub
Ich hoffe, ich habe die Frage einigermassen verständlich beschreiben können und danke Euch für Eure Tips im Voraus.
Gruss Rico
Anzeige