Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: nächste Zelle mit Wert finden

nächste Zelle mit Wert finden
Frank
Hallo,
ich habe mit folgendem Makro begonnen, komme aber nicht mehr weiter:
Sub Versuch()
dim irow as integer
irow = Cells(Rows.Count, 2).End(xlUp).Row
For i = irow To 11 Step -1
If Cells(i, 1).Value > "" And Cells(i, 2).Value = "Summe Personalnummer" And Cells(i, 3).Value = "" Then
Wenn die obigen Bedingungen zutreffen, dann soll von cells(i,3) aus zu der Zelle
gesprungen werden, in der wieder ein Wert ist. Dieser Wert soll dann in die leere Zelle (cells(i,3) eingefügt werden. Leider schaffe ich es noch nicht alleine.
Gruß
Frank
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: nächste Zelle mit Wert finden
Uwe
Hallo Frank,
wenn ich Dich richtig verstanden habe, sollte es so gehen:
Then Cells(i, 3).Value = Cells(i, 3).End(xlDown)
Gruß Uwe
AW: nächste Zelle mit Wert finden
Frank
Hallo Uwe,
scheint zu funktionieren.Danke.
Gruß
Frank
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Nächste Zelle mit Wert finden in Excel


Schritt-für-Schritt-Anleitung

Um den nächsten Wert in einer Spalte zu finden, kannst Du entweder ein Makro verwenden oder eine einfache Excel-Formel nutzen. Hier ist eine Schritt-für-Schritt-Anleitung für das Makro, das Frank erstellt hat:

  1. Öffne den VBA-Editor: Drücke ALT + F11.

  2. Füge ein neues Modul hinzu: Klicke mit der rechten Maustaste auf "VBAProject (DeineDatei.xlsx)" > Einfügen > Modul.

  3. Kopiere und füge den folgenden Code ein:

    Sub Versuch()
       Dim irow As Integer
       irow = Cells(Rows.Count, 2).End(xlUp).Row
       For i = irow To 11 Step -1
           If Cells(i, 1).Value > "" And Cells(i, 2).Value = "Summe Personalnummer" And Cells(i, 3).Value = "" Then
               Cells(i, 3).Value = Cells(i, 3).End(xlDown).Value
           End If
       Next i
    End Sub
  4. Führe das Makro aus: Drücke F5 oder gehe zu "Ausführen" > "Sub/UserForm ausführen".

Dieses Makro sucht in der Spalte nach der nächsten Zelle mit einem Wert und trägt diesen Wert in die leere Zelle ein.


Häufige Fehler und Lösungen

  • Fehler: "Typkonflikt"
    Lösung: Stelle sicher, dass die Variablen korrekt deklariert sind, insbesondere die Typen. In diesem Fall sollte irow als Integer deklariert sein.

  • Fehler: Makro wird nicht ausgeführt
    Lösung: Überprüfe, ob die Makros in Deinen Excel-Einstellungen aktiviert sind.

  • Die nächste Zelle wird nicht gefunden
    Lösung: Stelle sicher, dass in der Spalte, die Du durchsuchst, tatsächlich Werte vorhanden sind.


Alternative Methoden

Falls Du kein Makro verwenden möchtest, kannst Du die Funktion VERGLEICH in Kombination mit INDEX verwenden:

  1. Formel zur Suche des nächsten Wertes:

    =INDEX(A:A;VERGLEICH(TRUE;A:A<>"";0))

Diese Formel findet die erste nicht leere Zelle in Spalte A.


Praktische Beispiele

Hier sind einige Szenarien, in denen Du die nächste Zelle mit Wert finden möchtest:

  • Suchbegriff in einer Liste: Wenn Du in einer Liste von Personalnummern den nächsten Eintrag finden möchtest.
  • Datenanalyse: Bei der Analyse von Verkaufszahlen, um die nächste Zelle mit einem Wert zu ermitteln.

Verwende die oben beschriebenen Methoden, um in diesen Szenarien effizient zu arbeiten.


Tipps für Profis

  • Verwende die Filterfunktion: Du kannst auch die Filterfunktion von Excel nutzen, um nur die Zellen mit Inhalt anzuzeigen. So findest Du die nächsten Werte schneller.

  • Makros optimieren: Versuche, Dein Makro so zu optimieren, dass es auch leere Zeilen überspringt, um die Verarbeitung zu beschleunigen.

  • Verwendung von Namen: Definiere Namen für Deine Bereiche, um die Lesbarkeit und Wartbarkeit Deiner Formeln und Makros zu verbessern.


FAQ: Häufige Fragen

1. Wie finde ich den nächsten Wert in einer bestimmten Spalte?
Du kannst die Funktion VERGLEICH in Kombination mit INDEX verwenden oder ein Makro, wie oben beschrieben, erstellen, um die nächste Zelle mit Wert zu finden.

2. Warum funktioniert mein Makro nicht?
Überprüfe, ob alle Variablen korrekt deklariert sind und ob die Makros in Deinen Excel-Einstellungen aktiviert sind.

3. Gibt es eine Möglichkeit, die nächste Zelle mit Wert in einer bestimmten Zeile zu finden?
Ja, Du kannst die End-Methode verwenden, um in einer bestimmten Zeile nach Werten zu suchen.

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