Sådan oprettes farvesummer
Vil du tilføje celleindhold, men tage cellernes farve i betragtning? Du kan gøre det med en makro. Følgende figur viser en datatabel, hvor nogle celler har en gul baggrund (gul fyldfarve):
Hvis du kun vil tilføje cellerne fra det aktuelle udvalg, der har en gul baggrundsfarve, skal du bruge følgende makro:
Sub AddColor -celler ()
Dim Sum så længe
Dim celle som rækkevidde
For hver celle i markering
Hvis Cell.Interior.ColorIndex = 6 Så
Sum = Sum + celle. Værdi
Afslut Hvis
Næste celle
MsgBox "Farvesummen er:" & sum
Afslut Sub
Efter start af makroen viser Excel dig summen af cellerne i et vindue, der er fremhævet med en gul baggrundsfarve. Følgende figur viser, hvordan resultatet ser ud, hvis du vælger celleområdet vist ovenfor:
Hvis du vil bruge andre farver i stedet for celler med en gul baggrund, skal du justere sammenligningsværdien i If -forespørgslen. Erstat andre værdier med gul i stedet for 6. For at finde ud af hvilken værdi ColorIndex skal bruge til en farve efter eget valg, kan du bruge en lille makro. Klik på en celle efter eget valg, og start følgende makro for at finde ud af, hvilken baggrundsfarve den aktive celle er formateret med:
Sub ActiveColor ()
MsgBox "Aktiv baggrundsfarve:" & _
(Valg (1, 1) .Interior.ColorIndex)
Afslut Sub
Tip: Hvis du gerne vil vide, hvordan du indtaster og starter makroer i Excel, finder du en kort beskrivelse her: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- in-excel-ein.html
