Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1916to1920
1916to1920
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zelle mit bestimmten wert selektiere

Forumthread: Zelle mit bestimmten wert selektiere

Zelle mit bestimmten wert selektiere
07.02.2023 22:02:44
mmarkus
Hallo zusammen
Wie kann ich per VBA in einer Spalte zB B die erste Zelle selektieren die einen Wert kleiner 1 enthält? Oder die erste Zelle in der die darin enthaltene Formel "" ausgibt?
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Zelle mit bestimmten wert selektiere
08.02.2023 09:02:39
ChrisL
Hi Markus
ChatGPT (Link im Forumstitel) beantwortet deine Frage wie folgt:
excel Wie kann ich per VBA in einer Spalte zB B die erste Zelle selektieren die einen Wert kleiner 1 enthält?
Sie können eine einfache Schleife verwenden, um jede Zelle in Spalte B zu überprüfen und die erste Zelle zu finden, die einen Wert kleiner 1 hat:
Dim i As Integer
For i = 1 To Cells(Rows.Count, "B").End(xlUp).Row
    If Cells(i, "B").Value  1 Then
        Cells(i, "B").Select
        Exit For
    End If
Next i
Diese Schleife verwendet die Cells-Methode, um jede Zelle in Spalte B zu überprüfen, und die End-Methode, um die letzte belegte Zelle in Spalte B zu finden. Es überprüft dann jede Zelle von Zeile 1 bis zur letzten belegten Zelle auf einen Wert kleiner 1, und wenn es eine solche Zelle findet, wird sie ausgewählt und die Schleife verlassen.
cu
Chris
Anzeige
AW: Zelle mit bestimmten wert selektiere
08.02.2023 09:49:15
Herbert_Grom
Hallo Chris,
bei mir bringt der ChatGPT diesen Code:
Sub SelectFirstCellBelow1()
    Dim cell As Range
    For Each cell In Range("B:B")
        If cell.Value  1 Then
            cell.Select
            Exit For
        End If
    Next cell
End Sub
Ist zwar im Prinzip das selbe, aber hast du deinen Code noch angepasst?
Servus
Anzeige
AW: Zelle mit bestimmten wert selektiere
08.02.2023 10:09:16
mmarkus
Und bei mir hat Chat GPT gestern Abend nur über seine zu hohe Arbeitsbelastung sinniert :-)
Danke euch beiden, werde es einbauen / Testen
markus
AW: Zelle mit bestimmten wert selektiere
08.02.2023 10:16:55
ChrisL
Hi Herbert
Nichts geändert. GPT gibt jedes mal eine neue Antwort. Dieses mal:
Sub SelectFirstCellLessThanOne()
    Dim cell As Range
    For Each cell In Range("B1:B100")
        If cell.Value  1 Then
            cell.Select
            Exit For
        End If
    Next cell
End Sub
dann im Chat eingegeben "gib mir eine andere Variante" und folgendes erhalten:
Dim cell As Range
For Each cell In Range("B1:B" & Cells(Rows.Count, "B").End(xlUp).Row)
    If cell.Value  1 Then
        cell.Select
        Exit For
    End If
Next cell
Eigentlich meine ich, ich hätte sogar mal einen Button gesehen, um Antworten erneut zu generieren. Aber den finde ich jetzt nicht mehr. ;)
cu
Chris
Anzeige
AW: Zelle mit bestimmten wert selektiere
08.02.2023 10:08:30
GerdL
Hallo Markus!
Sub Unit()
    Dim C As Range
    
    For Each C In Columns("B").Cells
    
        If C.Value  1 Or C.Value = "" Then
            C.Select
            Exit For
        End If
    Next
End Sub
Gruß Gerd

Forumthreads zu verwandten Themen

Zellen kopieren wenn Ziel nicht leer
Tom

Guten Morgen!
Ich suche mittels VBA folgende Möglichkeit
Suche Zeile für Zeile (Beginnend ab Zeile 4) die Spalte H ab ob etwas drinn steht.
Kopiere den Inhalt in die gleiche Zeile, aber in die Spalte P
Wichtig! Ist die ZIEL-Zelle bereits befüllt (es steht also etwas drin), dann...
18.08.2008 11:18:24
Thread-ID: 1002534
4 Beiträge
Zellen ausblenden mit Wert 0 in Zelle
Ulrich

Hallo zusammen,
wie kann ich einem Tabellenblatt alle Zeilen ausblenden, bei denen in der ersten Zelle eine 0 (null) steht? Geht sowas überhaupt?
Viele Grüße,
Ulrich
01.09.2008 11:08:49
Thread-ID: 1006360
6 Beiträge
Letzte Zelle & Mittelwert
Frank

Hallo,
ich möchte den Mittelwert von z.B. A2 bis A(XYZ) ermitteln.
Die Letzte Zelle kann ich aus der Variable Letzte_Vlinie auslesen.
Wie muß die Befehlszeile in einem Makro aussehen damit xyz durch den Inhalt der Variable ersetzt wird.
Gruß und danke
Frank
05.11.2008 09:22:11
Thread-ID: 1021766
5 Beiträge
Jede Zahlenwertänderung mit Blinken der Zelle
Steffi

anzeigen.
Ist sowas möglich? HAt jemand eine Idee?
Soll nur einmal blinken, also kein Dauerblinken.
LG
Steffi
07.11.2008 19:28:58
Thread-ID: 1022795
5 Beiträge
Leere zellen nicht leer und Zahlen keine Zahlen
P.Mackes

Per google bin ich zwar auf einige themen gestoßen, die sich mit diesen oder ähnlichen Probleme beschäftigen, aber so richtig gepasst hat für mich nichts oder die lösungen waren vba basiert und das kann ja nicht der stein der Weisen sein.
https://www.herber.de/bbs/user/56887.xls
es tre...
18.11.2008 11:08:00
Thread-ID: 1025551
10 Beiträge
Zellen mit bestimmtem Wert leeren
P.Mackes

ich möchte innerhalb einer gewählten range alle Zellen, die einen bestimmten Wert enthalten einfach leeren, also nicht löschen, sondern quasi den effekt, wenn man in die zelle geht und entfernen drückt
hat da jemand ein handliches makro parat?
mfg, Peter
03.12.2008 08:52:34
Thread-ID: 1029679
8 Beiträge
Anzeige
Wieviele Zellen im Range sind NICHT leer
Mandy

Hi.
wie kann ich denn ein Range C3:C13 auf meinem Sheet "Daten" so abfragen, damit ich in einem Label stehen habe, wieviel von diesen Zellen noch leer sind, sprich noch keinen Inhalt haben ?
Danke Mandy
12.02.2009 14:48:00
Thread-ID: 1050080
6 Beiträge
Anzeige
Wert mit VBA suchen und Zelle aktivieren
Nico

Moin
Ich habe eine Abrechnungsdatei und folgendes Problem
In einem Tabellenblatt werden Informationen wie Firmenname und Co. eingetragen.
In der letzten Spalte dieses Blatte möchte ich gerne das Datum per VBA eintragen lassen, an dem ich die Rechnungsnummer über mein Abrechnungstabe...
16.02.2009 16:07:00
Thread-ID: 1051203
2 Beiträge
Letzte Zelle mit konstantem Wert in Excel
Daniel

Hallo zusammen,
mit welchem VBA-Befehl komme ich an die letzte Zeile mit einem konstantem Wert (KEINE Formel!!) in einem Excel-Blatt? (Mit Cells(Rows.Count,1).End(xlUp).Row bekomme ich ja die letzte Zeile mit einer Formel zurückgeliefert)
Vielen Dank für eine Antwort!
04.05.2009 14:37:38
Thread-ID: 1072763
18 Beiträge
Anzahl Zellen mit gleichen Inhalt / welcher Wert?
StefanS

Hallo zusammen,
...und schon wieder ich - konnte im Archiv nichts finden!
Für Euch bestimmt suuuper einfach, für mich die Hölle.
Ich möchte gerne überprüfen, ob in der Spalte B:B Zellen mit gleichen Inhalt doppel oder mehrfach vorhanden sind und wenn ja, welchen Wert diese Zellen ha...
14.05.2009 14:06:36
Thread-ID: 1075153
5 Beiträge
Anzeige
Leere Zelle mit Wert?
André

Moin zusammen,
einen ungewöhnlichen Fehler habe ich in einer Excel-Datei (nicht von Excel selbst erzeugt). Eine Formel, die eigentlich nur ein paar Zahlen addieren soll, wirft als Ergebnis #WERT! aus. Schaut man sich die einzelnen Zellen, die addiert werden sollen, genauer an, fällt auf, da...
03.06.2009 16:53:40
Thread-ID: 1078925
8 Beiträge
Leere und Nichtleere Zellen einer Spalte rechnen
Urmila

Hallo,
habe ien Problem, ich habe eine Liste, in Spalte A stehen Werte (Zahlen), in der Spalte B stehen Namen.
Nun will ich, dass er mir in der Zelle D1 alle Werte aus spalte A ausrechnet, wo die Zellen in Spalte B Inhalte haben, und in Zelle E1 wo kein Inhalt steht.
Ich hoffe ich k...
30.06.2009 12:41:41
Thread-ID: 1085323
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige