Yksi muuttujatyyppi
VBA Yksittäinen tietotyyppiä käytetään numeroiden tallentamiseen, jotka vaativat desimaaleja. Se voi tallentaa arvoja -3.4028235E+38 --1,401298E -45 negatiivisille arvoille ja 1,401298E -45 -3.4028235E+38 positiivisille arvoille.
Voit ilmoittaa yksittäisen muuttujan käyttämällä Dim Statementia (lyhenne Dimension):
| 1 | Dim sngA Single |
Käytä sitten yhtäsuuruusmerkkiä määrittääksesi muuttujalle arvon:
| 1 | sngA = 3658,25 |
Tämän asettaminen menettelyyn näyttää tältä:
| 12345678 | Sub sngExample ()'ilmoita kaksinkertainen muuttujaDim sngA Single'täytä kaksinkertainen muuttujasngA = 3658,25'näytä viestiruutuMsgBox sngAEnd Sub |
Jos suoritat yllä olevan koodin, seuraava viestiruutu tulee näkyviin.
Kaksinkertainen tietotyyppi
Double -tietotyyppi on vain pidempi versio Yksittäinen tietotyyppi. Tästä syystä se voi vaikuttaa pyöristykseen, kun sitä käytetään menetelmässä Yksittäinen tietotyyppi pyöristää neljään desimaaliin, kun taas Kaksinkertainen tietotyyppi pyöristää 12 desimaaliin. Jos tarvitset enemmän kuin neljä desimaalia, voit käyttää kaksoisdatatyyppiä.
Int tai pitkät tietotyypit
Jos et tarvitse desimaalia, voit käyttää joko sisäistä tai pitkää tietotyyppiä.
| 1 | Dim intA kokonaislukuna |
| 1 | Dim lngB niin pitkä |
VBA -ohjelmointi | Koodigeneraattori toimii sinulle!
Ilmoita yksittäinen muuttuja moduulissa tai globaalilla tasolla
Edellisissä esimerkeissä olemme ilmoittaneet Yksittäinen muuttuja menettelyn sisällä. Proseduurilla ilmoitettuja muuttujia voidaan käyttää vain kyseisen menettelyn sisällä.
Sen sijaan voit ilmoittaa yksittäisiä muuttujia moduuli- tai globaalitasolla.
Moduulitaso
Moduulitaso muuttujat ilmoitetaan koodimoduulien yläosassa Himmeä lausunto.
Näitä muuttujia voidaan käyttää minkä tahansa koodimoduulin toimenpiteen kanssa.
Globaali taso
Globaali taso muuttujat ilmoitetaan myös koodimoduulien yläosassa. Sen sijaan, että käytät Himmeä lause, käytä Julkinen lausunto osoittaa, että Yksittäinen muuttuja on käytettävissä käytettäväksi koko VBA -projektisi aikana.
| 1 | Julkinen SngA sinkkuna |
Jos julistaisit Yksittäinen muuttuja moduulitasolla ja yritä sitten käyttää sitä toisessa moduulissa, tapahtuu virhe.
Jos olisit kuitenkin käyttänyt julkista avainsanaa ilmoittaaksesi Yksittäinen muuttuja, virhe ei ilmenisi ja menettely toimisi täydellisesti.
Oletko kyllästynyt etsimään esimerkkejä VBA -koodista? Kokeile AutoMacroa!
Muoto Single Tallennettu merkkijonona
Joskus haluat muotoilla yksittäisen tietotyypin merkkijonoksi - esimerkiksi haluat näyttää valuuttasymbolin ja pyöristää luvun 2 desimaaliin.
Tämän saavuttamiseksi käytä Muoto -toimintoa.
Seuraava menettely
| 1234567891011 | AlatestiSingleToCurrencyString ()'julistaa merkkijonomuuttujanDim strMoney merkkijonona'julista sinkku ja täytä arvoDim sngValue SinglesngValue = 44055.256'muuntaa singlen merkkijonoksi, jossa on valuuttasymboli, jossa on kaksi desimaaliastrMoney = Muoto (sngValue, "$#, ## 0.00")'katso tulosMsgBox strMoneyEnd Sub |
palauttaisi tämän tuloksen:
Samoin saatat haluta näyttää numeron muotoilluna puhelinnumerona.
Tämä menettely:
| 1234567891011 | AlatestiYksi puhelin ()'julistaa merkkijonomuuttujanHimmennä puhelinta merkkijonona'julista sinkku ja täytä arvoDim sglValue SinglesglValue = 555968541'muuntaa singlen merkkijonoksi, jossa on valuuttasymbolistrPhone = Muoto (sglValue, "(000) -000 0000")'katso tulosMsgBox strPhoneEnd Sub |
palauttaisi tämän tuloksen:
