Gruppen
- Top Gruppen
- Betriebsysteme
- Windows classik
- Linux
- BS-Sonstige
- Software
- Datenbanken
- Bildbearbeitung
- Audio/mp3/Video
- Security/Viren
- SW-Sonstige
- Hardware
- Mainboard/CPU
- Grafikkarten
- Peripherie
- Laptop/Notebook
- HW-Sonstiges
- Netzwerk
- Telefon,ISDN,Modem
- W-Lan
- NW-Sonstiges
- Programmierung
- PHP,ASP,Perl...
- Java,C++...
- Webseiten/HTML
- Sonstiges
- PC-Sonstiges
- Plauderecke
- SN Intern
- Test
/ Forum / Tabellenkalkulation
Tabellenkalkulation
Fragevon Patri_ck vom 03.02.2022, 11:29 Options
Blätter zentrieren beim Sprung auf Textmarke
Hallo liebe NG!
Ich habe in EXCEL eine Registrierkarte mit großen Tabellen und über mehrere Blätter (nach unten).
Ich möchte in den Tabellen per Hyperlink springen.
Das funktioniert natürlich auch, nur springt EXCEL immer bis zur angegebenen Textmarke. Als Bsp. A100.
Nun meine Frage:
Ist es möglich, dass diese Marke (A100) immer am oberen Rand der Bildschirmseite dargestellt wird?
Vielen Dank!
Gruß
Patrick
Ich habe in EXCEL eine Registrierkarte mit großen Tabellen und über mehrere Blätter (nach unten).
Ich möchte in den Tabellen per Hyperlink springen.
Das funktioniert natürlich auch, nur springt EXCEL immer bis zur angegebenen Textmarke. Als Bsp. A100.
Nun meine Frage:
Ist es möglich, dass diese Marke (A100) immer am oberen Rand der Bildschirmseite dargestellt wird?
Vielen Dank!
Gruß
Patrick
Antwort 1 von Hajo_Zi vom 03.02.2022, 11:47 Options
Hallo Patrick,
übergebe die Zelladresse
Application.Goto Reference:="R14C6", scroll:=True
Gruß Hajo
übergebe die Zelladresse
Application.Goto Reference:="R14C6", scroll:=True
Gruß Hajo
Antwort 2 von Patri_ck vom 03.02.2022, 15:33 Options
Danke!
Ich bin auf dem Gebiet VBA ganz neu.
Habe das Verfolgen des Hyperlinks als Makro aufgezeichnet und in die Sub das Application.Goto eingefügt.
Funktioniert aber leider nicht.
Über weitere Hilfe würde ich mich sehr freuen!!!
Viele Grüße
Patrick
Ich bin auf dem Gebiet VBA ganz neu.
Habe das Verfolgen des Hyperlinks als Makro aufgezeichnet und in die Sub das Application.Goto eingefügt.
Funktioniert aber leider nicht.
Über weitere Hilfe würde ich mich sehr freuen!!!
Viele Grüße
Patrick
Antwort 3 von Hajo_Zi vom 03.02.2022, 15:51 OptionsLösung
Halo Patrick,
unter dieseArbeitsmappe.
Gruß Hajo
unter dieseArbeitsmappe.
Option Explicit
Private Sub Workbook_SheetFollowHyperlink(ByVal Sh As Object, ByVal Target As Hyperlink)
Application.Goto Reference:=Range(Target.SubAddress), scroll:=True
End Sub
Gruß Hajo
Antwort 4 von Patri_ck vom 04.02.2022, 15:17 Options
Hallo Hajo!
Vielen Dank für die Hilfe!!!
Gruß
Patrick
Vielen Dank für die Hilfe!!!
Gruß
Patrick
Ähnliche Themen
USB Festplatte - Die Anforderung konnte wegen eines E/A-Gerätefehlers nicht ausgeführt werden.
LouZipher 20.08.2010 - 10569 Hits - 1 Antwort
Makro auf mehrere Blätter anwenden
Martin123 10.09.2008 - 16 Hits - 23 Antworten
Formel in Excel (Wert soll gleichbleiben)
mel1980 23.06.2009 - 417 Hits - 3 Antworten
Zellen auslesen
Aggi11 07.10.2009 - 289 Hits - 8 Antworten
Eingabe in Zelle aufspalten
Ulle-gt5 07.10.2009 - 299 Hits - 9 Antworten
Hinweis
Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..
Neue Einträge
