„Excel“ - formulė, pagrįsta ląstelės spalva

„Excel Office“ programinė įranga leidžia apibrėžtoms funkcijoms atlikti „Excel“ darbalapiuose. Vietoj formulės, pagrįstos ląstelės spalva, geriau parašyti funkciją, kuri galėtų aptikti ląstelės spalvą ir atitinkamai manipuliuoti duomenimis. Kai kurios programavimo sąvokos, pvz., „Kitokios sąlygos“ ir „looping“, gali būti naudingos, jei norite parašyti vartotojo apibrėžtas funkcijas įtraukiant į „Excel“ darbalapius. Norėdami parašyti funkciją, skirtą nustatyti langelio spalvą, galima naudoti „ Interior.Color“ objektą . Todėl geriau užrašyti funkciją, o ne formulę, remiantis operacijos ląstelės spalva .

Problema
Sprendimas
Pastaba

Problema

„Excel“ programoje turiu sukurti formulę.

Tarkime, kad ląstelė A1 yra raudona - reikia įdėti formulę į B1 langelį, kur rezultatas turėtų būti „Taip“, jei ląstelės A1 spalva yra raudona, o „No“, jei ląstelė A1 yra kita spalva arba nėra spalvos.

Reikia pagalbos kuriant šią formulę „Excel 2007“.

Sprendimas

Jei ieškote formulės, nesu įsitikinęs, ar jau yra įdiegta „Excel“ formulė, kuri gali tai padaryti; bet galite sukurti savo funkciją.

 Viešoji funkcija dispColorIndex (targetCell As Range) Kaip variantas Dim colorIndex As Long colorIndex = targetCell.Interior.Color If (colorIndex = 255) Tada dispColorIndex = "YES" Else dispColorIndex = "NO" Pabaiga, jei baigsite funkciją

Kaip nurodyta jūsų pavyzdyje, į B1 įveskite: