Enkelt variabel type
VBA Enkelt datatype brukes til å lagre tall som krever desimaler. Den kan lagre fra -3.4028235E+38 til -1.401298E -45 for negative verdier og fra 1.401298E -45 til 3.4028235E+38 for positive verdier.
For å deklarere en enkelt variabel, bruker du Dim Statement (forkortelse for Dimension):
1 | Dim sngA som singel |
For deretter å tilordne en verdi til en variabel, bare bruk likhetstegnet:
1 | sngA = 3658,25 |
Å sette dette inn i en prosedyre ser slik ut:
12345678 | Sub sngExample ()'erklærer den dobbelte variabelenDim sngA som singel'fyll ut den dobbelte variabelensngA = 3658,25'vis meldingsboksenMsgBox sngASlutt Sub |
Hvis du kjører koden ovenfor, vises følgende meldingsboks.
Dobbel datatype
Den doble datatypen er bare en lengre versjon av Enkelt data-type. På grunn av dette faktum kan det påvirke avrundingen når det brukes i en prosedyre som Enkelt datatype vil avrunde til 4 desimaler, mens Dobbelt datatype vil avrunde til 12 desimaler. Hvis du trenger mer enn 4 desimaler, kan du bruke den doble datatypen.
Int eller lange datatyper
Hvis du ikke trenger en desimal, kan du enten bruke Int datatype eller Lang datatype.
1 | Dim intA som heltall |
1 | Dim lngB som lang |
VBA -programmering | Kodegenerator fungerer for deg!
Erklær enkel variabel på modul eller globalt nivå
I de foregående eksemplene har vi erklært Enkelt variabel i en prosedyre. Variabler deklarert med en prosedyre kan bare brukes innenfor denne prosedyren.
I stedet kan du deklarere enkeltvariabler på modul- eller globalt nivå.
Modulenivå
Modulenivå variabler deklareres øverst i kodemodulene med Dim uttalelse.
Disse variablene kan brukes med alle prosedyrer i den kodemodulen.
Globalt nivå
Globalt nivå variabler deklareres også øverst i kodemodulene. Imidlertid, i stedet for å bruke Dim uttalelse, bruk Offentlig uttalelse for å indikere at Enkelt variabel er tilgjengelig for bruk i hele ditt VBA -prosjekt.
1 | Offentlig SngA som singel |
Hvis du skulle erklære Enkelt variabel på modulnivå og deretter prøve å bruke den i en annen modul, vil det oppstå en feil.
Imidlertid, hvis du hadde brukt det offentlige søkeordet for å erklære Enkelt variabel, ville feilen ikke oppstå og prosedyren ville kjøre perfekt.
Lei av å søke etter eksempler på VBA -kode? Prøv AutoMacro!
Format Enkelt lagret som streng
Det kan være et tidspunkt hvor du ønsker å formatere en enkelt datatype til en streng - for eksempel vil du kanskje vise et valutasymbol og avrunde tallet til 2 desimaler.
For å oppnå dette, bruker du Format -funksjonen.
Følgende prosedyre
1234567891011 | Sub TestSingleToCurrencyString ()'erklærer strengvariabelenDim strPenger som streng'erklær singelen og fyll ut verdienDim sngValue As SinglesngValue = 44055,256'konverter singelen til en streng med et valutasymbol med 2 desimalerstrMoney = Format (sngValue, "$#, ## 0.00")'se resultatetMsgBox strPengerSlutt Sub |
vil returnere dette resultatet:
På samme måte vil du kanskje vise et nummer som et formatert telefonnummer.
Denne fremgangsmåten:
1234567891011 | Sub TestSingleToPhone ()'erklærer strengvariabelenDim strPhone As String'erklær singelen og fyll ut verdienDim sglValue Som singelsglValue = 555968541'konverter singelen til en streng med et valutasymbolstrPhone = Format (sglValue, "(000) -000 0000")'se resultatetMsgBox strPhoneSlutt Sub |
vil returnere dette resultatet: