Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: An eine bestimmte Stelle im Tabellenblatt springen

An eine bestimmte Stelle im Tabellenblatt springen
12.07.2004 20:49:30
Dominik
Hallo,
ich bin auf der Suche nach einer Möglichkeit, wie ich auf Tabellenblatt1 (zum Beispiel) einen Namen eingebe und dann durch Knopfdruck (evtl. Makro) an genau die Stelle in Tabellenblatt2 springen kann.
Vielleicht kann mir jemand helfen!?
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: An eine bestimmte Stelle im Tabellenblatt springen
andreas
hallo,
grundsätzlich gehen solche dinge, aber was soll in welche zelle geschrieben werden ?
ist der name der name des Tabellenblatts 2
oder die zelle des tabblatts2 ?
soll das automatisch nach verlassen dieser zelle passieren ?
oder über einen commandbutton ?
gruß
andreas e


http://www.fachforen.de
eine Linksammlung zu diversen fachforen
Anzeige
AW: An eine bestimmte Stelle im Tabellenblatt springen
12.07.2004 21:07:33
Dominik
Mit Namen meinte ich: in Tabellenblatt1 gebe ich in A1 meinen Namen ein "Dominik". Im Tabellenblatt2 sind dann (zum Beispiel alle deutschen männlichen Vornamen), "Dominik" steht da zum Beispiel in Zelle A3425. Und jetzt würde ich gerne von Tabellenblatt!A1 per Knopfdruck nach Tabellenblatt2!A3425 springen. Kannst Du mir nochmals weiterhelfen?
Anzeige
AW: An eine bestimmte Stelle im Tabellenblatt springen
andreas
hallo dominik,
geht bestimmt eleganter aber es funzt.

Sub such()
Dim such As String
such = Sheets("Tabelle1").Range("A1").Value
Sheets("Tabelle2").Select
zeile = Range("A65536").End(xlUp).Rows
For i = 1 To zeile
If Cells(i, 1).Value = such Then
Cells(i, 1).Select
Exit Sub
End If
Next
MsgBox ("Nivht vorhanden!")
Sheets("Tabelle1").Select
Range("A1").Select
End Sub

gruß
andreas e


http://www.fachforen.de
eine Linksammlung zu diversen fachforen
Anzeige
Etwas kürzer und wahrscheinlich auch schneller ;-)
Martin
Hallo,

Sub was_finden()
strSuch = Worksheets("Tabelle1").Range("A1")
Worksheets("Tabelle2").Activate
Columns("A:A").Find(What:=strSuch).Select
End Sub

Gruß
Martin Beck
AW: An eine bestimmte Stelle im Tabellenblatt springen
13.07.2004 08:37:41
Heinz
Hallo Dominik,
am besten mit einem Hyperlink:
1. Die Zelle, in der der gewünschte Name steht, mit einem Namen (z.B. "dom" versehen (Einfügen/Name/Definieren oder über das Namensfeld)
2. rechte Maustaste in die Zelle (Inhalt ist egal) von der der Sprung erfolgen soll, Hyperlink/Textmarke/dom
Ein Klick auf den Link und du bist bei deinem Namen
Gruß
Heinz
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

An eine bestimmte Stelle im Tabellenblatt springen


Schritt-für-Schritt-Anleitung

Um in Excel an eine bestimmte Stelle im Tabellenblatt zu springen, kannst Du ein einfaches Makro verwenden. Hier ist eine Schritt-für-Schritt-Anleitung:

  1. Öffne den VBA-Editor:

    • Drücke ALT + F11, um den Visual Basic for Applications (VBA) Editor zu öffnen.
  2. Füge ein neues Modul hinzu:

    • Klicke mit der rechten Maustaste auf "VBAProject (deine_datei.xlsx)", wähle "Einfügen" und dann "Modul".
  3. Füge den Code ein:

    • Kopiere den folgenden Code in das Modul:
    Sub springeZuBestimmterStelle()
       Dim such As String
       such = Sheets("Tabelle1").Range("A1").Value
       Sheets("Tabelle2").Select
       Dim zeile As Long
       zeile = Range("A65536").End(xlUp).Row
       For i = 1 To zeile
           If Cells(i, 1).Value = such Then
               Cells(i, 1).Select
               Exit Sub
           End If
       Next
       MsgBox ("Nicht vorhanden!")
       Sheets("Tabelle1").Select
       Range("A1").Select
    End Sub
  4. Schließe den VBA-Editor:

    • Speichere Deine Änderungen und schließe den Editor.
  5. Führe das Makro aus:

    • Gehe zurück zu Excel und drücke ALT + F8, wähle springeZuBestimmterStelle aus und klicke auf "Ausführen".

Jetzt kannst Du in Tabellenblatt1 einen Namen eingeben, und nach dem Ausführen des Makros springt Excel direkt zu der Zelle, in der der Name in Tabellenblatt2 steht.


Häufige Fehler und Lösungen

  • Fehler: "Nicht vorhanden!"
    Lösung: Stelle sicher, dass der eingegebene Name exakt mit dem Namen in Tabellenblatt2 übereinstimmt. Tippfehler oder unterschiedliche Schreibweisen führen dazu, dass Excel nicht finden kann, was Du suchst.

  • Fehler: Makro funktioniert nicht
    Lösung: Überprüfe, ob Makros in Deiner Excel-Datei aktiviert sind. Du kannst dies in den Excel-Optionen unter "Trust Center" einstellen.


Alternative Methoden

Wenn Du nicht mit Makros arbeiten möchtest, gibt es auch alternative Methoden, um an eine bestimmte Stelle im Tabellenblatt zu springen:

  • Hyperlinks: Du kannst Hyperlinks in Excel verwenden, um auf eine bestimmte Zelle zu verlinken. Klicke mit der rechten Maustaste auf die Zelle, wähle "Hyperlink" und dann "Textmarke", um auf eine Zelle in einem anderen Tabellenblatt zu verlinken.

  • Suchfunktion: Verwende die Suchfunktion (Strg + F), um schnell nach einem Namen zu suchen und dann die entsprechende Zelle auszuwählen.


Praktische Beispiele

  1. Makro für häufige Namen: Erstelle ein Makro, das automatisch zu häufig gesuchten Namen in Deiner Liste springt. Füge eine Schaltfläche hinzu, um den Prozess zu vereinfachen.

  2. Hyperlink-Beispiel: Wenn Du "Dominik" in Zelle A1 von Tabellenblatt1 eingibst, kannst Du in Zelle B1 einen Hyperlink zu "Tabelle2!A3425" erstellen, um schnell dorthin zu springen.


Tipps für Profis

  • Namen definieren: Definiere in Excel Namen für häufig verwendete Bereiche. Dies erleichtert das Navigieren und macht die Verwendung von Hyperlinks und Makros effizienter.

  • Verwende die Find-Methode: Wenn Du große Datenmengen hast, kann die Find-Methode in VBA schneller sein, um eine bestimmte Zelle zu finden, anstatt durch jede Zeile zu iterieren.

Hier ein Beispiel für die Find-Methode:

Sub findeUndSpringe()
    Dim strSuch As String
    strSuch = Worksheets("Tabelle1").Range("A1")
    Worksheets("Tabelle2").Activate
    Columns("A:A").Find(What:=strSuch).Select
End Sub

FAQ: Häufige Fragen

1. Wie kann ich Excel an das Ende der Tabelle springen?
Du kannst dies mit der Funktion Range("A" & Rows.Count).End(xlUp).Select tun, um die letzte gefüllte Zelle in einer Spalte zu erreichen.

2. Kann ich Excel zum Anfang der Tabelle springen?
Ja, Du kannst einfach Range("A1").Select verwenden, um direkt zur ersten Zelle in Deinem Tabellenblatt zu springen.

3. Was mache ich, wenn mein Makro nicht funktioniert?
Überprüfe, ob Du das Makro korrekt gespeichert und die Makros in den Excel-Optionen aktiviert hast. Stelle sicher, dass der Code keine Fehler enthält und die richtigen Blattnamen verwendet werden.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige