Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1860to1864
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1860to1864
1860to1864
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spalte nach Wert durchs. als Variable sp

Spalte nach Wert durchs. als Variable sp
06.12.2021 12:14:53
Pete
Guten morgen Forum,
eine Frage bezüglich des Durchsuchens eines Tabellenblatts.
Ich würde gerne Sheet1 ab Zeile 2 in Spalte 5 durchsuchen lassen, ob dort der Wert "abc" oder "dcd" vorkommt.
Er soll von Zeile 2 bis zur letzten Zeile durchsuchen und dann alle Zeilenergebnisse in einer Variable auflisten.
Soll heißen die Variable enthält danach die Zeilennummern, in denen abc oder dcd vorkamen zb. so "4; 5; 10; 291; 901"
Kann mir dabei jemand Unterstützung leisten? Weiss nicht so recht, wie ich das anstellen soll.
Vielen Dank vorab schon für die Hilfe
Pete

11
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Frage vorab...
06.12.2021 12:21:26
{Boris}
Hi,
wofür benötigst Du denn die Zeilennummern?
VG, Boris
AW: Frage vorab...
06.12.2021 12:43:47
Pete
Ich würde gerne dann anhand der Zeilennr einen Textbaustein kreieren, der sich aus der Zeilennr. und den zugehörigen Spalten zusammensetzt. Das bekomme ich dann aber selbstständig hin, da ich dann die Logik dahinter besser verstehe ....
AW: Spalte nach Wert durchs. als Variable sp
06.12.2021 12:24:48
Rudi
Hall,
z.B.

Sub aaa()
Dim vArr, i As Long, strRows As String
vArr = Range(Cells(1, 5), Cells(Rows.Count, 5).End(xlUp))
For i = 2 To UBound(vArr)
Select Case vArr(i, 1)
Case "abc", "def": strRows = strRows & ";" & i
End Select
If Len(strRows) Then
strRows = Mid(strRows, 2)
MsgBox strRows
End If
End Sub
Gruß
Rudi
Anzeige
AW: Spalte nach Wert durchs. als Variable sp
06.12.2021 13:46:02
Pete
Hallo Rudi,
irgendwie klappt die Durchscuhung mit dem Code nicht.....Aber danke erstmal für deine Bemühung.
AW: Spalte nach Wert durchs. als Variable sp
06.12.2021 13:58:47
Rudi
Hallo,
sind die Zellen = abc, def oder enthalten sie z.B.qweabcrtz ?
Gruß
Rudi
AW: Spalte nach Wert durchs. als Variable sp
06.12.2021 14:00:28
Yal
Hallo Pete,
da ist die Frage, was mit "vorkommt" gemeint ist. Wenn "abc" nur Teil vom Inhalt sein soll,
dann versuche (basierend auf dem Code von Rudi):

Sub aaa()
Dim Z As Range
Dim Erg As String
For Each Z In Range(Cells(2, 5), Cells(Rows.Count, 5).End(xlUp))
If InStr(Z.Value, "abc", vbTextCompare) Or InStr(Z.Value, "def", vbTextCompare) Then
Erg = Erg & ";" & Z.Row
End If
Next
Erg = Mid(Erg, 2)
If Len(Erg) Then MsgBox Erg
End Sub
VG
Yal
Anzeige
@Rudi: da fehlt das NEXT ... owT
06.12.2021 14:01:54
Matze
auf das Indentieren achten, sag ich immer ;-) owT
06.12.2021 14:07:29
Yal
intendieren heißt das ... ;-)
06.12.2021 15:55:07
Matze
eng. indentation, deu. Einzug oder Einrückung
06.12.2021 16:28:32
Yal
... zugegeben lässt es sich vielleicht schlecht daraus eine Verb bilden. Also muss ich wohl "Einrückung" und "einrücken" verwenden.
https://en.wikipedia.org/wiki/Indentation_(typesetting)
"Many computer languages have adopted this technique to designate "paragraphs" or other logical blocks in the program."
Verlinkt wird die deutsche Version: https://de.wikipedia.org/wiki/Einzug_(Typografie)
aber da ist wenig über Programmiersprachen gesagt, jedoch allgemein:
"Das Auge kann dadurch leicht die Absätze erkennen, ohne dass der Lesefluss unterbrochen wird, wie es bei Leerzeilen der Fall ist."
Im Prog.sprache Python hat das Einrücken sogar eine sematische Bedeutung:
"Sie hat den Anspruch, einen gut lesbaren, knappen Programmierstil zu fördern.[15] So werden beispielsweise Blöcke nicht durch geschweifte Klammern, sondern durch Einrückungen strukturiert." ( https://de.wikipedia.org/wiki/Python_(Programmiersprache) )
VG
Yal
Anzeige
AW: @Rudi: da fehlt das NEXT ... owT
06.12.2021 14:12:28
Pete
Jetzt klappts :) Vielen lieben Dank an alle - hat mich weitergebracht!

300 Forumthreads zu ähnlichen Themen

In Spalte nach Anzahl eines Begriffs suchen?
Lauren

Hall Leute!
ich will nach einem Begriff, in meinem Fall nach "SUMs" in der Spalte C suchen und wissen wie oft es in der Spalte vorkommt.
Bei Berechnungen funktioniert es mit ZÄHLENWENN ohne Probleme aber wie erhalte ich die "absolute" Zahl?
Vielen Dank für Eure Hilfe!
Grüße
...
19.08.2008 11:08:23
Thread-ID: 1002846
5 Beiträge
Anzeige
in Zeile oder Spalte Wert suchen
Lars

Hallo,
ich habe eine Zeile in der z.B. B1 B2 B3 usw. stehen.
Gibt es eine einfache Möglichkeit nach der Spalte zu suchen, in der z.B. B2 steht. Derzeit versuche ich es über eine komplizierte If-Abfrage.
Ich habe auch die Worksheetfunction "search" gefunden, weiß aber nicht, wie sie...
12.11.2008 11:12:43
Thread-ID: 1023752
7 Beiträge
Leere Zelle suchen, Wert eintragen VBA
andreas

Hallo zusammen,
habe ein kleines Formular mit zwei "Command-Button".
Bei drücken von "Zufügen" soll die nächst leere Zelle im Bereich "F3:J3500" gesucht werden und ein "x" eingetragen werden.
Bei drücken von "Entfernen" suche im selben Bereich die letzte ausgefüllte Zelle und diese...
19.11.2008 11:57:07
Thread-ID: 1025960
2 Beiträge
Anzeige
Wert in Spalte suchen
rebecca

Hallo,
ich möchte 2 Spalten vergleichen und wenn der Wert in einer Spalte steht, soll die Zelle ausgegeben werden.
Also: Spalte A 1,2,3 Spalte B 2,5,6 Dann Spalte C 2, alle anderen leer.
Welche Formel ist geeignet und wie muss ich sie aufbauen?
Dankeschön.
Gruss
...
24.11.2008 15:38:00
Thread-ID: 1027331
3 Beiträge
Suchen in Matrix nach 2 Werten mit einer Funktion
Heix

Hallo zusammen, habe gerade die Gesamt-CD von Herrn Herber erhalten und habe nun auch schon die erste Frage:
Ich möchte in einer Zelle den Wert aus einer Matrix übernehmen lassen und zwar wie folgt:
Matrix:
Lampe Brutto Netto
-------- -------- -------
EGES.....24.......18
28.11.2008 11:24:00
Thread-ID: 1028631
5 Beiträge
Suche nach einer Mittelwert Funktion
Kai

Hallo,
ich bin gerade dabei, eine Auswertung von bestellten Artikeln zu machen. Dazu habe ich eine Liste, mit bestellten Artikeln sowie die Lieferzeit. Nun möchte ich für alle Artikel mit der gleichen Produktnummer, die durchschnittliche Lieferzeit ausrechnen lassen. Das Problem hierbei ist...
29.12.2008 16:04:46
Thread-ID: 1035787
2 Beiträge
Suche rückwärts nach Wert wenn Bedingung erfuellt
Horst

Hey !
Ich schreibe suchmakros.
Mir find("suchwert") kann ich nache einem bestimmten Inhalt einen Zelle suchen...
O.K.
jetzt möchte ich nach einem Wert in einer zelle suchen der eine bestimmte Bedingung erfüllt.
Zum Bespiel möchte ich nach einem Datum in einer suchen...
...
13.01.2009 07:45:09
Thread-ID: 1039076
5 Beiträge
VBA Wert suchen, Wert einfügen
andreas

Hallo zusammen,
wie muss ich den Code schreiben, suche nach Zeilen in denen die Zelle "B" nicht leer ist.
In der Zeile in der die Zelle "B" nicht leer ist soll dann in Zelle "P" der Wert "1" eingetragen werden.
Danke für die Hilfe
Andreas
09.03.2009 08:27:39
Thread-ID: 1057988
8 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
4
4
6
1
4
2
4
1
4
7
15
4
8
5
3
6
3
2
7
2
6
4
1
3
1