plage / cellules / fonction

Bonjour,
Je n’arrive pas à faire marcher la formule ci-dessous..
Il doit y avoir une erreur quelque part.. mais je n’arrive pas à la trouver.. Quand je fais marcher la macro « beta », dans la cellule B6 ; il y a écrit « Nom ? » et en cliquant, on voit la formule : MOYENNE(cells(i + 11; j + 3):$E$767). (la cellule E767 est bien la dernière de la colonne contenant une valeur)
J’ai essayé en faisant : cells(i,j).Offset(11, 3), cells(i,j).Offset(11, 3).End(xlDown) (pour définir ma plagemoyenne)
Mais ça ne marche pas non plus.. Donc je suis bloquée..
Si quelqu’un voit mon problème ! Merciiii !

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Function moyenne(i, j) plagemoyenne = "Cells(i + 11, j + 3):" & Cells(i + 11, j + 3).End(xlDown).Address Cells(i, j).Formula = "=AVERAGE(" & plagemoyenne & ")" End Function   Sub beta() Call moyenne(6, 2) Call moyenne(6, 6) Call moyenne(6, 10) Call moyenne(6, 14) Call moyenne(6, 18) End Sub

---

bonjour,

essaye sa :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Function moyenne(i, j) 'cells(i+11,j+3) était considérer comme un texte plagemoyenne = Cells(i + 11, j + 3) & ":" & Cells(i + 11, j + 3).End(xlDown).Address Cells(i, j).Formula = "=AVERAGE(" & plagemoyenne & ")" End Function   Sub beta() Call moyenne(6, 2) Call moyenne(6, 6) Call moyenne(6, 10) Call moyenne(6, 14) Call moyenne(6, 18) End Sub

---

Je pense que ca devrait marcher,
bonne journée

edit : trop tard

Merci beaucoup!
Ca marche très bien!

Citation:

---

Envoyé par papimcha

edit : trop tard

---

Je te laisse passer ;) klaxonne la prochaine fois :mrgreen:

Mais une petite précision quand même, si tu ne précises pas la propriété Address, par défaut il prendra la propriété Value et ça va couiner

Code:

---

plagemoyenne = Cells(i + 11, j + 3).Address & ":" & Cells(i + 11, j + 3).End(xlDown).Address

---