V prípade, že chcete skopírovať konkrétnu formátovanú bunku alebo farebné bunky z jedného stĺpca do ďalšieho stĺpca, potom je tento článok pre vás. V tomto článku sa naučíme kopírovať farebné bunky pomocou kódu VBA.
Nasleduje prehľad údajov, ktoré máme, t. J. Stĺpec A obsahuje údaje s niekoľkými žltými bunkami.
Ak chcete extrahovať údaje, ktoré sú zvýraznené iba žltou farbou; musíme vytvoriť UDF, aby sa farebné bunky zobrazovali iba v stĺpci B
- Pri vytváraní funkcie definovanej používateľom vykonáme nasledujúce kroky:
- Kliknite na kartu Vývojár
- V skupine Kód vyberte položku Visual Basic
- V štandardnom module sme povinní skopírovať nižšie uvedený kód
Funkcia je žltá (podľa rozsahu ako rozsah)
Ak r.Interior.ColorIndex = 6 Potom
IsYellow = r.Hodnota
Inak
IsYellow = vbNullString
Koniec Ak
Koncová funkcia
- V bunke B1 bude vzorec = IsYellow (A1)
Vyššie uvedený kód konkrétne zodpovedá farbe č. 6, ktorá je určená iba pre žltú farbu. Preto udf extrahuje iba hodnoty, ktoré obsahujú farbu č. 6.
V prípade, že chceme extrahovať bunky červenej farby, musíme skontrolovať určené číslo farby a jednoducho nahradiť číslom žltej farby.
Týmto spôsobom môžeme získať bunky žltej farby písma pomocou kódu vba.
Stiahnutie - Extrahujte špecifický farebný register pomocou VBA - xlsm