Sprungziel per VBA

[lion7123]

Servus,
Such grad schon ne weile nach einer Antwort aber ich denke mal das ich meine Frage falsch Formulier für Google weil nix passendes dabei rauskommt.

Ich habe vor einiger zeit diese Formel bekommen:

Code:

=HYPERLINK("#'[Mappe6.xlsb]tabelle2'!D"&VERGLEICH([Mappe6.xlsb]Tabelle2!D5;[Mappe6.xlsb]Tabelle2!D:D;0);[Mappe6.xlsb]Tabelle2!D5)

Mit ihr springe ich immer in die Angegebene Zelle eines Tabellenblattes. Auch wenn sich die Zelle des Ziels einmal verschoben hat weil eine Zeile hinzugefügt wurde.

Jetzt bräuchte ich das ganze als VBA Code. :)
Einmal zum Springen auf dem aktiven Tabellenblatt und einmal auf ein anderes.

Hoffe Ihr könnt mir dabei helfen.
Vielen Dank schonmal.

Gruß
Stefan

[Flotter Feger]

Hallo,

schließe den Hyperlink doch einfach in EVALUATE() ein, dann brauchst du nicht weiter nachzudenken.

[lion7123]

öhm .... wie meinst du das genau 

Private Sub Button_Jan2_Click()

(HYPERLINK("#'Ausgaben'!A"&VERGLEICH(Ausgaben!A586;Ausgaben!A:A;0);"Januar"))
(=HYPERLINK("#'Ausgaben'!A"&VERGLEICH(Ausgaben!A586;Ausgaben!A:A;0);"Januar"))
EVALUATE(HYPERLINK("#'Ausgaben'!A"&VERGLEICH(Ausgaben!A586;Ausgaben!A:A;0);"Januar"))

EVALUATE(=HYPERLINK("#'Ausgaben'!A"&VERGLEICH(Ausgaben!A586;Ausgaben!A:A;0);"Januar"))

End Sub

die Varianten gehn leider nich ... kann das evtl an Excel liegen weil ich 2003 hab