Di seguito viene presentata una piccola guida che mostra come inserire funzioni personalizzate tra le formule di Excel. Come esempio proponiamo la risoluzione del calcolo di ipotenusa e cateto con il teorema di Pitagora.

Per fare ciò entriamo in VBA e scriviamo il seguente codice per il calcolo dell'ipotenusa:

Public Function IPOTENUSA(CATETO1, CATETO2)
IPOTENUSA = (CATETO1 ^ 2 + CATETO2 ^ 2) ^ (1 / 2)
End Function

Nella prima riga si definisce la nuova funzione IPOTENUSA che avrà due parametri, ovvero le misure dei due cateti. Nella seconda riga viene riportato il calcolo vero e proprio inserendo la formula che prevede l'impiego dei due parametri. La terza riga chiude la funzione. Allo stesso modo si procede per la formula che restituisce il valore del cateto.

Public Function CATETO(CATETO2, IPOTENUSA)
CATETO = (IPOTENUSA ^ 2 - CATETO2 ^ 2) ^ (1 / 2)
End Function

Ora da excel, cliccate sul menù INSERISCI > INSERISCI FUNZIONE...

Dal menù a tendina "Oppure selezionare una categoria:" scegliere "Definite dall'utente" e troverete nell'elenco le vostre nuove funzioni: Ipotenusa e Cateto!! Inserite i valori direttamente o puntando a delle celle valorizzate per effettuare i calcoli.

ipotenusa 

 cateto