Office: Macro für "Cursor auf A1 beim verlassen der Tabelle"

Liebe VBA-Exel Experts, wer kann mir helfen?

Es geht darum dass sich der cursor automatisch auf Zelle A1 setzten soll, sobald ich aus der Tabelle raus gehe in eine andere Tabelle.
Dies soll bei allen Tabellen im workbook der Fall sein.

Wie kann man den Befehl setzten?

Grüsse A_Flipper

:)

 

Hallo
So?
Code:

gruss hary

 

Hallo Hary,
vielen Dank für deinen Code, aber für meine Zwecke geht das nicht weil :
Der Sinn der ganzen Sache ist nämlich dass ich in der Ersten Tabelle"Übersicht" mehrere Hyperlinks in die nachstehenden Tabellen habe.
Dass heisst wenn ich über den Hyperlink an irgend eine Stelle einer anderen Tabelle gehe. Un diese Tabelle dann verlasse, sollte der Cursor wieder auf A1 springen. Mit deinem Code komme ich erst garnicht auf die gewünschten Stellen über den Hyperlink.

Vielleicht etwas mit BeforeClose Befehl? Bekomms leider nicht hin.

Gruss

 

Ich hänge mal ein Bsp an, vielleicht versteht jemand was ich meine.

Danke im Voraus*Smilie

Grüsse

 

Hallo

Auf welches Blatt ZelleA1, soll generell beim verlassen eines Blattes auf Blatt Übersicht ZelleA1 gesprungen werden?
gruss hary

 

Hallo A_Flipper,

beim Deaktiieren eines Blattes kann man die Auswahl nicht mehr ändern, da bereits ein anderes Blatt aktiv ist. Zudem "beißen" sich Deine Hyperlinks mit den anderen Ereignisprozeduren.

Wozu ist das Auswählen der Zelle A1 eigentlich notwendig?
Wenn es nur um "Optik" geht, kann man es auch beim Aktivieren tun:
Modul "DieseArbeitsmappe"
Code:

Das Ereignis "SheetActivate" tritt ein und setzt den Cursor immer auf A1; sollte das Ereignis wegen Nutzung eines Hyperlinks eintreten, wird das entsprechende Ereignis nachfolgend ausgeführt.

Grüße
EarlFred

 

Hallo Zusammen,

erst mal Danke dass Ihr euch Gedanken macht dieses Problem zu lösen.
Die Datei ist nur ein Bsp. Bei der richtige Datei sind die einzelnen Tabellen ewig lang mit den entsprechenden Hyperlinks aus der "übersicht"-Tabelle kommt man dann auf eine Grafik oder auf Versuchswerte. Wenn ich jetzt über einen Hyp.link auf eine Stelle Bsp Zeile A168 der 5. Tabelle gehe und von dort über einen Hyp.link auf die 7.Tabelle und von der 7. Tabelle wieder auf die "Übersicht"-Tabelle um von dort wieder auf die 5.Tabelle einer ganz anderen Stelle dann verschiebt sich das Bild da es die Zielzelle entweder am unteren Rand vom Bildschirm anzeigt oder am oberen Rand v.Bildschirm.(sieht garnicht prof.aus).
Falls aber jede Tabelle automatisch auf A1 springen würde bevor diese sich schliesst dann würde jeder Hyp.link präzise sitzen.
Über BeforeOpen A1 setzten geht eben nicht da man sich die Werte oder Grafik in der Mitte oder Ende der Tabelle Zelle bsp.F300 über den Hyp.link garnicht ansehen kann sondern sofort A1 gezeigt wird.

Vielleicht konnte ich genügend Infos geben.
Danke im Voraus an alle Profis
LG

 

Hallo LG,

Deine Beschreibung ist schwer zu verstehen.

Kurze Rückfrage also: Hast Du meinen Tip ausprobiert? Hat er geholfen oder nicht? Wenn nein: Warum nicht (genaue Beschreibung des Problems)?

Grüße
EarlFred

 

Hallo
Hoffe du meinst es so!? ;-)
Code:

Dann ist die Zelle die du mit Hyperlink ansprichst immer oben links.
gruss hary

 

Hallo EarlFred und Hary,

Danke nochmal dass ihr helft. Hatte am Wochenende mit den Kids zu tun also daher keine Zeit fürs Internet.
Ich habe das von EarlFred ausprobiert, ging leider nicht, aber die Lösung von Hary geht sehr gutund ich werde es anwenden .

Von daher danke ich ich allen die sich bemüht haben mir zu helfen.*Smilie
Grüsse und guten Start in die neue Woche.