[VBA] Funzione che prende come argomento un vettore

[AlexTheWind]

Salve a tutti, avrei bisogno di scrivere una function nel VBA Editor di Excel che:

- prende come input un vettore colonna composto sempre da 4 celle e un numero n intero
- stampa l'elemento n-esimo di tale vettore nella cella in cui è stata richiamata

dovrebbe essere una cavolata ma non ci vengo a capo... qualcuno può darmi una mano? grazie!

[icecube_HT]

Originariamente inviato da AlexTheWind
Salve a tutti, avrei bisogno di scrivere una function nel VBA Editor di Excel che:

- prende come input un vettore colonna composto sempre da 4 celle e un numero n intero
- stampa l'elemento n-esimo di tale vettore nella cella in cui è stata richiamata

dovrebbe essere una cavolata ma non ci vengo a capo... qualcuno può darmi una mano? grazie!

Ciao, puoi usare qualcosa del genere:

Public Function elem(R As Range, ByVal n As Integer) As Variant
   elem = R.Cells(n, 1)
End Function

Nota che non ho impostato nessun controllo sulla dimensione del Range di celle.
Lo "spostamento relativo" si considera sempre a partire da 1, quindi:
=elem (A1:A4, 1)
restituisce il primo elemento del Range "A1:A4", ecc..