Skaičiuokite langelius su fono spalva pagal makrokomandą

Turinys

Kaip sukurti spalvų sumas

Ar norėtumėte pridėti langelių turinį, bet atsižvelgti į langelių spalvą? Tai galite padaryti naudodami makrokomandą. Šiame paveikslėlyje parodyta duomenų lentelė, kurioje kai kurios ląstelės turi geltoną foną (geltona užpildymo spalva):

Norėdami pridėti tik langelius iš dabartinio pasirinkimo, kurių fono spalva yra geltona, naudokite šią makrokomandą:

Papildomos spalvos langeliai ()
Dim Sum kaip ilgai
„Dim Cell“ kaip diapazonas
Už kiekvieną pasirinktą langelį
Jei Cell.Interior.ColorIndex = 6 Tada
Suma = suma + langelis. Vertė
Pabaiga Jei
Kitas langelis
„MsgBox“ „Spalvų suma yra:“ ir suma
Pabaiga Sub

Paleidus makrokomandą, „Excel“ parodo lange esančių langelių, paryškintų geltona fono spalva, sumą. Toliau pateiktame paveikslėlyje parodyta, kaip atrodo rezultatas, jei pasirinksite aukščiau pateiktą langelių diapazoną:

Jei norite naudoti kitas spalvas, o ne langelius su geltonu fonu, koreguokite palyginimo reikšmę „If“ užklausoje. Geltoną vietoj 6 pakeiskite kitomis. Norėdami sužinoti, kurią „ColorIndex“ vertę naudoti pasirinktai spalvai, galite naudoti mažą makrokomandą. Spustelėkite pasirinktą langelį ir paleiskite šią makrokomandą, kad sužinotumėte, kokia fono spalva suformatuota aktyvi ląstelė:

„Sub ActiveColor“ ()
„MsgBox“ „Aktyvi fono spalva:“ ir _
(Pasirinkimas (1, 1). Interjeras.ColorIndex)
Pabaiga Sub

Patarimas: Jei norite sužinoti, kaip įvesti ir paleisti makrokomandas „Excel“, trumpą aprašymą rasite čia: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- in-excel-ein.html

Padėsite svetainės plėtrą, dalintis puslapį su draugais

wave wave wave wave wave