functies

Hieronder staat een voorbeeld van een Excel VBA-functie, die de waarde van een bedrag in dollar omzet naar een bedrag in euro.

Sub koersBerekening()
    Dim USD As Integer, euro As Single

    USD = 100
    euro = zetom(USD)
    MsgBox euro
End Sub

Function zetom(ByVal munt_in As Integer) As Single
    Dim munt_out As Single

    munt_out = munt_in * 0.8482
    zetom = munt_out
End Function

Het algoritme bestaat uit twee delen: het oproepende gedeelte (koersberekening) en de functie (zetom). De uitvoering van het algoritme verloopt als volgt. Klik op de recorder-toetsen om het algoritme stapsgewijs uit te voeren.

U kunt het programmaverloop ook volgen aan de hand van het venster lokale variabelen. Open hiervoor het werkboek functie.xls en start de VBE. Via het menu Beeld Venster lokale variabelen maakt u dit venster zichtbaar. Doorloop het programma stap-voor-stap met de functietoets F8 of het menu Fout Opsporen Stap. Merk op dat de verschillende variabelen (USD, euro, munt_in, munt_out) een waarde krijgen op verschillende tijdstippen. U kunt het verloop ook volgen via de volgende Flash movie.

In het PSD wordt een functie aangegeven met het sleutelwoord Function, in te voegen met het menu Insert Function. Een functies heeft meestal 1 uitvoerparameter, aangegeven achter het woordje OUT en 1 of meerdere invoerparameters, aangegeven met het sleutelwoord IN.

Doordat een functie een resultaat teruggeeft, staat ze aan de rechterkant van een toewijzingsoperator. U kunt het resultaat van een functie echter ook meteen afdrukken of inlezen; pas dan op met de haakjes: x = zetom(15) of schrijf(zetom(15)).