Hur man skapar färgsummor
Vill du lägga till cellinnehåll, men ta hänsyn till cellens färg? Du kan göra det med ett makro. Följande bild visar en datatabell där vissa celler har en gul bakgrund (gul fyllningsfärg):
Om du bara vill lägga till cellerna från det aktuella urvalet som har en gul bakgrundsfärg använder du följande makro:
Sub AddColor -celler ()
Dim Sum så länge
Dim Cell As Range
För varje cell i urval
Om Cell.Interior.ColorIndex = 6 Då
Summa = Summa + Cell.Värde
Avsluta om
Nästa cell
MsgBox "Färgsumman är:" & summa
Avsluta Sub
När du har startat makrot visar Excel summan av cellerna i ett fönster som är markerade med en gul bakgrundsfärg. Följande bild visar hur resultatet ser ut om du väljer cellområdet som presenteras ovan:
Om du vill använda andra färger istället för celler med gul bakgrund justerar du jämförelsevärdet i if -frågan. Ersätt andra värden med gult istället för 6. För att ta reda på vilket värde ColorIndex ska använda för en färg du väljer kan du använda ett litet makro. Klicka på en valfri cell och starta följande makro för att ta reda på vilken bakgrundsfärg den aktiva cellen är formaterad med:
Sub ActiveColor ()
MsgBox "Aktiv bakgrundsfärg:" & _
(Urval (1, 1) .Interior.ColorIndex)
Avsluta Sub
Tips: Om du vill veta hur du anger och startar makron i Excel hittar du en kort beskrivning här: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- i-excel-ein.html
