MOYENNE #NOM? office 2003

Le
kristofb
Bonsoir à tous,
Je souhaite faire la moyenne de donnée sur différentes colonnes hors
la ligne de titre dans la dernière cellule de chaque colonne dans un
tableau avec un nombre de ligne variables.

Après l'exécution de la macro j'ai #NOM? affiché dans ma cellule.
Si je clique sur la cellule la barre de formule affiche
=MOYENNE(I2:I88)

Je ne vois pas pourquoi excel me renvoi #NOM?
Merci à ceux qui vont se pencher sur mon problème.

Dans la macro j'ai les instructions suivantes :
'=
==

'Calcul des moyennes
nby = Application.WorksheetFunction.CountIf(Range("G1:G200"), "Y
")
ligty = nby + 2
debny = ligty + 2
Application.Goto Range("A" & ligty)
Range(ActiveCell, ActiveCell.Offset(1, 20)).Select
Selection.Insert Shift:=xlDown
Range("B" & ligty) = "MOYENNE REGION"
Range("H" & ligty).Formula = "=MOYENNE(H2:H" & ActiveCell.Row - 1
& ")"
Range("I" & ligty).Formula = "=MOYENNE(I2:I" & ActiveCell.Row - 1
& ")"
Range("J" & ligty).Formula = "=MOYENNE(J2:J" & ActiveCell.Row - 1
& ")"
Range("L" & ligty).Formula = "=MOYENNE(L2:L" & ActiveCell.Row - 1
& ")"
Range("N" & ligty).Formula = "=MOYENNE(N2:N" & ActiveCell.Row - 1
& ")"
Range("P" & ligty).Formula = "=MOYENNE(P2:P" & ActiveCell.Row - 1
& ")"
Range("R" & ligty).Formula = "=MOYENNE(R2:R" & ActiveCell.Row - 1
& ")"
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Modeste
Le #23083361
Bonsour®

bourgouinkristof a écrit
Je souhaite faire la moyenne de donnée sur différentes colonnes hors
la ligne de titre dans la dernière cellule de chaque colonne dans un
tableau avec un nombre de ligne variables.

Après l'exécution de la macro j'ai #NOM? affiché dans ma cellule.
Si je clique sur la cellule la barre de formule affiche
=MOYENNE(I2:I88)

Je ne vois pas pourquoi excel me renvoi #NOM?



la fonction VBA .Formula attend le nom en anglais

Range("H" & ligty).Formula = "=SUM(H2:H" & ActiveCell.Row - 1 & ")"

ou bien
Range("H" & ligty).FormulaLocal = "=MOYENNE(H2:H" & ActiveCell.Row - 1 & ")"
Modeste
Le #23083481
OUPSSSSS !!!!

Range("H" & ligty).Formula = "=AVERAGE(H2:H" & ActiveCell.Row - 1 & ")"
Publicité
Poster une réponse
Anonyme