Probleme application formule vba excel

Fermé
tomskoal - 12 mars 2010 à 16:10
eriiic Messages postés 24600 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 21 octobre 2024 - 12 mars 2010 à 17:36
Bonjour,
je travaille sur excel et pour simplifier les manipulations de donnees j ai fait une macro en vba sous excel.
J essaie de récuprer des mises à jour de données brutes sur une feuille et de calculer qlq stat sur une autre feuille.
Voici le code:

For n = 1 To 42 'nombre de variables en colonne'

alpha = 65 + n

cols = Chr(alpha) & ":" & Chr(alpha) 'num de la colonne chr(65) = A

If n > 25 Then ' cas ou AA, AB ...
alpha = 65
betas = 64 + n - 25
cols = Chr(alpha) & Chr(betas) & ":" & Chr(alpha) & Chr(betas) 'selection de la colonne B:B par ex
End If




Cells(3, n + 1) = "=MOYENNE(" & nom_feuil & "!" & cols & ")" 'on obtient "=moyenne(mafeuille!B:B)"
Cells(4, n + 1) = "=ECART.MOYEN(" & nom_feuil & "!" & cols & ")"
Cells(5, n + 1) = "=MIN(" & nom_feuil & "!" & cols & ")"
Cells(6, n + 1) = "=MAX(" & nom_feuil & "!" & cols & ")"

Next

Ce qui faut juste comprendre c que pour la moyenne et l'ecart type le calcul ne se fait pas:

AREA LENGTH COMPACT
MOYENNE #NOM? #NOM? #NOM?
ECART TYPE #NOM? #NOM? #NOM?
MIN 67550,000000 1143,578556 0,181763
MAX 1468550,000000 6183,443370 0,256449

Pourquoi j' ai ce probleme de "#NOM"?

Le probleme ne doit pas etre très compliqué

Merci pour votre aide
A voir également:

2 réponses

tompols Messages postés 1273 Date d'inscription jeudi 29 juillet 2004 Statut Contributeur Dernière intervention 25 novembre 2013 435
12 mars 2010 à 16:12
Bonjour,
Remplacer MOYENNE par AVERAGE et ECART.MOYEN par AVEDEV
vba est en anglais...
0
eriiic Messages postés 24600 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 21 octobre 2024 7 239
12 mars 2010 à 17:36
Bonjour,

Et (rien à voir avec ta question mais bon) tu peux alléger en laissant tomber la création de cols et mettant :
Cells(5, n + 1) = "=MIN(" & nom_feuil & "!" & Columns(n + 1).Address & ")"

eric
0