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

Forumthread: Anzahl() in Msgbox anzeigen

Anzahl() in Msgbox anzeigen
10.10.2005 22:42:44
Korl
Hallo und guten Abend,
ich bin mal wieder am tüfteln und komme nicht weiter.
Ich möchte gerne in der MsgBox die Anzahl der Einträge aus dem Sheet ("Auswertung") Range("A1:A100") angezeigt bekommen.
Leider gelingt es mir nicht.
Kann mir wohl bitte jemand helfen?
Gruß Korl
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Anzahl() in Msgbox anzeigen
10.10.2005 22:45:57
Leo
Hi,
msgbox application.counta(Sheets("Auswertung").Range("A1:A100"))
mfg Leo
AW: Anzahl() in Msgbox anzeigen
10.10.2005 23:02:04
Nepumuk
Hi Leo,
das kann unter gewissen Umständen zu einem falschen Ergebnis führen. Schreib mal in Zelle B1 diese Formel ="" und kopiere sie. In Spalte A ein paar Zeilen markieren - Inhalte einfügen - Werte. Dann lass dein Makro laufen. Wenn du die Länge des Eintrags z.B. in Direktfenster abfragst (?len(cells(1,1).value)), wird dir 0 zurückgegeben. Aber CountA zählt die Zellen als wäre was drin. Darum benutze ich CountBlank, dass ignoriert solche Pseudoeinträge.
Public Sub test()
    MsgBox CStr(100 - WorksheetFunction.CountBlank(Worksheets("Auswertung").Range("A1:A100")))
End Sub

Gruß
Nepumuk

Anzeige
AW: Anzahl() in Msgbox anzeigen
10.10.2005 23:04:41
Leo
Hi,
danke, ist mir noch nie aufgefallen. Ich habe auch gelernt, nie Zelle = "" sondern
Zelle.ClearContents
mfg Leo
AW: Anzahl() in Msgbox anzeigen
10.10.2005 23:11:32
Nepumuk
Hi Leo,
in VBA mach ich das auch nicht, aber in Formel sehr wohl. Z.B. um bei einem SVERWEIS ohne Fundstelle keinen Fehler (#NV) in der Tabelle zu haben.
Gruß
Nepumuk

Anzeige
AW: Anzahl() in Msgbox anzeigen
10.10.2005 23:16:00
Korl
Hallo Leo und Nepumuk,
besten Dank für Euren nächtlichen Einsatz, dieses i-Tüpfelchen fehlte mir noch.
Eigentlich war ich schon na dran, hatte "WorksheetFunction" nicht voran gesetzt.
Naja, nochmal besten Dank für Eure Bemühungen.
Schönen Gruß
Korl
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige