VBA celletype
I VBA kan du ændre skrifttypeegenskaber ved hjælp af egenskaben VBA -skrifttype for områdeobjektet. Indtast følgende kode i VBA Editor, og du får vist en liste over alle tilgængelige muligheder:
1 | Område ("A1). Font. |
Vi vil diskutere et par af de mest almindelige egenskaber nedenfor.
Skift skrifttypefarve
Der er et par måder at indstille skrifttypefarver på.
vbColor
Den nemmeste måde at indstille farver på er med vbColors:
1 | Område ("a1"). Font.Color = vbRed |
Du er dog meget begrænset med hensyn til tilgængelige farver. Disse er de eneste tilgængelige muligheder:
Farve - RGB
Du kan også indstille farver baseret på RGB (rød grøn blå). Her indtaster du farveværdier mellem 0-255 for rød, grøn og blå. Ved hjælp af disse tre farver kan du lave enhver farve:
1 | Område ("a1"). Font.Color = RGB (255.255,0) |
ColorIndex
VBA / Excel har også en ColorIndex -egenskab. Dette gør færdigbyggede farver tilgængelige for dig. De er dog gemt som indeksnumre, hvilket gør det svært at vide, hvilken farve der er:
1 | Område ("a1"). Font.ColorIndex = … |
Vi skrev en artikel om VBA -farvekoder, herunder en liste over VBA ColorIndex -koderne. Der kan du lære mere om farver.
Skriftstørrelse
Dette indstiller skriftstørrelsen til 12:
1 | Område ("a1"). Font.Size = 12 |
eller til 16:
1 | Område ("a1"). Font.Size = 16 |
Fed skrift
Det er let at indstille en celletype til fed skrift:
1 | Område ("A1"). Font.Bold = True |
eller for at slette fed formatering:
1 | Område ("A1"). Font.Bold = Falsk |
Fontnavn
For at ændre et skrifttypenavn skal du bruge Navn ejendom:
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 tilbyder muligheden for at oprette cellestiler. Der findes stilarter i Hjem bånd> Stilarter:
Stilarter giver dig mulighed for at gemme den ønskede celleformatering. Tildel derefter denne stil til en ny celle, og al celleformatering anvendes øjeblikkeligt. Inklusiv skrifttype, cellefarve, cellebeskyttelsesstatus og alt andet tilgængeligt fra menuen Celleformatering:
Personligt opretter jeg normalt for mange af de modeller, jeg arbejder med, en "Input" -cellestil:
1 | Område ("a1"). Style = "Input" |
Ved at bruge stilarter kan du også let identificere celletyper på dit regneark. Nedenstående eksempel går gennem alle cellerne i regnearket og ændrer enhver celle med Style = "Input" til "InputLocked":
1234567 | Dim celle som rækkeviddeFor hver celle i ActiveSheet.CellsHvis Cell.Style = "Input" derefterCell.Style = "InputLocked"Afslut HvisNæste celle |