Live-Forum - Die aktuellen Beiträge
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
Zellen in Spalte suchen
29.11.2020 16:27:52
Eberhard
Guten Tag
Ich möchte in Spalte B die Zellen suchen welche den Begriff "Hallo" enthalten. Den erhaltenen Wert soll es mir in einer msgBox als Zahl (zum Beispiel 6) ausgeben. Kann mir da jemand behilflich sein?
Gruss Daniel

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellen in Spalte suchen
29.11.2020 16:35:47
GerdL
Moin
Sub Unit()
Const strText As String = "Hallo"
MsgBox WorksheetFunction.CountIf(Columns("B"), strText)
End Sub

Gruß Gerd
AW: Zellen in Spalte suchen
29.11.2020 16:41:45
Eberhard
Hallo Gerd
Ist nicht ganz das was ich möchte. Es sollte mir alle Zellen einzeln in einer msgbox ausgeben wo das Wort "Hallo" steht! Suchen sollte es in der Spalte "B".
Gruss Daniel
Dann lies nochmal Dein OP durch - zum Verstehen
29.11.2020 16:49:41
lupo1
AW: Zellen in Spalte suchen
29.11.2020 16:53:18
Hajo_Zi
Hallo Daniel,
Option Explicit
Sub SpalteB()
Dim Loletzte As Long
Dim LoI As Long
Loletzte = IIf(IsEmpty(Cells(Rows.Count, 2)), Cells(Rows.Count, 1).End(xlUp).Row, Rows. _
Count)
For LoI = 1 To Loletzte
If Cells(LoI, 2) = "Hallo" Then
MsgBox LoI
End If
Next LoI
End Sub

Anzeige
AW: Zellen in Spalte suchen
29.11.2020 17:01:54
Eberhard
Hallo Hajo
Genau das habe ich gesucht. Besten Dank!
Gruss Daniel
AW: Zellen in Spalte suchen
29.11.2020 17:08:27
GerdL

Sub Unit()
Dim C As Range
For Each C In Columns(2).SpecialCells(2, 2)
If C.Value = "Hallo" Then MsgBox C.Address(0, 0, 1)
Next
End Sub

303 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige