Kako stvoriti zbroje u boji
Želite li dodati sadržaj ćelije, ali uzeti u obzir boju ćelija? To možete učiniti pomoću makronaredbe. Sljedeća slika prikazuje tablicu podataka u kojoj neke ćelije imaju žutu pozadinu (žuta boja ispune):
Da biste dodali samo ćelije iz trenutnog odabira koje imaju žutu boju pozadine, upotrijebite sljedeću makronaredbu:
Sub AddColor ćelije ()
Dim Sum As Long
Dim Cell As Range
Za svaku odabranu ćeliju
Ako je Cell.Interior.ColorIndex = 6 Tada
Zbroj = Zbroj + ćelija.Vrijednost
Završi ako
Sljedeća ćelija
MsgBox "Zbir boja je:" & zbroj
Kraj podm
Nakon pokretanja makronaredbe, Excel vam prikazuje zbroj ćelija u prozoru koje su označene žutom bojom pozadine. Sljedeća slika prikazuje kako rezultat izgleda ako odaberete gore prikazani raspon ćelija:
Da biste umjesto ćelija sa žutom pozadinom koristili druge boje, prilagodite vrijednost usporedbe u upitu If. Zamijenite druge vrijednosti žutom umjesto 6. Da biste saznali koju vrijednost za ColorIndex upotrijebite za boju po vašem izboru, možete upotrijebiti malu makronaredbu. Kliknite ćeliju po vašem izboru i pokrenite sljedeću makronaredbu kako biste saznali s kojom je bojom pozadine oblikovana aktivna ćelija:
Pod aktivna boja ()
MsgBox "Aktivna boja pozadine:" & _
(Odabir (1, 1). Unutrašnjost. Indeks boja)
Kraj podm
Savjet: Ako želite znati kako unijeti i pokrenuti makroe u Excelu, ovdje ćete pronaći kratak opis: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- in-excel-ein.html
