Ez az oktatóanyag megmutatja, hogyan kell formázni a cellákat VBA használatával.
Cellaformázás
Sok olyan tulajdonság állítható be a cellák (tartományához), mint ez:
| 1234567891011 | AlhalmazCellFormat ()Munkalapokkal ("Sheet1"). Tartomány ("B5: C7").HorizontalAlignment = xlHAlignDistributed.AddIndent = Igaz.Font.FontStyle = "Dőlt".NumberFormat = "Általános". Belső. Szín = RGB (128, 100, 250)Vége ezzelEnd Sub |
Nézzük őket betűrendben:
AddIndent
Ha a tulajdonság értékét True értékre állítja, akkor a szöveg automatikusan behúzódik, amikor a cella szöveg igazítását vízszintesen vagy függőlegesen egyenlő eloszlásúra állítja be (lásd HorizontalAlignment és VerticalAlignment).
| 12345 | Munkalapokkal ("Sheet1"). Tartomány ("A1").Orientation = xlVertical.VerticalAlignment = xlVAlignDistributed.AddIndent = IgazVége ezzel |
Határok
Beállíthatja a cella szegélyformátumát. Itt találhat további információkat a határokról.
Példaként beállíthat egy piros szaggatott vonalat a B2 cella körül az 1. lapon:
| 1 | Munkalapok ("Sheet1"). Tartomány ("B2"). BorderAround LineStyle: = xlDash, ColorIndex: = 3 |
Betűtípus
A cella betűtípus-formátumát a betűtípus nevének, stílusának, méretének, színének, aláhúzások és / vagy effektusok (áthúzás, al- vagy felső index) beállításával módosíthatja. Itt talál további információt a cella betűtípusokról.
Íme néhány példa:
| 12345 | Tartománnyal ("A1: C5"). Betűtípus.Name = "Század".FontStyle = "Félkövér".Törés = IgazVége ezzel |
FormulaHidden
Ez a tulajdonság egy változatértéket ad vissza vagy állít be, amely jelzi, hogy a képlet el lesz -e rejtve, amikor a munkalap védett. Például:
| 1 | Munkalapok ("Sheet1"). Tartomány ("A1: B1"). FormulaHidden = True |
Vízszintes igazítás
Ez a tulajdonságcellás formátum tulajdonság a megadott objektum vízszintes igazítását reprezentáló értéket ad vissza vagy állít be. A visszaadott vagy beállított állandók a következők lehetnek: xlGeneral, xlCenter, xlDistributed, xlJustify, xlLeft, xlRight, xlFill, xlCenterAcrossSelection. Például:
| 1 | Munkalapok ("Sheet1"). Tartomány ("D3"). HorizontalAlignment = xlRight |
IndentLevel
Visszaad vagy 0 és 15 közötti egész értéket állít be, amely a cella vagy tartomány behúzási szintjét jelzi.
| 1 | Munkalapok ("Sheet1"). Tartomány ("A1"). IndentLevel = 7 |
belső
Beállíthat vagy kérhet vissza információkat a cella belsejéről: annak színe, ColorIndex, Pattern, PatternColor, PatternColorIndex, PatternThemeColor, PatternTintAndShade, ThemeColor, TintAndShade, például:
| 123 | Ha nem tartomány ("A1"). Interior.ThemeColor = ThemeColorLight2 AkkorTartomány ("A1"). Interior.Pattern = xlPatternUpVége Ha |
Zárt
Ez a tulajdonság True értéket ad vissza, ha a cella vagy tartomány zárolva van, hamis, ha az objektum módosítható, amikor a lap védett, vagy Null, ha a megadott tartomány zárolt és zárolt cellákat is tartalmaz. Használható cellák zárásához vagy feloldásához is.
Ez a példa feloldja az A1: B2 cellák feloldását az 1. lapon, hogy azok módosíthatók legyenek, ha a lap védett.
| 12 | Munkalapok ("Sheet1"). Tartomány ("A1: B2"). Zárva = HamisMunkalapok ("Sheet1") |
MergeCells
Állítsa ezt a tulajdonságot Igaz értékre, ha egyesítenie kell egy tartományt. Értéke igaz lesz, ha egy megadott tartomány egyesített cellákat tartalmaz. Például, ha egyesítenie kell a C5: D7 tartományt, használhatja ezt a kódot:
| 1 | Munkalapok ("Sheet1"). Tartomány ("C5: D7"). MergeCells = True |
Számformátum
Beállíthatja a cella (k) számformátumát Általános, Szám, Pénznem, Számvitel, Dátum, Idő, Százalék, Töredék, Tudományos, Szöveg, Speciális és Egyedi.
Íme a tudományos és százalékos számformátumok példái:
| 12 | Tartomány ("A1"). NumberFormat = "0.00E+00"Tartomány ("B1"). NumberFormat = "0.00%" |
NumberFormatLocal
Ez a tulajdonság olyan változatértéket ad vissza vagy állít be, amely az objektum formátumkódját karakterláncként képviseli a felhasználó nyelvén.
Orientáció
Ezzel a tulajdonsággal beállíthatja (vagy visszaadhatja) a szöveg tájolását a cellákon belül. Értéke ezen állandók egyike lehet: xlDownward, xlHorizontal, xlUpward, xlVertical vagy egész érték -90 és 90 fok között.
| 1 | Munkalapok ("Sheet1"). Tartomány ("A1"). Tájolás = -60 |
Szülő
Ez egy csak olvasható tulajdonság, amely egy megadott objektum szülőobjektumát adja vissza.
ShrinkToFit
Ez a tulajdonság egy változatértéket ad vissza vagy állít be, amely jelzi, hogy a szöveg automatikusan zsugorodik -e, hogy beleférjen a rendelkezésre álló oszlopszélességbe.
| 1 | Munkalapok ("Sheet1"). Tartomány ("A1"). ShrinkToFit = Igaz |
Függőleges igazítás
Ez a tulajdonságcellás formátum tulajdonság a megadott objektum függőleges igazítását reprezentáló értéket ad vissza vagy állít be. A visszaadott vagy beállított állandók a következők lehetnek: xlCenter, xlDistributed, xlJustify, xlBottom, xlTop. Például:
| 1 | Munkalapok ("Sheet1"). Tartomány ("A1"). VerticalAlignment = xlTop |
WrapText
Ez a tulajdonság igaz értéket ad vissza, ha a szöveg a megadott tartomány összes cellájába van csomagolva, hamis, ha a szöveg nincs a megadott tartományban lévő összes cellába csomagolva, vagy ha a megadott tartomány tartalmaz néhány cellát, amely szöveget csomagol, és más cellákat, amelyek nem.
Például, ha rendelkezik ezzel a cellatartománnyal:
ez az alábbi kód a Null értéket adja vissza az azonnali ablakban:
| 1 | ? Munkalapok ("Sheet1"). Tartomány ("A1: B1"). WrapText |
