Ovaj će vodič pokazati kako oblikovati ćelije pomoću VBA.
Formatiranje ćelija
Postoje mnoga svojstva koja se mogu postaviti za (raspon) ćelija poput ove:
| 1234567891011 | Sub SetCellFormat ()S radnim listovima ("List 1"). Raspon ("B5: C7").HorizontalAlignment = xlHAlignDistribuirano.AddIndent = Istina.Font.FontStyle = "Kurziv".NumberFormat = "Općenito".Interijer.Boja = RGB (128, 100, 250)Završi sKraj podm |
Pogledajmo ih abecednim redom:
AddIndent
Postavljanjem vrijednosti ovog svojstva na True tekst će biti automatski uvučen kada je poravnanje teksta u ćeliji postavljeno, vodoravno ili okomito, na jednaku raspodjelu (pogledajte Horizontalno poravnanje i Vertikalno poravnanje).
| 12345 | S radnim listovima ("List1"). Raspon ("A1").Orijentacija = xlVertikalno.VerticalAlignment = xlVAlignDistribuirano.AddIndent = IstinaZavrši s |
Granice
Možete postaviti format obruba ćelije. Za više informacija o granicama pogledajte ovdje.
Kao primjer možete postaviti crvenu isprekidanu liniju oko ćelije B2 na listu 1 ovako:
| 1 | Radni listovi ("List1"). Raspon ("B2"). BorderAround LineStyle: = xlDash, ColorIndex: = 3 |
Font
Format fonta ćelije možete prilagoditi postavljanjem naziva fonta, stila, veličine, boje, dodavanjem podcrtavanja i ili efekata (precrtani, pod- ili gornji indeks). Za više informacija o fontovima ćelija pogledajte ovdje.
Evo nekoliko primjera:
| 12345 | S rasponom ("A1: C5"). Font.Name = "Stoljeće".FontStyle = "Podebljano".Strik = IstinaZavrši s |
FormulaSkriveno
Ovo svojstvo vraća ili postavlja vrijednost varijante koja označava hoće li formula biti skrivena kada je radni list zaštićen. Na primjer:
| 1 | Radni listovi ("List1"). Raspon ("A1: B1"). FormulaHidden = True |
Vodoravno poravnanje
Ovo svojstvo formata ćelije svojstava vraća ili postavlja vrijednost varijante koja predstavlja vodoravno poravnanje za navedeni objekt. Vraćene ili postavljene konstante mogu biti: xlGeneral, xlCenter, xlDistributed, xlJustify, xlLeft, xlRight, xlFill, xlCenterAcrossSelection. Na primjer:
| 1 | Radni listovi ("List1"). Raspon ("D3"). HorizontalAlignment = xlRight |
Razina uvlačenja
Vraća ili postavlja cijelu vrijednost između 0 i 15 koja predstavlja razinu uvlačenja za ćeliju ili raspon.
| 1 | Radni listovi ("List1"). Raspon ("A1"). Razina uvlake = 7 |
Interijer
Možete postaviti ili dobiti vraćene podatke o unutrašnjosti ćelije: njezinu boju, indeks boja, uzorak, boju uzorka, uzorak boje, indeks uzorka, boju boje, uzorak nijanse, nijansu boje, nijansu boje, ovako:
| 123 | Ako nije raspon ("A1"). Interijer.ThemeColor = ThemeColorLight2 ZatimRaspon ("A1"). Interijer. Uzorak = xlUzorakUpZavrši ako |
Zaključan
Ovo svojstvo vraća True ako je ćelija ili raspon zaključan, False ako se objekt može promijeniti kad je list zaštićen, ili Null ako navedeni raspon sadrži i zaključane i otključane ćelije. Može se koristiti i za zaključavanje ili otključavanje ćelija.
Ovaj primjer otključava ćelije A1: B2 na listu 1 tako da se mogu mijenjati kada je list zaštićen.
| 12 | Radni listovi ("List1"). Raspon ("A1: B2"). Zaključano = NetačnoRadni listovi ("List1"). Zaštitite |
Spajanje ćelija
Postavite ovo svojstvo na True ako trebate spojiti raspon. Njegova vrijednost postaje True ako navedeni raspon sadrži spojene ćelije. Na primjer, ako trebate spojiti raspon C5: D7, možete upotrijebiti ovaj kod:
| 1 | Radni listovi ("List1"). Raspon ("C5: D7"). MergeCells = True |
Format broja
Format broja unutar ćelija / ćelija možete postaviti na Općenito, Broj, Valuta, Računovodstvo, Datum, Vrijeme, Postotak, Razlomci, Znanstveno, Tekst, Posebno i Prilagođeno.
Evo primjera znanstvenih i postotnih formata broja:
| 12 | Raspon ("A1"). NumberFormat = "0,00E+00"Raspon ("B1"). NumberFormat = "0,00%" |
NumberFormatLocal
Ovo svojstvo vraća ili postavlja vrijednost varijante koja predstavlja kôd formata za objekt kao niz na jeziku korisnika.
Orijentacija
Ovim svojstvom možete postaviti (ili dobiti povrat) orijentaciju teksta unutar ćelija (ćelija). Njegova vrijednost može biti jedna od ovih konstanti: xlDownward, xlHorizontal, xlUpward, xlVertical ili cijela vrijednost od -90 do 90 stupnjeva.
| 1 | Radni listovi ("List1"). Raspon ("A1"). Orijentacija = -60 |
Roditelj
Ovo je svojstvo samo za čitanje koje vraća nadređeni objekt navedenog objekta.
Smanjiti da stane
Ovo svojstvo vraća ili postavlja vrijednost varijante koja pokazuje je li se tekst automatski smanjuje kako bi stao u dostupnu širinu stupca.
| 1 | Radni listovi ("List1"). Raspon ("A1"). ShrinkToFit = True |
Vertikalno poravnanje
Ovo svojstvo formata ćelije svojstava vraća ili postavlja vrijednost varijante koja predstavlja okomito poravnanje za navedeni objekt. Vraćene ili postavljene konstante mogu biti: xlCenter, xlDistributed, xlJustify, xlBottom, xlTop. Na primjer:
| 1 | Radni listovi ("List1"). Raspon ("A1"). VerticalAlignment = xlTop |
WrapText
Ovo svojstvo vraća True ako je tekst omotan u sve ćelije unutar navedenog raspona, False ako tekst nije omotan u sve ćelije unutar navedenog raspona, ili Null ako navedeni raspon sadrži neke ćelije koje omotavaju tekst i druge ćelije koje to ne čine.
Na primjer, ako imate ovaj raspon ćelija:
ovaj donji kod će vratiti Null u neposrednom prozoru:
| 1 | ? Radni listovi ("List1"). Raspon ("A1: B1"). WrapText |
