Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

SUM vs SOMME

7 réponses
Avatar
marion
Bonjour,

Je suis tr=E8s bloqu=E9e sur un probl=E8me.

Je re=E7ois un fichier excel "en anglais" avec 60 feuilles =E0=20
l'int=E9rieur.
Chaque feuille contient des formules comme 'SUM' ou 'IF'.
Pour que mes formules fonctionnent sur ma version=20
fran=E7aise d'excel je suis oblig=E9e de passe dans chaque et=20
faire edition recherche "SUM" puis remplacer par "SOMME".

Pour ce fait j'ai d=E9velopp=E9 une macro qui passe par chaque=20
feuille et effectue le remplacement, sauf que le probl=E8me=20
c'est que je me retrouve avec des cellules avec #NOMS=20
alors que la formule est correcte, il faut que je m'amuse=20
=E0 faire "F2" puis la touche "Entr=E9e".

Y'a t-il une personne g=E9n=E9reuse qui pourrait m'aider ?

7 réponses

Avatar
AV
Copie de réponse donné hier !

Sub zz_Traduc()
For Each c In Selection
If c.HasFormula Then c.FormulaLocal _
= Application.Substitute(c.Formula, "sum", "somme")
Next
End Sub

AV

"marion" a écrit dans le message news:
0ad901c35114$49254180$
Bonjour,

Je suis très bloquée sur un problème.

Je reçois un fichier excel "en anglais" avec 60 feuilles à
l'intérieur.
Chaque feuille contient des formules comme 'SUM' ou 'IF'.
Pour que mes formules fonctionnent sur ma version
française d'excel je suis obligée de passe dans chaque et
faire edition recherche "SUM" puis remplacer par "SOMME".

Pour ce fait j'ai développé une macro qui passe par chaque
feuille et effectue le remplacement, sauf que le problème
c'est que je me retrouve avec des cellules avec #NOMS
alors que la formule est correcte, il faut que je m'amuse
à faire "F2" puis la touche "Entrée".

Y'a t-il une personne généreuse qui pourrait m'aider ?
Avatar
Daniel.M
Bonjour le monde,

C'est quand même spécial comme problème ça.
Je n'arrive pas à m'expliquer comment un logiciel qui conserve l'info des
noms de fonctions de base sous forme de NOMBRES ne puisse pas afficher
l'info comme il faut lorsqu'il est ouvert dans une autre langue.

On n'a pas eu ce problème pendant plusieurs années (à part pour les macros
complémentaires) et là, tout d'un coup, il y en quelques-uns qui l'ont.
Bizarre...

Il faudrait qu'on m'explique. Nouvelle version d'Excel?

Daniel M.

"AV" wrote in message
news:OV%
Copie de réponse donné hier !

Sub zz_Traduc()
For Each c In Selection
If c.HasFormula Then c.FormulaLocal _
= Application.Substitute(c.Formula, "sum", "somme")
Next
End Sub

AV

"marion" a écrit dans le message news:
0ad901c35114$49254180$
Bonjour,

Je suis très bloquée sur un problème.

Je reçois un fichier excel "en anglais" avec 60 feuilles à
l'intérieur.
Chaque feuille contient des formules comme 'SUM' ou 'IF'.
Pour que mes formules fonctionnent sur ma version
française d'excel je suis obligée de passe dans chaque et
faire edition recherche "SUM" puis remplacer par "SOMME".

Pour ce fait j'ai développé une macro qui passe par chaque
feuille et effectue le remplacement, sauf que le problème
c'est que je me retrouve avec des cellules avec #NOMS
alors que la formule est correcte, il faut que je m'amuse
à faire "F2" puis la touche "Entrée".

Y'a t-il une personne généreuse qui pourrait m'aider ?




Avatar
AV
Quand j'execute ta macro, j'ai le message d'erreur suivant :
Erreur d'execution 1004
Erreur définie par l'application ou par l'objet


En l'exécutant pas à pas, quelle est la ligne qui coince ?

AV

Avatar
AV
C'est une erreur (classique) dans la recopie de la réponse :

De "If c.HasFormula ...... jusqu'à : ...c.Formula, "sum", "somme") tu mets tout
sur la même ligne

AV
Avatar
Marion
Désolé, j'ai essayé ça marche toujours pas


Merci


-----Message d'origine-----
C'est une erreur (classique) dans la recopie de la
réponse :


De "If c.HasFormula ......
jusqu'à : ...c.Formula, "sum", "somme") tu mets tout

sur la même ligne

AV


.



Avatar
Marion
Essaye sur l'adresse de mon collégue :



Merci infiniment


-----Message d'origine-----
Désolé, j'ai essayé ça marche toujours pas
Etonnant....

Si ton adresse est valide je peux t'envoyer un exemple en
bal


AV


.




Avatar
Frédéric Sigonneau
Bonsoir,

Avec la petite modification ci-dessous, très bidouille je l'admets, la macro
d'Alain semble donner le résultat attendu (Excel 2002) :

Sub zz_Traduc()
For Each c In Selection
If c.HasFormula Then c.Formula _
= Application.Substitute(c.Formula, "sum", "somme")
Next
End Sub

Nul besoin, semble-t-il, de forcer un recalcul.
(Juste au cas où, l'erreur 1004 peut se produire, en particulier avec Excel 97,
si tu exécutes ta macro en l'affectant à un CommandButton dont la propriété
TakeFocusOnClick n'a pas la valeur False).

FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !


Merci Allain,

Quand j'execute ta macro, j'ai le message d'erreur
suivant :

Erreur d'execution 1004
Erreur définie par l'application ou par l'objet

Merci beaucoup

-----Message d'origine-----
Copie de réponse donné hier !

Sub zz_Traduc()
For Each c In Selection
If c.HasFormula Then c.FormulaLocal _
= Application.Substitute(c.Formula, "sum", "somme")
Next
End Sub

AV

"marion" a écrit dans le message
news:

0ad901c35114$49254180$
Bonjour,

Je suis très bloquée sur un problème.

Je reçois un fichier excel "en anglais" avec 60 feuilles à
l'intérieur.
Chaque feuille contient des formules comme 'SUM' ou 'IF'.
Pour que mes formules fonctionnent sur ma version
française d'excel je suis obligée de passe dans chaque et
faire edition recherche "SUM" puis remplacer par "SOMME".

Pour ce fait j'ai développé une macro qui passe par chaque
feuille et effectue le remplacement, sauf que le problème
c'est que je me retrouve avec des cellules avec #NOMS
alors que la formule est correcte, il faut que je m'amuse
à faire "F2" puis la touche "Entrée".

Y'a t-il une personne généreuse qui pourrait m'aider ?


.