Non reconnaisance de texteRésolu

Question

Bonjour
J'ai un probleme avec un fichier excel importer d'un outil. Pour analyser une enquete j'ai teste une macro =IF(D3="5: excellent",C3*5,"uu").

Le probleme est que le contenu de la cellule "D3" n'est pas reconnu par le test de la macro. J'ai copie la colonne D sur une autre colonne avec un paste value, mais cela ne change rien.
Par contre si je tape a la main la valeur "5: excellent", cela marche.
J'aurai voulu joindre un extrait du fichier (fichier a l'origine csv) mais je ne vois pas comment faire ?.
Quelqu'un aurait-il une idee du probleme? Merci.

jordane45 · Answer

Bonjour,
Ici nous préférons travailler par de l'explication... pas en téléchargeant les fichiers que les membres souhaiteraient nous partager....

Ce qui me gène dans l'ennoncer de ton problème, c'est que je n'y vois pas de macro... mais juste une FORMULE.

Peux tu nous montrer exactement le code qui te pose problème en nous expliquant clairement le comportement attendu, celui renconté, les éventuels messages d'erreurs.....

Si ton souci est de mettre dans une macro le contenu de D3... il te faut utiliser RANGE ou CELLS ...

Dim MaFormule As String
MaFormule = "=IF(" & Range("D3").Value & "=""5: excellent"",C3*5,""uu"")"

ucfoutu · Answer

BGonjour,
exemple (ici : cellule H1) :
 Range("H1").Formula = "=IF(D3=""5: excellent """ & ",C3*5,""uu"")"
 

et si tu veux l'appliquer à plusieurs cellules d'une colonne en utilisant les adresses relatives ===>> exemple ===>
Range("H1:H10").Formula = "=IF(D3=""5: excellent """ & ",C3*5,""uu"")"
Et la référence à certaines cellules doit être fixe, tu dis.
________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviend

jordane45 · Answer

En fait il s'agit d'une formule ou macro excel 
 
Formule OU macro ? ... ce n'est pas la même chose.

Ce que tu nous montres est une Macro... (pas une formule)...
Dans ce code
 xx = .Range("B" & k)    If xx = "5: excellent" Then
Il faut que la valeur de la cellule soit STRICTEMENT égale à la condition..donc.. pas de majuscules..pas d'espaces avant, au milieu ou après en plus... pas d'autre texte dans cette même cellule.... (c'est pour ça que si tu l'écris à la main..ça fonctionne...)

Le plus simple, je pense, est de supprimer tous les espaces superflus au momment de la vérification et de tester en MAJUSCULE
xx = UCase(Trim(Range("B" & k)))    If xx = UCase(Trim("5: excellent" )) Then'...

jonew · Answer

En fait j'appelle macro une instruction tel que :
=IF(B3="5: excellent","tt","zz") ecrite dans une cellule et descendue sur toute une colonne. Mais j'ai egalement fait un script VBA tel que indique precedemment.
En ce qui concerne tes instructions
xx = UCase(Trim(Range("B" & k)))    If xx = UCase(Trim("5: excellent" )) Then'... 
cela ne resoud pas le probleme.

Par contre j'ai constate en revenant a ma macro et en utilisant l'option "Evaluate Formulas" que le test apparait ainsi:
IF("5: excellent"  ="5: excellent","tt,"zz"). Il semble donc que dans ma cellule B3 j'ai un caratere qui traine et qui ne permet pas l'egalite.
Cela ne viens t-il pas de l'origine csv du fichier ? Comment peux t-on supprimer des caracteres parasites ?
J'espere etre clair dans ma description?

Sinon merci pour la reference sur la manipulation des chaines de caractères

jordane45 · Answer

Y a t-il un moyen de vous envoyer un extrait du fichier excel qui pose probleme

 
Il est toujours possible de le déposer sur un site de partage comme ( cijoint.com)... mais personnellement je ne le téléchargerai pas (et je pense que peux de membres ne le feraient...)
Désolé.

Par contre, autant je veux bien aider sur la Macro... autant pour ce qui est des formules... ce n'est pas le bon forum...

jonew · Answer

OK. Merci quand meme.

Non reconnaisance de texte

6 réponses

Votre réponse

Discussions similaires