Jak tworzyć sumy kolorów
Czy chcesz dodać zawartość komórki, ale wziąć pod uwagę kolor komórek? Możesz to zrobić za pomocą makra. Poniższy rysunek przedstawia tabelę danych, w której niektóre komórki mają żółte tło (żółty kolor wypełnienia):
Aby dodać tylko komórki z bieżącego zaznaczenia, które mają żółty kolor tła, użyj następującego makra:
Sub DodajKolor komórki ()
Dim Sum As Long
Przyciemnij komórkę jako zakres
Dla każdej komórki w zaznaczeniu
Jeśli Cell.Interior.ColorIndex = 6 Wtedy
Suma = Suma + Komórka.Wartość
Zakończ, jeśli
Następna komórka
MsgBox "Suma kolorów to:" & sum
Napis końcowy
Po uruchomieniu makra Excel pokazuje sumę komórek w oknie, które są podświetlone żółtym kolorem tła. Poniższy rysunek pokazuje, jak wygląda wynik po wybraniu zakresu komórek przedstawionego powyżej:
Aby użyć innych kolorów zamiast komórek z żółtym tłem, dostosuj wartość porównania w zapytaniu Jeśli. Zastąp inne wartości żółtym zamiast 6. Aby dowiedzieć się, jakiej wartości ColorIndex użyć dla wybranego koloru, możesz użyć małego makra. Kliknij wybraną komórkę i uruchom następujące makro, aby dowiedzieć się, z jakim kolorem tła jest sformatowana aktywna komórka:
SubaktywnyKolor ()
MsgBox "Aktywny kolor tła:" & _
(Wybór (1, 1) .Interior.ColorIndex)
Napis końcowy
Wskazówka: Jeśli chcesz wiedzieć, jak wprowadzać i uruchamiać makra w Excelu, krótki opis znajdziesz tutaj: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- w-excel-ein.html
