Font ćelije VBA
U VBA -u možete promijeniti svojstva fontova pomoću svojstva fonta VBA objekta Range. Upišite sljedeći kôd u VBA Editor i vidjet ćete popis svih dostupnih opcija:
| 1 | Raspon ("A1). Font. |
U nastavku ćemo raspravljati o nekoliko najčešćih svojstava.
Promijenite boju fonta
Postoji nekoliko načina za postavljanje boja fonta.
vbColor
Najjednostavniji način postavljanja boja je pomoću vbColors:
| 1 | Raspon ("a1"). Font.Color = vbRed |
Međutim, vrlo ste ograničeni u pogledu dostupnih boja. Ovo su jedine dostupne opcije:
Boja - RGB
Također možete postaviti boje na temelju RGB (crvena zelena plava). Ovdje unosite vrijednosti boje između 0-255 za crvenu, zelenu i plavu. Pomoću te tri boje možete napraviti bilo koju boju:
| 1 | Raspon ("a1"). Font.Color = RGB (255,255,0) |
ColorIndex
VBA / Excel također ima svojstvo ColorIndex. Time su vam dostupne već izgrađene boje. Međutim, pohranjeni su kao indeksni brojevi, pa je teško znati koja je boja:
| 1 | Raspon ("a1"). Font.ColorIndex =… |
Napisali smo članak o VBA kodovima boja, uključujući popis kodova VBA ColorIndex. Tamo možete saznati više o bojama.
Veličina fonta
Ovo će postaviti veličinu fonta na 12:
| 1 | Raspon ("a1"). Veličina fonta = 12 |
ili do 16:
| 1 | Raspon ("a1"). Veličina fonta = 16 |
Podebljani font
Font ćelije je jednostavno postaviti podebljano:
| 1 | Raspon ("A1"). Font.Bold = Tačno |
ili za brisanje podebljanog oblikovanja:
| 1 | Raspon ("A1"). Font.Bold = Netačno |
Naziv fonta
Za promjenu naziva fonta koristite Ime nekretnina:
| 1 | Raspon ("A1"). Font.Name = "Calibri" |
| 1 | Raspon ("A1"). Font.Name = "Arial" |
| 1 | Raspon ("A1"). Font.Name = "Times New Roman" |
Stil ćelije
Excel nudi mogućnost stvaranja „stilova“ ćelije. Stilove možete pronaći u Početna vrpca> Stilovi:
Stilovi vam omogućuju spremanje željenog oblikovanja ćelija. Zatim dodijelite taj stil novoj ćeliji i odmah se primjenjuje cijelo oblikovanje ćelije. Uključujući veličinu fonta, boju ćelije, status zaštite ćelija i sve ostalo što je dostupno iz izbornika Oblikovanje ćelija:
Osobno, za mnoge modele na kojima radim obično stvaram stil ćelije "Unos":
| 1 | Raspon ("a1"). Stil = "Ulaz" |
Korištenjem stilova također možete lako identificirati vrste ćelija na svom radnom listu. Primjer u nastavku će proći kroz sve ćelije na radnom listu i promijeniti bilo koju ćeliju sa Style = “Input” u “InputLocked”:
| 1234567 | Prigušena ćelija kao rasponZa svaku ćeliju u ćelijama ActiveSheet.CellsAko je Cell.Style = "Unos" tadaCell.Style = "Ulaz zaključan"Završi akoSljedeća ćelija |
