VBA -muoto

Sisällysluettelo

Tämä opetusohjelma osoittaa, miten Muoto -toimintoa käytetään.

Muoto -toiminto

Muotoile numerot ennalta määritetyillä muodoilla

Muotoilutoiminto voi muuntaa luvun merkkijonoksi, joka on muotoiltu ennalta määrätyillä nimetyillä numeerisilla muodoilla. Näitä esimääritettyjä muotoja ovat Valuutta, Kiinteä, Vakio, Prosentti, Tieteellinen, Kyllä/Ei, Totta/epätosi ja Päällä/Pois.

12345678910111213141516171819202122232425262728293031 AlaformaattiEsimerkki_1 ()MsgBox -muoto (1234567.8) 'Tulos: 1234567.8"Muoto jättää numeron sellaisenaanMsgBox -muodon (1234567.8, "Valuutta") tulos on: 1 234 567,80 dollaria'Valuutta käyttää järjestelmän valuutta -asetuksiaMsgBox Format (1234567.8, "Fixed") 'Tulos: 1234567.80'Kiinteä: Vähintään yksi numero ennen desimaalipistettä ja'käyttää järjestelmäasetuksia desimaaliosalleMsgBox -muoto (1234567.8, "vakio") 'Tulos on: 1 234 567,80'Vakio: Tuhannet erottimet ja vakiojärjestelmäMsgBox Format (1234567.8, "Prosentti") 'Tulos: 123456780.00%'Prosentti, kerrotaan 100: lla prosentilla ja vakiojärjestelmällä.MsgBox -muoto (1234567.8, "Tieteellinen") 'Tulos: 1.23E+06'Tieteellinen merkintätapaMsgBox -muoto (1234567.8, "Kyllä/Ei") 'Tulos on: Kyllä'Ei, jos luku on nollaMsgBox Format (1234567.8, "True/False") 'Tulos on: True'Väärä, jos luku on nollaMsgBox Format (1234567.8, "On/Off") 'Tulos on: Päällä'Pois päältä, jos numero on nollaEnd Sub

Muotoile numerot käyttäjän määrittämillä muodoilla

Muotoilutoiminto voi muuntaa luvun merkkijonoksi, muotoilluksi käyttäjän määrittämäksi numeeriseksi muotoksi. 0 on merkkipaikka, joka näyttää numeron tai nollan. # on merkkipaikka, joka näyttää numeron tai ei mitään. Piste (.) On desimaalipaikkamerkki, % on paikkamerkin prosenttiosuus ja pilkku (,) on tuhannen erotin. Tekstiä voidaan lisätä muotoon käyttämällä lainausmerkkejä (“”) ja yksi merkki voidaan lisätä, jos sitä käytetään vinoviivan (\) jälkeen.

1234567891011 AlaformaattiEsimerkki_2 ()MsgBox -muoto (7.8, "000.00") 'Tulos: 007.80MsgBox -muoto (12347.8356, "000.00") 'Tulos: 12347.84MsgBox -muoto (7.8, "###. ##") 'Tulos on: 7.8MsgBox -muoto (12347.8356, "###. ##") 'Tulos: 12347.84MsgBox -muoto (7.8, "\ $. 00") 'Tulos on: 7,80 dollariaMsgBox -muoto (1237.835, "ABA0.00") 'Tulos: ABA1237.84MsgBox -muoto (12347.8356, "000.00%") 'Tulos: 1234783.56%MsgBox -muoto (12347.8356, " %000.00") 'Tulos: %12347.84End Sub

Muotoile numerot arvoista riippuen

Muotoilutoiminnolla voi olla eri osia, jotka käyttävät erilaisia ​​muotoilusääntöjä positiivisille numeroille, negatiivisille numeroille, nollalle ja nollelle. Nämä osat erotetaan puolipisteellä.

1234567 AlamuotoExample_3 ()MsgBox -muoto (7.8, "000.00; (000.00); \ z \ e \ r \ o; ei mitään") 'Tulos on: 007.80MsgBox-muoto (-7,8, "000,00; (000,00); \ z \ e \ r \ o; ei mitään") 'Tulos on: (007.80)MsgBox -muoto (0, "000.00; (000.00); \ z \ e \ r \ o; nothing") 'Tulos on: nollaMsgBox -muoto (Null, "000.00; (000.00); \ z \ e \ r \ o; nothing") 'Tulos on: ei mitäänEnd Sub

Muotoile päivämäärät ennalta määritetyillä muodoilla

Muotoilutoiminto voi muotoilla päivämääriä eri ennalta määritetyillä muodoilla. Nämä muodot ovat pitkiä, keskikokoisia ja lyhyitä päivämääriä sekä pitkiä, keskikokoisia ja lyhyitä aikoja.

1234567891011121314 AlamuotoExample_4 ()Dim DateEx PäivämääränäDateEx = #4/18/2020 19:35:56 PM #MsgBox -muoto (DateEx, "Yleinen päivämäärä") 'Tulos: 18.4.2020 19:35:56 PMMsgBox Format (DateEx, "Long Date") 'Tulos: lauantai 18. huhtikuuta 2022MsgBox-muoto (DateEx, "Medium Date") 'Tulos: 18.4.20MsgBox -muoto (DateEx, "Lyhyt päivämäärä") 'Tulos: 18.4.2020MsgBox -muoto (DateEx, "Long Time") 'Tulos: 19:35:56 PMMsgBox -muoto (DateEx, "Medium Time") 'Tulos: 07:35 PMMsgBox Format (DateEx, "Short Time") 'Tulos on: 19:35End Sub

Muotoile päivämäärät käyttäjän määrittämillä muodoilla

Muotoilutoiminto voi muotoilla päivämäärät käyttäjän määrittämillä muodoilla. Merkkejä, kuten d, m, y, w, q, voidaan käyttää mukautettujen päivämäärämuotojen luomiseen.

123456789101112131415161718192021222324 AlamuotoExample_5 ()Dim DateEx PäivämääränäDateEx = #4/18/2020 19:35:56 PM #MsgBox -muoto (DateEx, "m/d/yy") 'Tulos: 18.4.2020MsgBox-muoto (DateEx, "mm-dd-yy") 'Tulos: 18.04.2020MsgBox-muoto (DateEx, "mmm-dd-yy") 'Tulos: 18.4.2020MsgBox-muoto (DateEx, "mmmm-dd-yy") 'Tulos: 18.4.2020MsgBox-muoto (DateEx, "mm-ddd-yy") 'Tulos: 04-la-2020MsgBox-muoto (DateEx, "mm-dddd-yy") 'Tulos: 04-lauantai-2020MsgBox -muoto (DateEx, "y")'Tulos: 109'' päivien lukumäärä vuonna 1-366MsgBox -muoto (DateEx, "ww")'Tulos: 16'' viikkojen lukumäärä vuonna 1-52MsgBox -muoto (DateEx, "q")'Tulos on: 2'vuosineljännes vuonna 1-4End Sub

Merkkejä, kuten h, n, s ja am, pm yhdistelmiä, voidaan käyttää mukautettujen aikamuotojen luomiseen.

123456789101112 AlamuotoExample_6 ()Dim DateEx PäivämääränäDateEx = #4/18/2020 19:06:05 PM #MsgBox -muoto (DateEx, "h: n: s") 'Tulos: 19: 6: 5MsgBox -muoto (DateEx, "hh: nn: ss") 'Tulos: 19:06:05MsgBox -muoto (DateEx, "hh: nn: ss am/pm") 'Tulos: 07:06:05 pmMsgBox -muoto (DateEx, "hh: nn: ss AM/PM") 'Tulos: 07:06:05 PMMsgBox -muoto (DateEx, "hh: nn: ss a/p") 'Tulos: 07:06:05 pMsgBox -muoto (DateEx, "hh: nn: ss A/P") 'Tulos: 07:06:05 PEnd Sub

Muoto parempaa luettavuutta varten

Muotoilutoiminto voi muotoilla merkkijonoja tai numeroita luettavuuden parantamiseksi. @ on merkkipaikkamerkki, jota käytetään merkin tai välilyönnin näyttämiseen. & on merkkipaikkamerkki, jota käytetään näyttämään merkki tai ei mitään. ! voidaan käyttää merkkien paikkamerkkejä vasemmalta oikealle, ja sitä voidaan käyttää pakottamaan pieniä tai isoja kirjaimia. Voi olla hyödyllinen puhelinnumeroiden tai muiden suurten numeroiden muotoilussa muuttamatta alkuperäistä arvoa.

12345678910111213141516171819202122 AlaformaattiEsimerkki_7 ()Dim StrEx merkkijononaStrEx = "ABCdef"MsgBox-muoto (StrEx, "-@@@-@@-@@") 'Tulos on:-AB-Cd-efMsgBox-muoto (StrEx, "-&&&-&&-&&") 'Tulos: -AB-Cd-ef'Alkaa oikealta vasemmalle.MsgBox-muoto (StrEx, "-@@@-@@-@@-@@") 'Tulos:--AB-Cd-efMsgBox-muoto (StrEx, "-&&&-&&-&&-&&") 'Tulos: --AB-Cd-ef'Alkaa oikealta vasemmalle. Kun merkkejä ei ole @ lisää välilyöntejä ja & ei lisää mitäänMsgBox-muoto (StrEx, "!-@@@-@@-@@-@@") 'Tulos: -ABC-de-f-MsgBox-muoto (StrEx, "!-&&&-&&-&&-&&") 'Tulos: -ABC-de-f'Alkaa vasemmalta oikealle, koska!MsgBox -muoto (StrEx, ">") 'Tulos on: ABCDEFMsgBox -muoto (StrEx, "<") 'Tulos on: abcdefMsgBox-muoto (1234567890, "@@@-@@@-@@@@") 'Tulos: 123-456-7890MsgBox-muoto (1234567890, "@@@@-@@@-@@@") 'Tulos: 1234-567-890End Sub

Muotoile mallit laskentataulukon soluissa

Muotoilutoimintoa voidaan käyttää VBA -koodissa ja myös laskentataulukkosoluissa. Valitse solu tai solualue ja seuraa valikon kohtaa Muotoile solut> Mukautettu. On olemassa monia käyttäjän määrittämiä muotoja, ja käyttäjä voi myös luoda omia mukautettuja muotoja.

Muotoile kuvioita tekstikaavalla

Muotoilutoiminto voi muuttaa suoraan VBA -koodin arvon muotoa. Voimme myös käyttää excel -tekstikaavaa saadaksemme saman tuloksen WorksheetFunction.Textin avulla.

1234567891011 AlamuotoExample_8 ()MsgBox -muoto (7.8, "000.00")'Tulos: 007.80MsgBox WorksheetFunction.Text (7.8, "000.00")'Tulos: 007.80MsgBox -muoto (7.8, "###. ##")'Tulos: 7.8MsgBox WorksheetFunction.Text (7.8, "###. ##")'Tulos: 7.8End Sub

Tulet auttaa kehittämään sivuston jakaminen sivu ystävillesi

wave wave wave wave wave