zu bestimmter Zeile springen/scrollen

Forumthread: zu bestimmter Zeile springen/scrollen

06.01.2017 10:34:03

Fred

Aloah Excelaner,
Ich habe mehrere Tausend Zeilen mit Inhalt. Die Zeilen werden mehrfach sortiert. Interessant für mich ist allerdings immer nur eine Zeile und in welchem Bereich sie mit den nächst über und drunter liegenden Zeilen steht.
Das Problem(chen);
Oft lieg ich nach dem sortieren mitten in den Daten und ich weis nicht, soll ich nach oben scrollen oder nach unten. Bei mehreren Tausend Zeilen und Wiederholungen ist das manchmal schon ein bischen nervig
Die Zeile die ich suche hat als Merkmal den einzigartigen Wert 100 in der Spalte L
Meine Anfrage;
Ist es mit VBA möglich, dass nach dem Sortieren automatisch zu gesuchter Zeile gesprungen, gescrollt wird?
mfG
Fred

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: zu bestimmter Zeile springen/scrollen

06.01.2017 10:37:34

Hajo_Zi

Hallo Fred,
oben links
Application.Goto Reference:="R14C6", scroll:=True
Application.Goto Reference:=Range("F6"), scroll:=True

AW: zu bestimmter Zeile springen/scrollen

06.01.2017 10:48:48

Werner

Hallo Fred,
z.B. so:

Public Sub aaa()
Dim rngFund As Range
'## hier deine Sortierroutine
'## und dann das
Set rngFund = Sheets("Tabelle1").Columns(12).Find(what:=100)
If Not rngFund Is Nothing Then
rngFund.Select
Else
MsgBox "Die 100 ist in der Spalte L nicht vorhanden"
End If
End Sub

Gruß Werner

AW: zu bestimmter Zeile springen/scrollen

06.01.2017 11:01:03

Fred

Ja, Werner
und es macht das was es machen soll.
Klasse !!!
Mit Hajo`s Code habe ich eben auch rumgedoktort aber nicht zu gewünschten Ergebnis gelangt. Aber auch seinen Code werde ich für spätere Aufgaben gut aufbewahren (oben links :-)
Danke euch beiden für die Mühe und das ihr immer bereit seit, euer Wissen zu teilen ...
Schönes Wochenende
Fred

AW: Danke für die Rückmeldung. o.w.T.

06.01.2017 11:02:46

Werner

AW: zu bestimmter Zeile springen/scrollen

06.01.2017 11:48:16

Gerd

Hallo Fred,
die gedoktorte Alternative. :-)

Sub ccc()
Dim vM
vM = Application.Match(100, Columns(12), 0)
If IsNumeric(vM) Then Application.Goto Reference:=Cells(CLng(vM), 12), scroll:=True
End Sub

Du kannst die Spalte z.B. auch auf "A" --> Cells(.., 1) setzen.
Gruß Gerd

Infobox / Tutorial

Zu einer bestimmten Zeile in Excel springen und scrollen

Schritt-für-Schritt-Anleitung
Häufige Fehler und Lösungen
Alternative Methoden
Praktische Beispiele
Tipps für Profis
FAQ: Häufige Fragen

Schritt-für-Schritt-Anleitung

Öffne Excel und lade deine Tabelle mit den vielen Zeilen.
Drücke Alt + F11, um den VBA-Editor zu öffnen.
Füge ein neues Modul hinzu: Klicke auf Einfügen > Modul.

Kopiere den folgenden Code in das Modul:

Public Sub GeheZuZeileMitWert()
   Dim rngFund As Range
   Set rngFund = Sheets("Tabelle1").Columns(12).Find(what:=100)
   If Not rngFund Is Nothing Then
       rngFund.Select
       Application.Goto rngFund, scroll:=True
   Else
       MsgBox "Der Wert 100 ist in der Spalte L nicht vorhanden"
   End If
End Sub

Schließe den VBA-Editor und kehre zu Excel zurück.
Führe das Makro aus: Drücke Alt + F8, wähle GeheZuZeileMitWert aus und klicke auf Ausführen.

Jetzt springt Excel direkt zu der Zeile, die den Wert 100 in der Spalte L hat. Diese Methode ermöglicht es dir, effizient zu einer bestimmten Zeile zu springen und das Scrollen zu minimieren.

Häufige Fehler und Lösungen

Fehler: „Der Wert 100 ist in der Spalte L nicht vorhanden“
- Lösung: Stelle sicher, dass der gesuchte Wert in der richtigen Spalte (L) vorhanden ist.
Fehler: Das Makro springt nicht zur richtigen Zelle
- Lösung: Überprüfe den Code und stelle sicher, dass die Spalte korrekt angegeben ist (in diesem Fall Spalte 12).

Alternative Methoden

Direktes Springen zu einer bestimmten Zeile
- Du kannst auch die Funktion GoTo verwenden, um direkt eine Zelle anzuspringen:
```
Application.Goto Reference:="R14C6", scroll:=True
```
Excel-Funktion „SVERWEIS“
- Verwende die Funktion SVERWEIS, um Daten zu suchen und gleichzeitig zu scrollen:
```
=SVERWEIS(100;A1:L1000;12;FALSCH)
```

Praktische Beispiele

Beispiel für eine automatische Suche nach einem Wert:

Sub SucheUndSpringe()
  Dim vM
  vM = Application.Match(100, Columns(12), 0)
  If IsNumeric(vM) Then
      Application.Goto Reference:=Cells(CLng(vM), 12), scroll:=True
  End If
End Sub

Beispiel für das Scrollen ohne zu springen:
- Bei großen Datenmengen kannst du die Ansicht anpassen, um nicht zu springen:
```
Application.ScrollWorkbookTabs Position:=xlLast
```

Tipps für Profis

Verwende Tastenkombinationen: Drücke Strg + G, um das „Gehe zu“-Fenster zu öffnen, und gib die gewünschte Zeilennummer ein, um schnell zu einer bestimmten Zeile zu springen.
Makros optimieren: Wenn du oft zu bestimmten Zeilen springst, speichere dein Makro in der Arbeitsmappe, um es schnell zugänglich zu machen.
Daten filtern: Verwende die Filterfunktion, um nur die relevanten Daten anzuzeigen und so das Scrollen zu erleichtern.

FAQ: Häufige Fragen

1. Wie kann ich in Excel zu einer bestimmten Zelle springen? Du kannst die Funktion Application.Goto verwenden, um direkt zu einer bestimmten Zelle zu springen, z.B. Application.Goto Reference:="A1".

2. Gibt es eine Möglichkeit, in Excel zu scrollen, ohne die Zeilen zu wechseln? Ja, du kannst das Scrollen anpassen, indem du die Ansicht in Excel änderst und die Scroll-Leiste nutzt, ohne die Zeilen zu wechseln.

Beliebteste Forumthreads (12 Monate)

zu bestimmter Zeile springen/scrollen

Forumthread: zu bestimmter Zeile springen/scrollen

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

Infobox / Tutorial

Zu einer bestimmten Zeile in Excel springen und scrollen

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

zu bestimmter Zeile springen/scrollen

Forumthread: zu bestimmter Zeile springen/scrollen

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

Forumthreads zu verwandten Themen

VBA Beispiele zu diesem und ähnlichen Themen

Infobox / Tutorial

Zu einer bestimmten Zeile in Excel springen und scrollen

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread