zählen von farbigen Zellen in einer Zeile

Dieses Thema zählen von farbigen Zellen in einer Zeile im Forum "Microsoft Office Suite" wurde erstellt von madmaxcompu, 10. Juni 2005.

Thema: zählen von farbigen Zellen in einer Zeile Hallo,  ich möchte in Excel alle gelb markierten Zellen in einer Zeile zB. C3 bis AG3 zählen Das ganze ist ein...

  1. Hallo,  ich möchte in Excel alle gelb markierten Zellen in einer Zeile zB. C3 bis AG3 zählen
    Das ganze ist ein Dienstplan, ich habe in der oben genannten Zeile Zeiten eingetragen die berechnet werden. Nun kommt es vor dass zusätzliche Dienste eingetragen werden müssen, diese Zellen sollen farbig markiert werden und ich möchte am Ende der Tabelle in einer Zelle die Anzahl der farbig markierten Zellen auslesen um mit dem Ergebnis weiter zu rechnen.
    Weis jemand eine Möglichkeit?

    Danke und MfG madmaxcompu
     
  2. wieviele farben sind es denn wenn ich mal so direkt fragen darf =)

    // edit

    sorry hab net alles gelesen *gg*

    aber ich frag mal so: Brauchst du wirklich nur die gelben oder auch z.B. rote?
     
  3. Im Regelfall sind es nur gelbe bzw 1 Farbe, mich würde halt erstmal interessieren ob bzw wie es möglich ist

    mfg madmaxcompu
     
  4. und wo soll dann das resultat kommen? bzw. in welcher form:

    Meldung oder in einer Zelle(bitte Adresse eingeben)?

    mfg billy
     
  5. Das Resultat soll in einer Zelle stehen, nächste Zelle währe dann AG3. Wenn möglich in Form eines Wertes den ich dann in diesem Fall mit 2 multiplizieren muss.

    mfg madmaxcompu
     
  6. du meinst wohl AH3 ^^

    wenn nicht, kannst du es selber noch ändern

    Hier wäre der Code:
    Code:
    Sub gelbezaehlen()
    Dim r As Range, count As Long
    Set r = ActiveSheet.Range(C3:AG3)
    
    'Die Variabel
    count = 0
    
    'Hier werden alle Zellen gezählt die einen Gelben Hintergrund(6) haben
    For Each zelle In r
    If zelle.Interior.ColorIndex = 6 Then
     count = count + 1
    End If
    Next
    
    'wie du geschrieben hast, musst du ja den wert mal 2 nehmen
    count = count * 2
    
    'und hier wird der wert in die Zelle Eingetragen. Das A1 kansnt du noch in was
    'belibiges ändern
    ActiveSheet.Range(A1).Value = count
    
    End Sub
    
    hoffe das hilft dir

    mfg billy
     
  7. Danke erstmal , ich werde es mal testen.
    mfg madmaxcompu
     
  8. mach das ;D

    dafür wurde es entwickelt 8)
     
  9. Es funktioniert, geht das auch variabel für mehrere Zeilen? Genauer gesagt das Beispiel währe für einen Mitarbeiter in den darunter liegende Zeilen benötige ich diese Berechnung auch.
    Sorry, hätte ich vielleicht gleich schreiben können.
    mfg madmaxcompu
     
  10. hi

    sicher geht das

    du siehst ja den abschnitt Set r = ActiveSheet.Range(C3:AG3). Hier kannst du nun deinen bereich erweitern in z.B. C3:AG4

    wenn du jetzt nur eine gewisse zeile hast also nicht die zeile 4 hast, kannst du es wiefolgt machen

    Set r = ActiveSheet.Range(C3:AG3, C6:AG6) in der art weitermachen ^^

    mfg billy
     
Die Seite wird geladen...

zählen von farbigen Zellen in einer Zeile - Ähnliche Themen

Forum Datum
Excel Buchstabenkombination z.B. "ABC" durch Zahlenkombination z.B."1,2,3" ersetzen Microsoft Office Suite 29. Juli 2013
[INFO] Software-Pirat muss 500.000 Euro Strafe zahlen Windows 7 Forum 18. März 2010
Access Zeilen zählen und dann für jeden Datensatz +1 Windows XP Forum 25. Juli 2013
Excel 2010 - Spalten automatisch zählen Windows XP Forum 22. Apr. 2013
Warum undeutliche Zahlen- und Buchstabencodes Sonstiges rund ums Internet 28. Dez. 2012