MOYENNE #NOM? office 2003

Le
kristofb
Bonsoir tous,
Je souhaite faire la moyenne de donne sur diffrentes colonnes hors
la ligne de titre dans la dernire cellule de chaque colonne dans un
tableau avec un nombre de ligne variables.

Aprs l'excution 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 problme.

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
& ")"
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