Ta vadnica bo pokazala, kako oblikovati celice z uporabo VBA.
Oblikovanje celic
Za (vrsto) celic, kot je ta, lahko nastavite številne lastnosti:
1234567891011 | Sub SetCellFormat ()Z delovnimi listi ("List1"). Obseg ("B5: C7").HorizontalAlignment = xlHAlignDistributed.AddIndent = Res.Font.FontStyle = "Ležeče".NumberFormat = "Splošno".Notranja barva = RGB (128, 100, 250)Končaj sEnd Sub |
Poglejmo jih po abecednem vrstnem redu:
AddIndent
Če vrednost te lastnosti nastavite na True, bo besedilo samodejno zamaknjeno, ko bo poravnava besedila v celici, vodoravno ali navpično, nastavljena na enako porazdelitev (glejte HorizontalAlignment in VerticalAlignment).
12345 | Z delovnimi listi ("List1"). Obseg ("A1").Orientacija = xlVertikalno.VerticalAlignment = xlVAlignDistributed.AddIndent = ResKončaj s |
Meje
Obliko obrobe celice lahko nastavite. Za več informacij o mejah glejte tukaj.
Kot primer lahko okoli celice B2 na listu 1 nastavite rdečo črtkano črto:
1 | Delovni listi ("List1"). Razpon ("B2"). BorderAround LineStyle: = xlDash, ColorIndex: = 3 |
Pisava
Obliko pisave celice lahko prilagodite tako, da nastavite ime pisave, slog, velikost, barvo, dodate podčrtaje in ali učinke (prečrtani, pod- ali nadnapis). Za več informacij o pisavah celic glejte tukaj.
Tu je nekaj primerov:
12345 | Z obsegom ("A1: C5"). Pisava.Name = "Stoletje".FontStyle = "Krepko".Strikethrough = ResKončaj s |
Formula Skrita
Ta lastnost vrne ali nastavi vrednost variante, ki označuje, ali bo formula skrita, ko bo delovni list zaščiten. Na primer:
1 | Delovni listi ("List1"). Obseg ("A1: B1"). FormulaHidden = True |
Horizontalna poravnava
Ta lastnost oblike celice lastnosti vrne ali nastavi vrednost variante, ki predstavlja vodoravno poravnavo za podani predmet. Vrnjene ali nastavljene konstante so lahko: xlGeneral, xlCenter, xlDistributed, xlJustify, xlLeft, xlRight, xlFill, xlCenterAcrossSelection. Na primer:
1 | Delovni listi ("List1"). Obseg ("D3"). HorizontalAlignment = xlRight |
Stopnja zamika
Vrne ali nastavi celoštevilčno vrednost med 0 in 15, ki predstavlja raven zamika celice ali obsega.
1 | Delovni listi ("List1"). Obseg ("A1"). IndentLevel = 7 |
Notranjost
Nastavite ali dobite vrnjene podatke o notranjosti celice: njeno barvo, barvni indeks, vzorec, vzorčno barvo, vzorčno barvno indeksno, vzorčno tematsko barvo, vzorčno točko in senčilo, barvo teme, odtenek in senco, na primer:
123 | Če ni območje ("A1"). Notranjost.ThemeColor = ThemeColorLight2 PotemObseg ("A1"). Notranjost.Vzorec = xlPatternUpKonec Če |
Zaklenjeno
Ta lastnost vrača True, če je celica ali obseg zaklenjen, False, če je mogoče predmet spremeniti, ko je list zaščiten, ali Null, če podani obseg vsebuje zaklenjene in odklenjene celice. Uporablja se lahko tudi za zaklepanje ali odklepanje celic.
Ta primer odklene celice A1: B2 na listu 1, tako da jih je mogoče spremeniti, ko je list zaščiten.
12 | Delovni listi ("List1"). Obseg ("A1: B2"). Zaklenjeno = FalseDelovni listi ("List1"). Zaščitite |
MergeCells
To lastnost nastavite na True, če morate združiti obseg. Njegova vrednost postane True, če določeno območje vsebuje združene celice. Na primer, če morate združiti obseg C5: D7, lahko uporabite to kodo:
1 | Delovni listi ("List1"). Obseg ("C5: D7"). MergeCells = True |
Format številk
Obliko številk v celicah lahko nastavite na Splošno, Število, Valuta, Računovodstvo, Datum, Čas, Odstotek, Del, Znanstveno, Besedilo, Posebno in Po meri.
Tu so primeri znanstvenih in odstotnih oblik zapisa števil:
12 | Obseg ("A1"). NumberFormat = "0,00E+00"Obseg ("B1"). NumberFormat = "0,00%" |
NumberFormatLocal
Ta lastnost vrne ali nastavi vrednost variante, ki predstavlja kodo oblike predmeta kot niz v jeziku uporabnika.
Usmerjenost
S to lastnostjo lahko nastavite (ali dobite vrnjeno) orientacijo besedila v celici (celicah). Njegova vrednost je lahko ena od teh konstant: xlDownward, xlHorizontal, xlUpward, xlVertical ali celoštevilska vrednost od -90 do 90 stopinj.
1 | Delovni listi ("List1"). Obseg ("A1"). Usmerjenost = -60 |
Starš
To je lastnost samo za branje, ki vrne nadrejeni predmet podanega predmeta.
ShrinkToFit
Ta lastnost vrne ali nastavi vrednost variante, ki označuje, ali se besedilo samodejno skrči, da se prilega širini stolpca, ki je na voljo.
1 | Delovni listi ("List1"). Obseg ("A1"). ShrinkToFit = True |
VerticalAlignment
Ta lastnost oblike celice lastnosti vrne ali nastavi vrednost variante, ki predstavlja navpično poravnavo za podani predmet. Vrnjene ali nastavljene konstante so lahko: xlCenter, xlDistributed, xlJustify, xlBottom, xlTop. Na primer:
1 | Delovni listi ("List1"). Obseg ("A1"). VerticalAlignment = xlTop |
WrapText
Ta lastnost vrne True, če je besedilo zavito v vse celice v podanem obsegu, False, če besedilo ni zavito v vse celice v podanem obsegu, ali Null, če podani obseg vsebuje nekatere celice, ki zavijejo besedilo, in druge celice, ki tega ne storijo.
Na primer, če imate ta obseg celic:
ta koda spodaj vrne vrednost Null v neposrednem oknu:
1 | ? Delovni listi ("List1"). Obseg ("A1: B1"). WrapText |