Vba: pi gebruiken in berekeningen

In de wiskunde is Pi een irrationeel getal (een eindeloos decimaal getal) gelijk aan ongeveer 3,14.

Om Pi te gebruiken in berekeningen in VBA, kunt u de volgende syntaxis gebruiken:

 Function MultiplyByPi(inputVal)

Dim Pi As Double

MultiplyByPi = inputVal * Application.WorksheetFunction.Pi()

End Function

Met deze specifieke functie kunt u elke waarde in Excel vermenigvuldigen met Pi.

Houd er rekening mee dat Application.WorksheetFunction.Pi de waarde 3.14159265358979 retourneert, wat de exacte 15-cijferige Pi-constante is.

Als u een nauwkeurigere berekening nodig heeft dan 15 cijfers, kunt u Pi eenvoudigweg hardcoderen met zoveel cijfers als u wilt.

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

Voorbeeld: Pi gebruiken in VBA

Stel dat we in Excel de volgende lijst met waarden hebben die we met Pi willen vermenigvuldigen:

Om dit te doen, kunnen we de volgende functie in VBA maken:

 Function MultiplyByPi(inputVal)

Dim Pi As Double

MultiplyByPi = inputVal * Application.WorksheetFunction.Pi()

End Function

Nadat we deze functie hebben gemaakt, kunnen we de volgende formule in cel B2 typen om de waarde in cel A2 met Pi te vermenigvuldigen:

 =MultiplyByPi( A2 )

We kunnen vervolgens op deze formule klikken en deze naar elke resterende cel in kolom B slepen:

Kolom B geeft nu elke waarde in kolom A weer, vermenigvuldigd met Pi.

Aanvullende bronnen

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

VBA: waarden toevoegen in een bereik
VBA: Hoe de gemiddelde waarde van het bereik te berekenen
VBA: het aantal rijen binnen bereik tellen