Supportnet / Forum / Skripte(PHP,ASP,Perl...)
Werte ganzer Spalten auslesen
Frage
Hallo,
ich brauche mal bitte Hilfe bei einer VBA-Proggrammierung.
Über eine FOR-Schleife lass ich Werte einlesen, zum Beispiel Arbeitsstunden. Die Summe aller Stunden mache ich so:
Set r = a.Cells(5, c2)
cell r, ""
r.FormulaR1C1 = "=SUM(R[4]C:R[" + CStr(days + 4) + "]C)"
color r, i
Jetzt will es aber nicht klappen, dass ich nicht die Summe der Arbeitsstunden erfasse sondern lediglich die Anzahl wie oft er in dem Monat XY gearbeitet hat.
Bsp: Müller hat 50 Stunden gearbeitet und war 5 Tage arbeiten....
Also nur die Summe, wie oft Eintragungen in der Spalte gefunden wurden, und nicht deren Ergebnisse zusammengefasst.
Antwort 1 von coros
Hallo Estella,
mit der Eigenschaft
kannst Du genau wie mit der Formel =ZÄHLENWENN(Bereich, Suchkriterium) in VBA die Anzahl von Einträgen in einer Spalte erfassen.
Als Beispiel: Nachfolgende Befehlszeile liefert Dir die Anzahl der Einträge aus Spalte B und zeigt Sie Dir in einer Bildschirmmeldung an.:
Ich hoffe, Du kommst klar. Bei Fragen melde Dich.
MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du
ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
mit der Eigenschaft
Application.WorksheetFunction.CountIf(Bereich, Suchkriterium)kannst Du genau wie mit der Formel =ZÄHLENWENN(Bereich, Suchkriterium) in VBA die Anzahl von Einträgen in einer Spalte erfassen.
Als Beispiel: Nachfolgende Befehlszeile liefert Dir die Anzahl der Einträge aus Spalte B und zeigt Sie Dir in einer Bildschirmmeldung an.:
MsgBox Application.WorksheetFunction.CountIf(Range("B1:B65536"), ">0")Ich hoffe, Du kommst klar. Bei Fragen melde Dich.
MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du
ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.

