Vba: hoe de waarde van een cel in een variabele te lezen

U kunt de volgende syntaxis in VBA gebruiken om een celwaarde in een variabele te lezen:

 Sub ReadCellValueIntoVar()

Dim CellVal As String
CellVal = Range(" A1 ")

MsgBox CellVal

End Sub

Deze specifieke macro maakt een tekenreeksvariabele met de naam CellVal en leest vervolgens de waarde van cel A1 van het momenteel actieve blad in de variabele.

Ten slotte gebruiken we MsgBox om de waarde van deze variabele in een berichtenvenster weer te geven.

Het volgende voorbeeld laat zien hoe u deze syntaxis in de praktijk kunt gebruiken.

Voorbeeld: hoe u de waarde van een cel in een variabele in VBA leest

Stel dat we een Excel-werkblad hebben met een waarde van 500 in cel A1 :

We kunnen de volgende macro maken om deze celwaarde in een variabele te lezen en vervolgens de waarde in een berichtvenster weer te geven:

 Sub ReadCellValueIntoVar()

Dim CellVal As String
CellVal = Range(" A1 ")

MsgBox CellVal

End Sub

Wanneer we deze macro uitvoeren, ontvangen we de volgende uitvoer:

De macro geeft de waarde van de variabele weer, die de waarde 500 uit cel A1 bevat.

Merk op dat we desgewenst ook complexere berekeningen kunnen uitvoeren met de variabele.

We kunnen bijvoorbeeld de volgende macro maken om de waarde van cel A1 in een variabele te lezen, en vervolgens een berichtvenster maken waarin die waarde vermenigvuldigd met 5 wordt weergegeven:

 Sub ReadCellValueIntoVar()

Dim CellVal As String
CellVal = Range(" A1 ")

MsgBox CellVal * 5

End Sub

Wanneer we deze macro uitvoeren, ontvangen we de volgende uitvoer:

De macro geeft de waarde van de variabele weer, vermenigvuldigd met 5, wat 500 * 5 = 2500 blijkt te zijn.

Aanvullende bronnen

In de volgende tutorials wordt uitgelegd hoe u andere veelvoorkomende bewerkingen in VBA kunt uitvoeren:

VBA: hoe u de waarde van een cel in een ander blad instelt
VBA: hoe u de waarde van een cel uit een ander blad haalt
VBA: een bereik in een actieve cel selecteren