Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

CountIf

Forumthread: CountIf

CountIf
09.10.2002 12:44:39
Frederik Fuhrmann
Hallo!

Weiß jemand wie ich das richtig schreibe?



Sub test()

Columns("C:C").Select
Selection.Cells.SpecialCells(xlVisible).Select

If WorksheetFunction.CountIf([Selection], "aw") > 0 Then
MsgBox ("youp")
End If
End Sub
 


(Ich möchte in einer AutoFilter Selection nur in den sichtbaren Zellen suchen)

Gruß
F.

Anzeige

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

Betreff
Datum
Anwender
Anzeige
Re: CountIf
09.10.2002 13:42:14
Ralf Sögel
Ohne select mit objektvariabler

Dim R as range
set R =[a1].SpecialCells(xlVisible)
If WorksheetFunction.CountIf(R, "aw") > 0 Then
MsgBox ("youp")
End If
End Sub

Alles klar!
09.10.2002 13:44:16
Frederik Fuhrmann
Dankeschön!
Anzeige
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18