Discussion :

[Lameduck]

Bonjour,

Je suis en train d'enlever les erreurs d'un gros fichier excel j'ai trouver comment enlever la principale erreur:

remplacer:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=AVERAGE(A10:A12)

par

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
=IF(ISERROR(AVERAGE(A10:A12)),"NA",AVERAGE(A10:A12))

cependant je ne peux utiliser la fonction replace de excel en 2 ou 3 fois car la première etape ne peux se terminer a cause d'erreur ( le nombre de parenthèses ouvertes et fermées est différents )

et je ne peux le faire une fois a la main et faire glisser car les moyennes des cellules ne sont pas du tout redondante.

Merci d'avance

[Magemax]

Alors 2 idées simples me viennent :

1 - Faire une nouvelle colonne et lui dire "affiche la case de gauche si c'est pas une erreur" (si tes cellules à traiter sont en colonnes).

2 - Faire une macro. Genre (en pseudo-code, j'aime mieux te faire ca qu'un code VBA bourré d'erreurs car je suis rouillé):

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
 
for ( i cellule à modifier)
{
String a = i.Value
Virer la première lettre de a (à savoir le "=")
i.Value = "=si(esterreur("+a+");""""; "+a + ")"
 
}

[Lameduck]

J'ai un peu avancé,

J'ai créer une macro ou je copie la cellule et l'additionne dans la meme du coup j'obtient :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=AVERAGE(A10:A12)+AVERAGE(A10:A12)

Ensuite J'ai remplacé:

= par '=IF(ISERROR(
+ par ,"NA",
et ) par )) pour obtenir :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

'=IF(ISERROR(AVERAGE(A10:A12)),"NA",AVERAGE(A10:A12))

Cependant impossible de supprimer la cote '