calcul d'une moyenne par VBA

Bonjour à toutes et à tous,


Je dois créer plusieurs feuilles à peu près identiques. Toutefois, pour un feuille précise, il y a 5 lignes et un nombre variable de colonnes.... La dernière colonne sert à faire la moyenne des précédente.


voici mon code qui ne fonctionne pas. Pouvez-vous me dire où est l'erreur.

Code:

---

1 2 3 4 5 6 7

Range("X4").Select ' ActiveCell.FormulaR1C1 = "=AVERAGE(RC[-22]:RC[-1])" ActiveCell.FormulaR1C1 = "=AVERAGE(range(cells(4,2),cells(4,b)))" Range("X5").Select

---

Remarque : J'ai enregistrer ma macro avec l'éditeur et cela m'a donné les 2 premières lignes puis la 4ème.

J'ai voulu remplacer la deuxième par MA 3ème ( c'est pour cela que la 2ème a été mise en commentaire pour le moment ) mais ça ne marche pas.

Vous l'aurez compris, "b" est ma colonne variable.

Pouvez-vous m'aider.


Merci d'avance.

Novice72

Bonjour,

Pourquoi utiliser VBA pour ça ???

Citation:

---

Envoyé par Patrice740

Bonjour,

Pourquoi utiliser VBA pour ça ???

---

Ceci n'est qu'une première étape. Une grosse partie du reste fonctionne si la colonne est figée....

Toutefois, j'ai réussi à contourner mon problème. La colonne A sert de légende. J'ai utilisé la colonne D pour la moyenne entre B et C. Puis, j'ai ajouté dans la macro des "insertions colonnes" entre les colonnes B et C et le tour est joué car la formule se modifie toute seule. Bien sûr le nombre de colonnes à insérer est une variable mais ce n'est plus un problème.


Merci


Novice72

Salut.

Outre la remarque de Patrice, j'ai deux choses à dire:
Qu'est-ce qui ne "marche" pas... La ligne ActiveCell.FormulaR1C1 = "=AVERAGE(RC[-22]:RC[-1])" fonctionne bien chez moi;
La formule doit évidemment être placée au moins dans la colonne W d'une feuille.

Que cherches-tu à réaliser et dans quel contexte dois-tu utiliser VBA pour cela? Ne pourrais-tu utiliser une colonne formulée d'un tableau structuré?

Citation:

---

Envoyé par Pierre Fauconnier

Salut.

Outre la remarque de Patrice, j'ai deux choses à dire:
Qu'est-ce qui ne "marche" pas... La ligne ActiveCell.FormulaR1C1 = "=AVERAGE(RC[-22]:RC[-1])" fonctionne bien chez moi;
La formule doit évidemment être placée au moins dans la colonne W d'une feuille.

Que cherches-tu à réaliser et dans quel contexte dois-tu utiliser VBA pour cela? Ne pourrais-tu utiliser une colonne formulée d'un tableau structuré?

---

Bonjour Pierre,
La ligne dont tu parles fonctionne mais je ne veux pas qu'elle soit toujours en colonne W. en effet, une moyenne se calcule sur un nombre d'éléments qui varie.
En colonne W, on calcule la moyenne des colonnes B à V soit la moyenne de 21 nombres.... ( la colonne A sert de légende ) .
Tu auras compris, pourquoi je voulais faire varier cette colonne....

Cordialement.

Novice72