Einzelner Variablentyp
Die VBA Einzel Datentyp wird verwendet, um Zahlen zu speichern, die Dezimalstellen erfordern. Er kann von -3.4028235E+38 bis -1.401298E-45 für negative Werte und von 1.401298E-45 bis 3.4028235E+38 für positive Werte speichern.
Um eine Single-Variable zu deklarieren, verwenden Sie die Dim-Anweisung (kurz für Dimension):
| 1 | Dim sngA als Single |
Um dann einer Variablen einen Wert zuzuweisen, verwenden Sie einfach das Gleichheitszeichen:
| 1 | sngA = 3658,25 |
Das Einfügen in eine Prozedur sieht so aus:
| 12345678 | Sub sngExample()'deklariere die DoppelvariableDim sngA als Single'die doppelte Variable auffüllensngA = 3658,25'zeige die NachrichtenboxMsgBox sngAEnd Sub |
Wenn Sie den obigen Code ausführen, wird das folgende Meldungsfeld angezeigt.
Doppelter Datentyp
Der Double-Datentyp ist nur eine längere Version des Einzel Datentyp. Aufgrund dieser Tatsache kann es die Rundung bewirken, wenn es in einem Verfahren als Einzel Datentyp wird auf 4 Dezimalstellen gerundet, während der Doppelt Datentyp rundet auf 12 Dezimalstellen. Wenn Sie mehr als 4 Dezimalstellen benötigen, können Sie den Datentyp Double verwenden.
Int- oder Long-Datentypen
Wenn Sie keine Dezimalstelle benötigen, können Sie entweder den Datentyp Int oder den Datentyp Long verwenden.
| 1 | Dim intA als Integer |
| 1 | Dim LngB als Long |
VBA-Programmierung | Code Generator arbeitet für Sie!
Einzelne Variable auf Modul- oder globaler Ebene deklarieren
In den vorherigen Beispielen haben wir die deklariert Einzel Variable innerhalb einer Prozedur. Mit einer Prozedur deklarierte Variablen können nur innerhalb dieser Prozedur verwendet werden.
Stattdessen können Sie Single-Variablen auf Modul- oder globaler Ebene deklarieren.
Modulebene
Modulebene Variablen werden am Anfang von Codemodulen mit dem deklariert Dim Stellungnahme.
Diese Variablen können mit jeder Prozedur in diesem Codemodul verwendet werden.
Globale Ebene
Globale Ebene Variablen werden auch am Anfang von Codemodulen deklariert. Anstatt jedoch die Dim Anweisung, verwenden Sie die Öffentlich Aussage, die darauf hindeutet, dass die Einzel Variable steht für die Verwendung in Ihrem gesamten VBA-Projekt zur Verfügung.
| 1 | Öffentlicher SngA als Single |
Wenn Sie die Einzel Variable auf Modulebene und versuchen Sie dann, sie in einem anderen Modul zu verwenden, würde ein Fehler auftreten.
Wenn Sie jedoch das Schlüsselwort Public verwendet hätten, um die Einzel Variable würde der Fehler nicht auftreten und die Prozedur würde perfekt ablaufen.
Sind Sie es leid, nach VBA-Codebeispielen zu suchen? Probieren Sie AutoMacro aus!
Einzeln als String gespeichert formatieren
Es kann vorkommen, dass Sie einen einzelnen Datentyp in eine Zeichenfolge formatieren möchten - zum Beispiel möchten Sie ein Währungssymbol anzeigen und die Zahl auf 2 Dezimalstellen runden.
Dazu verwenden Sie die Format-Funktion.
Das folgende Verfahren
| 1234567891011 | UntertestSingleToCurrencyString()'String-Variable deklarierenDim strMoney As String'deklariere die Single und befülle den WertsngValue als Single dimmensngWert = 44055,256'konvertieren Sie die Single in eine Zeichenfolge mit einem Währungssymbol mit 2 DezimalstellenstrMoney = Format(sngValue , "$#,##0.00")'Ergebnis ansehenMsgBox strMoneyEnd Sub |
würde dieses Ergebnis zurückgeben:
Ebenso möchten Sie möglicherweise eine Nummer als formatierte Telefonnummer anzeigen.
Dieses Verfahren:
| 1234567891011 | UntertestSingleToPhone()'String-Variable deklarierenstrPhone als String dimmen'deklariere die Single und befülle den WertDim sglValue As singlesglWert = 555968541'konvertieren Sie die Single in eine Zeichenfolge mit einem WährungssymbolstrPhone = Format(sglValue , "(000)-000 0000")'Ergebnis ansehenMsgBox strPhoneEnd Sub |
würde dieses Ergebnis zurückgeben:
