Telle Tomme Fargede Cells

June 6  by Eliza

Cindy har et fullt formatert regneark som bruker farge i mange celler. Noen av cellene har verdier i seg; mange gjør det ikke. Hun trenger en måte å telle noen fargede celler som er tomme og lurer på om det er en rask måte å gjøre dette.

Det er noen måter du kan få den informasjonen du trenger. En måte er å gå gjennom disse trinnene:

  1. Finne ut hvilken farge det er som du vil bruke i din opptelling.
  2. Trykk F5. Excel viser Gå til dialogboksen.
  3. Klikk på Special knappen. Excel viser Gå til Special dialogboksen. (Se figur 1)

    Telle Tomme Fargede Cells

    Figur 1. Gå til Special dialogboksen.

  4. Velg Blanks radioknappen.
  5. Klikk på OK. Nå er alle tomme celler i regnearket er valgt.
  6. Trykk Ctrl + F. Excel viser Kategorien Finn av Finn og erstatt dialogboksen.
  7. Klikk Alternativer-knappen for å utvide dialogboksen. (Se figur 2)

    Telle Tomme Fargede Cells

    Figur 2. Finn-fanen i Finn og erstatt dialogboksen.

  8. Klikk på knappen Format. Excel viser Finn-dialogboksen Formater.
  9. Kontroller at kategorien Fyll vises. (Se figur 3)

    Telle Tomme Fargede Cells

    Figur 3. Fyll kategorien av Finn-dialogboksen Formater.

  10. Klikk på den fargen du ønsker å søke etter. (Dette er fargen du bestemt i trinn 1.)
  11. Klikk OK for å lukke søke dialogboksen Formater.
  12. Klikk Finn alle.

Når du utfører disse trinnene, Excel-show, på bunnen av Finn og erstatt dialogboksen hvor mange celler det funnet at kampen din farge. Siden du startet søket med bare tomme celler valgt, er den resulterende teller alle disse cellene som er blank som er fylt med farge.

Selvfølgelig, hvis du trenger å bestemme dette telle ganske mange ganger, så disse trinnene kan bli veldig kjedelig svært raskt. I slike tilfeller er det en bedre ide å bruke en makro. Følgende makro skritt gjennom hver tom celle i hva området du har valgt, og sjekker for å se om det inneholder et mønster eller en farge og er tom. Dersom vilkårene er oppfylt, deretter en teller for den fargen økes.

Sub CountBlankColors1 ()
Dim c Som Range
Dim J As Integer
Dim Fargetelling (56) så lenge

ActiveSheet.Range ("a1"). CurrentRegion.SpecialCells (xlCellTypeBlanks) .Velg

For hver c I Selection
Med c.Interior
Hvis .Pattern <> xlNone Deretter
Hvis .ColorIndex <> xlNone Deretter
Hvis gjelder tom bil (c) Deretter
Fargetelling (.ColorIndex) = _
Fargetelling (.ColorIndex) + 1
End If
End If
End If
Avslutt med
Neste c

STEMP = "Dette er farge teller" & vbCrLf & vbCrLf
For J = 0 til 56
Hvis Fargetelling (J)> 0 Then
STEMP = STEMP & "Color" & J & ":" & Fargetelling (J) og vbCrLf
End If
Neste J

MsgBox STEMP
End Sub

Selvfølgelig kan du ikke ønsker å telle forskjellige farger individuelt. I stedet kan det være lurt å vite akkurat hvor mange tomme celler er fylt med hvilken som helst farge, samlet. I så fall blir den makro mye enklere.

Sub CountBlankColors2 ()
Dim c Som Range
Dim x Som Long

x = 0
ActiveSheet.Range ("a1"). CurrentRegion.SpecialCells (xlCellTypeBlanks) .Velg

For hver c I Selection
Hvis c.Interior.Pattern <> xlNone Deretter
Hvis c.Interior.ColorIndex <> xlNone Deretter
Hvis gjelder tom bil (c) Deretter x = x + 1
End If
End If
Neste c
MsgBox "Antall fargede tomme celler:" & x
End Sub

Det bør bemerkes at disse metodene ikke tar i betraktning hvis celle er farget ved hjelp av et betinget format eller ikke. (Faktisk har de ikke ta betingede formater hensyn i det hele tatt.)

ExcelTips er din kilde for kostnadseffektiv Microsoft Excel trening. Dette tipset (12581) gjelder for Microsoft Excel 2007, 2010, og 2013.