VBA Cell Font - Endre farge, størrelse, stil og mer

VBA -celleskrift

I VBA kan du endre skriftegenskaper ved å bruke VBA -skriftegenskapen til områdeobjektet. Skriv inn følgende kode i VBA Editor, og du vil se en liste over alle tilgjengelige alternativer:

1 Område ("A1). Font.

Vi vil diskutere noen av de vanligste egenskapene nedenfor.

Endre skriftfarge

Det er noen få måter å angi skriftfarger på.

vbColor

Den enkleste måten å sette farger på er med vbColors:

1 Område ("a1"). Font.Color = vbRed

Du er imidlertid veldig begrenset når det gjelder tilgjengelige farger. Dette er de eneste tilgjengelige alternativene:

Farge - RGB

Du kan også angi farger basert på RGB (rød grønn blå). Her angir du fargeverdier mellom 0-255 for rødt, grønt og blått. Ved å bruke de tre fargene kan du lage hvilken som helst farge:

1 Område ("a1"). Font.Color = RGB (255,255,0)

ColorIndex

VBA / Excel har også en ColorIndex -egenskap. Dette gjør forhåndsbygde farger tilgjengelige for deg. De er imidlertid lagret som indeksnummer, noe som gjør det vanskelig å vite hvilken farge som er hva:

1 Område ("a1"). Font.ColorIndex = …

Vi skrev en artikkel om VBA -fargekoder, inkludert en liste over VBA ColorIndex -kodene. Der kan du lære mer om farger.

Skriftstørrelse

Dette vil sette skriftstørrelsen til 12:

1 Område ("a1"). Font.Size = 12

eller til 16:

1 Område ("a1"). Font.Size = 16

Fet skrift

Det er enkelt å sette en celletype til fet skrift:

1 Område ("A1"). Font.Bold = True

eller for å fjerne fet formatering:

1 Område ("A1"). Font.Bold = Falsk

Skriftnavn

For å endre et skriftnavn, bruk Navn eiendom:

1 Område ("A1"). Font.Name = "Calibri"
1 Område ("A1"). Font.Name = "Arial"
1 Område ("A1"). Font.Name = "Times New Roman"

Celle stil

Excel tilbyr muligheten til å lage cellestiler. Du finner stiler i Hjem bånd> Stiler:

Stiler lar deg lagre ønsket celleformatering. Tildel deretter denne stilen til en ny celle, og all celleformatering blir umiddelbart brukt. Inkludert skriftstørrelse, cellefarge, cellebeskyttelsesstatus og alt annet tilgjengelig fra Celleformateringsmenyen:

Personlig, for mange av modellene jeg jobber med, lager jeg vanligvis en "Input" cellestil:

1 Område ("a1"). Stil = "Inngang"

Ved å bruke stiler kan du også enkelt identifisere celletyper i regnearket. Eksemplet nedenfor går gjennom alle cellene i regnearket og endrer hvilken som helst celle med Style = "Input" til "InputLocked":

1234567 Dim Cell som RangeFor hver celle i ActiveSheet.CellsHvis Cell.Style = "Input" daCell.Style = "InputLocked"Slutt omNeste celle

Du vil bidra til utvikling av området, dele siden med vennene dine

wave wave wave wave wave