Discussion :

[Dereck07]

Bonjour,

Je debute en VBA et pour m'entrainer je me suis fixé des objectifs simples.
Le premier objectif que je me suis fixé est de créer une macro qui permet de caculer la moyenne de plusieurs cellules. (je sais que cette fonction existe déja mais je veux absolument la refaire par moi même)

J'ai commencé à faire un debut de macro:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Function moyy(T[...])
Dim i, L, sum
L = T.Length
i = 0
sum = 0
Do While L > i
sum = sum+T[i]
i=i+1
Loop
moyy = sum / L
End Function

Dans excel cette macro sera place dans une cellule ainsi:

=moyy(B10:B21)

Deux problemes se posent à moi:

1) Comment je fais pour declarer un tableau en argument de ma macro qui correspond aux champs des cellules B10:B21?

2) Comment je fais pour connaitre la longueur du tabelau (sachant que j'aurais tres bien pu mettre B15:B21 à la place de B10:B21)?

J'ai un peu cherché sur les autres forms car je pense que ce sujet a du être deja traité mais n'ayant pas trouvé la reponse que je chercher...

J'attends vos conseil