Come ricreare la funzione SOMMA in Vba

Dichiarazione di non responsabilità per contenuto KB ritirato

Il contenuto di questo articolo è riferito a prodotti per cui Microsoft non offre più il supporto. Questo articolo viene pertanto offerto "così com'è" e non sarà più aggiornato.

Sommario


Il codice sotto riportato, e` un esempio di come creare una funzione che
accetti piu` argomenti e di diverso tipo.

Informazioni


Questa funzione, ricrea la funzione SOMMA di Excel.

Function MiaSomma(ParamArray par()) As Integer

Dim i As Integer
Dim c As Variant

For i = 1 To UBound(par)
If IsObject(par(i)) = True Then
For Each c In par(i)
MiaSomma = MiaSomma + c.Value
Next c
Else
MiaSomma = MiaSomma + par(i)
End If
Next i
End Function


Riferimenti


Giuda in linea Excel VBA - ParamArray()
Proprietà

ID articolo: 639217 - Ultima revisione: 24 ago 2005 - Revisione: 1

Feedback