Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 15:34:42
Überlagernde Textbox-Ansicht
26.04.2024 15:27:20
Excel öffnet nach Auswahl einer Excel diese leer
26.04.2024 12:46:38
Nutzereingaben Speichern und Laden
26.04.2024 11:49:48
VAB und Bedingte Formatierung nimmt die Farbe im Makro nicht
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1796to1800
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
1796to1800
1796to1800
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spalte nach Wert untersuchen

Spalte nach Wert untersuchen
01.12.2020 12:38:10
Mila
Guten Tag zusammen,
habe hier ein kleines Problem, wo ich leider nicht weiterkomme
Ich möchte meine Spalte, welche mit verschiedenen Informationen (Buchcover texte) gefüllt ist, nach einem bestimmten Wort suchen,
wird das Wort gefunden wird +1 hochgezählt. Ich weiß, dass ich das ganze mit einer Schleife lösen kann, aber ich habe immer wieder einen Laufzeitfehler...
Bedanke mich im Voraus für alle Vorschläge :)

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Spalte nach Wert untersuchen
01.12.2020 12:58:34
Stefan
Hallo Mila,
an sich wären etwas mehr informationen oder sogar ne Bsp. Datei sehr von nützen.
Ich Phantasier jetzt einfach etwas und hab zwei "Varianten":

Private Sub Cover_Z?hlen()
Dim Zähler As Integer
Dim lzeile As Integer
For lzeile = 1 To 200
If Worksheets("Tabelle1").Cells(lzeile, 3).Text = "Deingesuchtertitel"  _
Then
Zähler = Zähler + 1
End If
Next
End Sub

Ist wegen den mangelden Infos recht allgemein gestaltet....
Private Sub Cover_Z?hlen()
Dim Zähler As Integer
Dim lzeile As Integer
For lzeile = 1 To 200
If Worksheets("Tabelle1").Cells(lzeile, 3).Text = Worksheets("Tabelle1" _
).Range("B2").Text Then
Zähler = Zähler + 1
End If
Next
End Sub
Ich hab das Fett markiert, was an deine Tabelle angepasst werden muss.
Was du mit dem Zähler dann machst kannst du selbst entscheiden
Gruß
Stefan
Anzeige
AW: Spalte nach Wert untersuchen
01.12.2020 14:15:32
Mila
Hallo Stefan,
vielen Dank :) ich möchte den Zähler gerne im zweiten Tabellenblatt in Spalte 1 Zeile 2 eintragen, könntest Du da nochmal helfen bitte :)
AW: Spalte nach Wert untersuchen
02.12.2020 06:00:32
Stefan
Guten Morgen Mila,
folgenden Codeteil bitte zwischen "next" und "End sub" einfügen. Jeh nachdem welchen Code du ausgewählt hast :)

Worksheets("Tabelle2").cells(2, 1) = Zähler
Gruß und guten Start in den Tag
Stefan
AW: Spalte nach Wert untersuchen
01.12.2020 12:58:57
worti
Hallo Mila,
zum Beispiel so: 

Sub Suche_In_Spalte()
Dim intZaehler
Dim lngSpalte As Long
Dim lngZeile As Long
Dim strSuchstring As String
intZaehler = 0
lngSpalte = 1
strSuchstring = "Fitzek"
For lngZeile = 1 To Cells(Rows.Count, lngSpalte).End(xlUp).Row
If InStr(1, Cells(lngZeile, lngSpalte).Value, strSuchstring) > 0 Then
intZaehler = intZaehler + 1
End If
Next lngZeile
MsgBox intZaehler
End Sub

Gruß Worti
Anzeige

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