Enkele variabele type
de VBA Enkel gegevenstype wordt gebruikt om getallen op te slaan waarvoor decimalen vereist zijn. Het kan opslaan van -3.4028235E+38 tot -1.401298E-45 voor negatieve waarden en van 1.401298E-45 tot 3.4028235E+38 voor positieve waarden.
Om een enkele variabele te declareren, gebruikt u de Dim Statement (afkorting van Dimension):
| 1 | Dim sngA als Single |
Om vervolgens een waarde aan een variabele toe te kennen, gebruikt u eenvoudig het gelijkteken:
| 1 | sngA = 3658.25 |
Dit in een procedure zetten ziet er als volgt uit:
| 12345678 | Sub sngVoorbeeld()'declareer de dubbele variabele'Dim sngA als Single'vul de dubbele variabele in'sngA = 3658.25'toon het berichtvenster'MsgBox sngAEinde sub |
Als u de bovenstaande code uitvoert, wordt het volgende berichtvenster weergegeven.
Dubbel gegevenstype
Het gegevenstype Double is slechts een langere versie van de Enkel data type. Vanwege dit feit kan het de afronding beïnvloeden wanneer het in een procedure wordt gebruikt als de Enkel gegevenstype wordt afgerond op 4 decimalen, terwijl de Dubbele gegevenstype wordt afgerond op 12 decimalen. Als u meer dan 4 decimalen nodig heeft, kunt u het gegevenstype Dubbel gebruiken.
Int of Long gegevenstypen
Als u geen decimale plaats nodig heeft, kunt u het gegevenstype Int of het gegevenstype Long gebruiken.
| 1 | Dim intA als geheel getal |
| 1 | Dim lngB zo lang |
VBA-programmering | Code Generator werkt voor u!
Enkele variabele declareren op module- of globaal niveau
In de vorige voorbeelden hebben we de . gedeclareerd Enkel variabele binnen een procedure. Variabelen gedeclareerd met een procedure kunnen alleen binnen die procedure worden gebruikt.
In plaats daarvan kunt u enkele variabelen declareren op module- of globaal niveau.
Moduleniveau
Moduleniveau variabelen worden bovenaan codemodules gedeclareerd met de dim uitspraak.
Deze variabelen kunnen bij elke procedure in die codemodule worden gebruikt.
Globaal niveau
Globaal niveau variabelen worden ook gedeclareerd bovenaan codemodules. Echter, in plaats van de dim verklaring, gebruik de Openbaar verklaring om aan te geven dat de Enkel variabele is beschikbaar voor gebruik in uw VBA-project.
| 1 | Openbare SngA als Single |
Als u de zou aangeven Enkel variabele op moduleniveau en deze vervolgens in een andere module probeert te gebruiken, zou er een fout optreden.
Als u echter het trefwoord Public had gebruikt om de Enkel variabele, zou de fout niet optreden en zou de procedure perfect verlopen.
Moe van het zoeken naar voorbeelden van VBA-codes? Probeer AutoMacro!
Formaat Single opgeslagen als string
Er kan een tijd zijn dat u een enkel gegevenstype wilt opmaken als een tekenreeks - u wilt bijvoorbeeld een valutasymbool weergeven en het getal afronden op 2 decimalen.
Hiervoor gebruik je de functie Opmaak.
De volgende procedure:
| 1234567891011 | SubtestSingleToCurrencyString()'declareer de stringvariabele'Dim strGeld als string'declareer de single en vul de waarde in'Dim sngWaarde als singlesngWaarde = 44055.256'converteer de single naar een string met een valutasymbool met 2 decimalen'strMoney = Format(sngValue , "$#,##0.00")'bekijk het resultaat'MsgBox strGeldEinde sub |
zou dit resultaat retourneren:
Op dezelfde manier wilt u misschien een nummer weergeven als een opgemaakt telefoonnummer.
Deze procedure:
| 1234567891011 | SubtestSingleToPhone()'declareer de stringvariabele'Dim strTelefoon als string'declareer de single en vul de waarde in'Dim sglValue Als singlesglWaarde = 555968541'converteer de single naar een string met een valutasymbool'strPhone = Formaat (sglValue , "(000)-000 0000")'bekijk het resultaat'MsgBox strTelefoonEinde sub |
zou dit resultaat retourneren:
