VBA Cell -kirjasin
VBA: ssa voit muuttaa kirjasimen ominaisuuksia käyttämällä Range -objektin VBA -kirjasinominaisuutta. Kirjoita seuraava koodi VBA -editoriin ja näet luettelon kaikista käytettävissä olevista vaihtoehdoista:
1 | Alue ("A1). Fontti. |
Keskustelemme muutamista yleisimmistä ominaisuuksista alla.
Vaihda fontin väri
Fontin värit voidaan asettaa muutamalla tavalla.
vbVäri
Helpoin tapa asettaa värit on vbColors:
1 | Alue ("a1"). Font.Color = vbRed |
Olet kuitenkin hyvin rajallinen saatavilla olevien värien suhteen. Nämä ovat ainoat käytettävissä olevat vaihtoehdot:
Väri - RGB
Voit myös asettaa värit RGB: n (punainen vihreä sininen) perusteella. Tässä syötät punaisen, vihreän ja sinisen väriarvot välillä 0-255. Näiden kolmen värin avulla voit tehdä minkä tahansa värin:
1 | Alue ("a1"). Font.Color = RGB (255255,0) |
Väriindeksi
VBA / Excelissä on myös ColorIndex -ominaisuus. Tämä mahdollistaa valmiiden värien saatavuuden. Ne tallennetaan kuitenkin indeksinumeroina, minkä vuoksi on vaikea tietää, mikä väri on mikä:
1 | Alue ("a1"). Font.ColorIndex =… |
Kirjoitimme artikkelin VBA -värikoodeista, mukaan lukien luettelon VBA ColorIndex -koodeista. Siellä voit oppia lisää väreistä.
Fonttikoko
Tämä asettaa fontin kooksi 12:
1 | Alue ("a1"). Font.Size = 12 |
tai 16:
1 | Alue ("a1"). Font.Size = 16 |
Lihavoitu kirjasin
Solun fontiksi on helppo asettaa lihavoitu:
1 | Alue ("A1"). Font.Bold = Tosi |
tai poista lihavoitu muotoilu:
1 | Alue ("A1"). Font.Bold = False |
Fontin nimi
Jos haluat vaihtaa fontin nimen, käytä Nimi omaisuus:
1 | Alue ("A1"). Font.Name = "Calibri" |
1 | Alue ("A1"). Font.Name = "Arial" |
1 | Alue ("A1"). Font.Name = "Times New Roman" |
Solutyyli
Excel tarjoaa mahdollisuuden luoda solutyylejä. Tyyliä löytyy Etusivu Nauha> Tyylit:
Tyylien avulla voit tallentaa haluamasi solumuotoilun. Määritä sitten kyseinen tyyli uudelle solulle ja kaikki solujen muotoilut otetaan välittömästi käyttöön. Sisältää fontin koon, solun värin, solun suojauksen tilan ja kaiken muun, joka on saatavilla solun muotoiluvalikosta:
Henkilökohtaisesti luon useille malleille, joilla työskentelen, yleensä "Input" -solutyylin:
1 | Alue ("a1"). Tyyli = "Tulo" |
Käyttämällä tyylejä voit myös helposti tunnistaa laskentataulukon solutyypit. Alla oleva esimerkki kiertää kaikki laskentataulukon solut ja muuttaa minkä tahansa solun, jonka Style = “Input” on “InputLocked”:
1234567 | Dim -solu alueenaJokaiselle ActiveSheet.Cells -solulleJos Cell.Style = "Input" niinCell.Style = "InputLocked"Loppu JosSeuraava solu |