VBA lang
Vroeger, toen geheugen erg duur was, moesten we het beheren door getallen voor getallen te gebruiken. Maar na de technologische evolutie kwam de behoefte aan een groter aantal variabelen in beeld. Met behulp van een variabele Integer konden we alleen de nummers van -32768 tot +32768 opslaan. Maar nu hebben we de variabele LONG die wordt gebruikt voor het opslaan en gebruiken van de nummers van elk bereik en elke lengte. Voor lange en lange code wordt het aanbevolen om de variabele Long te gebruiken.
Hoe Excel VBA lang te gebruiken?
We zullen leren hoe een VBA Long te gebruiken met enkele voorbeelden in Excel.
U kunt deze VBA Lange Excel-sjabloon hier downloaden - VBA Lange Excel-sjabloonVBA Long - Voorbeeld # 1
In dit voorbeeld zullen we zien, basisgebruik van hoe VBA Long voor getallen kan werken. Hiervoor hebben we een module nodig.
Stap 1: Ga naar het VBA-venster en selecteer in de menulijst Invoegen de module zoals hieronder getoond.
Stap 2: Zodra we dat doen, krijgen we een lege pagina van Module. Schrijf daar nu de subcategorie in een willekeurige naam, maar beter zou het moeten zijn in de naam van een uitgevoerde functie, zoals VBA Long.
Code:
Sub VBALong1 () Einde Sub
Stap 3: Definieer nu een dimensie DIM zoals A of een ander alfabet en letter die kan worden gebruikt.
Code:
Sub VBALong1 () Dim A End Sub
Stap 4: En wijs de variabele Long toe aan dimensie A.
Code:
Sub VBALong1 () Dim A As Long End Sub
Stap 5: Nu zullen we een nummer toewijzen, laten we eens kijken naar een 2-cijferig nummer van 10 zoals hieronder weergegeven.
Code:
Sub VBALong1 () Dim A Zo lang A = 10 Einde Sub
Stap 6: Nu zullen we een berichtenvak gebruiken om de waarde af te drukken die is opgeslagen in variabele Long met dimensie A.
Code:
Sub VBALong1 () Dim A zo lang A = 10 MsgBox A End Sub
Stap 7: compileer nu de geschreven code en voer deze uit door op de afspeelknop te klikken.
Zoals we kunnen zien, wordt de waarde die is opgeslagen in dimensie A nu afgedrukt in een berichtvenster. Dit toont aan dat de variabele lange cabine ook wordt gebruikt voor lage cijfers.
VBA Long - Voorbeeld # 2
In dit voorbeeld zullen we nummeren met meerdere cijfers erin. We gebruiken ca. 9 tot 10 cijfers om te begrijpen of variabele Long op dezelfde manier werkt als voor twee cijfers. Voor deze:
Stap 1: Open opnieuw een nieuwe module en voeg een subcategorie toe in de naam van de opeenvolgende VBA Lange naam zoals hieronder getoond.
Code:
Sub VBALong2 () Einde Sub
Stap 2: Definieer nu een dimensie DIM zoals A of een ander alfabet of woord dat kan worden gebruikt.
Code:
Sub VBALong2 () Dim A End Sub
Stap 3: Daarna wijzen we de variabele functie Lang toe aan dimensie A.
Code:
Sub VBALong2 () Dim A As Long End Sub
Stap 4: wijs nu een numerieke waarde toe aan dimensie A van elke lengte. Overweeg voor het testen 9 tot 10 cijferige nummers of een combinatie. We hebben er 123123123 voor overwogen, zoals hieronder getoond.
Code:
Sub VBALong2 () Dim A zo lang A = 123123123 Einde Sub
Stap 5: Nu zullen we het berichtenvak gebruiken om opgeslagen waarden in A af te drukken, zoals hieronder getoond.
Code:
Sub VBALong2 () Dim A zo lang A = 123123123 MsgBox A End Sub
Stap 6: Nu zullen we de code compileren en uitvoeren. We zullen zien dat zelfs een lange numerieke waarde in een berichtvenster is afgedrukt.
VBA Long - Voorbeeld # 3
In dit voorbeeld zullen we zien of de variabele functie Long kan worden gebruikt voor negatieve getallen of niet. Hiervoor is een nieuwe module nodig. Open een nieuwe module
Stap 1: voeg een subcategorie in een naam of beter in de naam van VBA Long in, zoals hieronder wordt weergegeven.
Code:
Sub VBALong3 () Einde Sub
Stap 2: Beschouw dezelfde dimensie DIM A en wijs deze de functie Lang toe zoals hieronder wordt getoond.
Code:
Sub VBALong3 () Dim A As Long End Sub
Stap 3: Nu zullen we hetzelfde nummer gebruiken als in het vorige voorbeeld, 123123123, en dit een negatief teken geven. En wijs dit nummer toe aan Lange dimensie A zoals hieronder weergegeven.
Code:
Sub VBALong3 () Dim A zo lang A = -123123123 End Sub
Stap 4: Gebruik ten slotte een berichtenvak om de waarde af te drukken die is opgeslagen in dimensie A.
Code:
Sub VBALong3 () Dim A zo lang A = -123123123 MsgBox A End Sub
Stap 5: compileer de code en voer hem daarna uit. We zullen zien, zelfs als het nummer het lange en negatieve maar nog steeds VBA Long het zonder enige fout heeft afgedrukt.
VBA Long - Voorbeeld # 4
In dit voorbeeld zullen we zien of we decimale getallen met VBA Long kunnen gebruiken of niet. Hiervoor hebben we een module nodig.
Stap 1: Open een nieuwe module, maak de subcategorie voor VBA Long aan zoals hieronder getoond. U mag de codereeks behouden zoals we hieronder hebben gedaan.
Code:
Sub VBALong4 () Einde Sub
Stap 2: Nu zullen we dezelfde dimensie DIM gebruiken als A zoals we in de bovenstaande voorbeelden hebben gebruikt.
Code:
Sub VBALong4 () Dim A End Sub
Stap 3: Ken nu deze dimensie toe aan Long zoals hieronder getoond.
Code:
Sub VBALong4 () Dim A As Long End Sub
Stap 4: Nu gebruiken we dezelfde nummers als in het bovenstaande voorbeeld, maar hier gebruiken we een decimaal cijfer. Dus 123.123123 is hier het nummer zoals hieronder weergegeven.
Code:
Sub VBALong4 () Dim A zo lang A = 123.123123 Einde Sub
Stap 5: Eindelijk kunnen we het berichtenvak gebruiken om de waarde af te drukken die is opgeslagen in A zoals hieronder getoond.
Code:
Sub VBALong4 () Dim A zo lang A = 123.123123 MsgBox A End Sub
Stap 6: compileer nu de code en voer uit. We zullen zien dat VBA Long alleen hele getallen heeft geretourneerd die voor de komma staan, zoals hieronder weergegeven.
Dit laat zien dat VBA Long niet kan worden gebruikt voor decimale getallen. Het geeft een geheel of een geheel getal terug.
VBA Long - Voorbeeld # 5
In dit voorbeeld zullen we zien of we VBA Long kunnen gebruiken voor werken, alfabetten of testen of niet. Open een module
Stap 1: Schrijf een subcategorie van de functie voor VBA Long of in een andere voorkeursnaam zoals hieronder weergegeven.
Code:
Sub VBALong5 () Einde Sub
Stap 2: Gebruik in de volgende coderegel dimensie DIM A zolang als hieronder wordt getoond.
Code:
Sub VBALong5 () Dim A As Long End Sub
Stap 3: wijs nu elke tekst of woord toe aan gedefinieerde dimensie A in omgekeerde komma's. We hebben VBA Long hier als tekst gebruikt.
Code:
Sub VBALong5 () Dim A zo lang A = "VBA Long" End Sub
Stap 4: Gebruik nu het berichtenvak om af te drukken naar waardeopslag in dimensie A zoals hieronder weergegeven.
Code:
Sub VBALong5 () Dim A zo lang A = "VBA Long" MsgBox A End Sub
Stap 5: compileer de code of voer direct uit als u klaar bent met coderen. We zullen een foutmelding zien met de foutmelding "Run-time error 13 - Type Mismatch" zal verschijnen.
Dit betekent dat er een verkeerde combinatie van gebruikte variabele en waarden is opgeslagen die niet wordt ondersteund. Het laat dus zien dat VBA Long geen tekst en alfabetten ondersteunt.
Voordelen van VBA Long
- Elke lengte numerieke waarden kunnen worden gebruikt in een lange functie.
- Long in VBA maakt het gebruik voor nummer vrij van eventuele beperkingen.
Dingen om te onthouden
- Long kan niet worden gebruikt voor teksten en decimale getallen.
- Voor een decimaal getal hebben Double over Long en Integer de voorkeur.
- Als de codelengte kort is, hoeft u de gegevens niet stapsgewijs te compileren.
- Vergeet niet om het bestand op te slaan als Macro Schakel het Excel-formaat in zodat de gemaakte code veilig blijft.
Aanbevolen artikelen
Dit is een handleiding voor VBA Long geweest. Hier hebben we besproken hoe u Excel VBA Long kunt gebruiken, samen met praktische voorbeelden en een downloadbare Excel-sjabloon. U kunt ook onze andere voorgestelde artikelen doornemen -
- Werken met VBA Active Cell
- Een rij verwijderen in VBA
- Hoe Excel VBA Transpose gebruiken?
- Hoe 1004 Fout met behulp van VBA te repareren