VBA - Funzioni definite dall'utente

UN functionè un gruppo di codice riutilizzabile che può essere chiamato ovunque nel programma. Ciò elimina la necessità di scrivere lo stesso codice più e più volte. Ciò consente ai programmatori di dividere un grande programma in un numero di funzioni piccole e gestibili.

Oltre alle funzioni integrate, VBA consente di scrivere anche funzioni definite dall'utente. In questo capitolo imparerai come scrivere le tue funzioni in VBA.

Definizione di funzione

Una funzione VBA può avere un'istruzione return facoltativa. Ciò è necessario se si desidera restituire un valore da una funzione.

Ad esempio, puoi passare due numeri in una funzione e quindi puoi aspettarti che la funzione restituisca la loro moltiplicazione nel programma chiamante.

Note - Una funzione può restituire più valori separati da una virgola come un array assegnato al nome della funzione stessa.

Prima di usare una funzione, dobbiamo definire quella particolare funzione. Il modo più comune per definire una funzione in VBA è utilizzare l'estensioneFunction parola chiave, seguita da un nome di funzione univoco e può contenere o meno un elenco di parametri e un'istruzione con End Functionparola chiave, che indica la fine della funzione. Di seguito è riportata la sintassi di base.

Sintassi

Aggiungi un pulsante e aggiungi la seguente funzione.

Function Functionname(parameter-list)
   statement 1
   statement 2
   statement 3
   .......
   statement n
End Function

Esempio

Aggiungi la seguente funzione che restituisce l'area. Notare che un valore / valori possono essere restituiti con il nome della funzione stessa.

Function findArea(Length As Double, Optional Width As Variant)
   If IsMissing(Width) Then
      findArea = Length * Length
   Else
      findArea = Length * Width
   End If
End Function

Chiamare una funzione

Per richiamare una funzione, chiamare la funzione utilizzando il nome della funzione come mostrato nella schermata seguente.

L'output dell'area come mostrato di seguito verrà visualizzato all'utente.