Tento tutoriál vám ukáže, ako formátovať bunky pomocou jazyka VBA.
Formátovanie buniek
Existuje mnoho vlastností, ktoré je možné nastaviť pre (rozsah) buniek, ako je tento:
| 1234567891011 | Sub SetCellFormat ()S pracovnými listami („List1“). Rozsah („B5: C7“).HorizontalAlignment = xlHAlignDistributed.AddIndent = Pravda.Font.FontStyle = "Kurzíva".NumberFormat = "Všeobecné".Interior.Color = RGB (128, 100, 250)Ukončiť sKoniec pod |
Pozrime sa na ne v abecednom poradí:
AddIndent
Nastavením hodnoty tejto vlastnosti na hodnotu True sa text automaticky odsadí, keď je zarovnanie textu v bunke nastavené horizontálne alebo vertikálne na rovnakú distribúciu (pozri HorizontalAlignment a VerticalAlignment).
| 12345 | S pracovnými listami („List1“). Rozsah („A1“).Orientácia = xlVertikálne.VerticalAlignment = xlVAlignDistributed.AddIndent = PravdaUkončiť s |
Hranice
Môžete nastaviť formát orámovania bunky. Tu nájdete ďalšie informácie o hraniciach.
Príklad: Červenú prerušovanú čiaru okolo bunky B2 v hárku 1 môžete nastaviť takto:
| 1 | Pracovné listy („List1“). Rozsah („B2“). BorderAround LineStyle: = xlDash, ColorIndex: = 3 |
Písmo
Formát písma bunky môžete upraviť nastavením názvu písma, štýlu, veľkosti, farby, podčiarknutia alebo efektov (prečiarknuté, dolné alebo horné indexy). Tu nájdete ďalšie informácie o písmach buniek.
Tu je niekoľko príkladov:
| 12345 | S rozsahom („A1: C5“). Písmo.Name = "Storočie".FontStyle = "tučné písmo".Preškrtnuté = pravdivéUkončiť s |
FormulaHidden
Táto vlastnosť vracia alebo nastavuje hodnotu variantu, ktorá označuje, či bude vzorec skrytý, keď je hárok chránený. Napríklad:
| 1 | Pracovné listy („List1“). Rozsah („A1: B1“). FormulaHidden = True |
Horizontálne zarovnanie
Táto vlastnosť vlastnosti formátu bunky bunky vracia alebo nastavuje hodnotu variantu, ktorá predstavuje horizontálne zarovnanie pre určený objekt. Vrátené alebo nastavené konštanty môžu byť: xlGeneral, xlCenter, xlDistributed, xlJustify, xlLeft, xlRight, xlFill, xlCenterAcrossSelection. Napríklad:
| 1 | Pracovné listy („List1“). Rozsah („D3“). HorizontalAlignment = xlRight |
Úroveň odsadenia
Vráti alebo nastaví celočíselnú hodnotu medzi 0 a 15, ktorá predstavuje úroveň odsadenia pre bunku alebo rozsah.
| 1 | Pracovné listy („List1“). Rozsah („A1“). IndentLevel = 7 |
Interiér
Môžete nastaviť alebo získať vrátené informácie o interiéri bunky: jej Color, ColorIndex, Pattern, PatternColor, PatternColorIndex, PatternThemeColor, PatternTintAndShade, ThemeColor, TintAndShade, takto:
| 123 | Ak nie je rozsah („A1“). Interior.ThemeColor = ThemeColorLight2 PotomRozsah („A1“). Interior.Pattern = xlPatternUpKoniec Ak |
Zamknuté
Táto vlastnosť vráti hodnotu True, ak je bunka alebo rozsah uzamknutá, False, ak je možné objekt upraviť, keď je hárok chránený, alebo Null, ak zadaný rozsah obsahuje zamknuté aj odomknuté bunky. Možno ho použiť aj na uzamknutie alebo odomknutie buniek.
Tento príklad odomkne bunky A1: B2 v hárku 1, aby ich bolo možné upraviť, keď je hárok chránený.
| 12 | Pracovné listy („List1“). Rozsah („A1: B2“). Zamknuté = nepravdivéPracovné listy („List1“). Chráňte |
Zlúčiť bunky
Ak potrebujete zlúčiť rozsah, nastavte túto vlastnosť na hodnotu True. Jeho hodnota bude True, ak zadaný rozsah obsahuje zlúčené bunky. Ak napríklad potrebujete zlúčiť rozsah C5: D7, môžete použiť tento kód:
| 1 | Pracovné listy („List1“). Rozsah („C5: D7“). MergeCells = True |
Formát čísla
V bunkách môžete nastaviť formát čísel na Všeobecné, Číslo, Mena, Účtovníctvo, Dátum, Čas, Percento, Zlomok, Vedecký, Text, Špeciálne a Vlastné.
Tu sú príklady vedeckých formátov a percentuálnych čísel:
| 12 | Rozsah ("A1"). NumberFormat = "0,00E+00"Rozsah ("B1"). NumberFormat = "0,00%" |
NumberFormatLocal
Táto vlastnosť vracia alebo nastavuje hodnotu variantu, ktorá predstavuje kód formátu pre objekt ako reťazec v jazyku používateľa.
Orientácia
Táto vlastnosť umožňuje nastaviť (alebo vrátiť) textovú orientáciu v bunkách. Jeho hodnota môže byť jedna z týchto konštánt: xlDownward, xlHorizontal, xlUpward, xlVertical alebo celočíselná hodnota od -90 do 90 stupňov.
| 1 | Pracovné listy („List1“). Rozsah („A1“). Orientácia = -60 |
Rodič
Toto je vlastnosť iba na čítanie, ktorá vracia nadradený objekt zadaného objektu.
Zmenšiť, aby sa zmestili
Táto vlastnosť vracia alebo nastavuje hodnotu variantu, ktorá indikuje, či sa text automaticky zmenší, aby sa zmestil do dostupnej šírky stĺpca.
| 1 | Pracovné listy („List1“). Rozsah („A1“). ShrinkToFit = True |
Zvislé zarovnanie
Táto vlastnosť vlastnosti formátu bunky bunky vracia alebo nastavuje hodnotu variantu, ktorá predstavuje zvislé zarovnanie pre určený objekt. Vrátené alebo nastavené konštanty môžu byť: xlCenter, xlDistributed, xlJustify, xlBottom, xlTop. Napríklad:
| 1 | Pracovné listy („List1“). Rozsah („A1“). VerticalAlignment = xlNa začiatok |
Obtekanie textu
Táto vlastnosť vráti hodnotu True, ak je text zabalený do všetkých buniek v určenom rozsahu, hodnotu False, ak text nie je zabalený do všetkých buniek v určenom rozsahu, alebo hodnotu Null, ak zadaný rozsah obsahuje niektoré bunky, ktoré zalamujú text, a iné bunky, ktoré ho neobsahujú.
Ak máte napríklad tento rozsah buniek:
tento kód uvedený nižšie vráti hodnotu Null v okamžitom okne:
| 1 | ? Pracovné listy ("List1"). Rozsah ("A1: B1"). WrapText |
