Problème lecture cellule composée

Résolu/Fermé
Signaler
Messages postés
29
Date d'inscription
jeudi 16 février 2017
Statut
Membre
Dernière intervention
5 août 2021
-
Messages postés
29
Date d'inscription
jeudi 16 février 2017
Statut
Membre
Dernière intervention
5 août 2021
-
Bonjour,
Dans un code VBA, j'ai un petit soucis de lecture de cellule. Je m'explique
Dans la colonne A de la feuille 1, j'ai du texte associé à des chiffres ou non, idem dans la feuille 2 : par ex
A1 = G160
A2 = CTRLCU
A3 = ABC1
A4 = ABC3
Dans mon code à un moment j'essaie d'utiliser une fonction IF pour comparer une cellule de la feuille 1 à une cellule de la feuille 2 :
If Sheets("Feuil1").Cells(1,1)=Sheets("Feuil2").Cells(1,1)
[instruction]
End If

Je lance la macro en pas à pas
Nous sommes d'accord que si la Cellule A1 (feuille 1) = A2 (feuille 1), elle doit lire l'instruction. C'est le cas que lorsque la cellule est composé seulement de texte.

OK :
Sheets("Feuil1").Cells(1,1) = CTRLCU = Sheets("Feuil2").Cells(1,1)

NOK :
Sheets("Feuil1").Cells(1,1) = G160 = Sheets("Feuil2").Cells(1,1), pas de lecture de l'instruction.

Existe-t-il une fonction qui déclare ce genre de "valeur" dans une cellule ?
Pouvez-vous m'aider ? Est ce que cela peut venir d'une écriture avec variable (pour le forum, j'ai souhaité faciliter le code pour une meilleure compréhension, mais en réalité j'utilise des variables pour les lignes et les colonnes ) ?

3 réponses

Messages postés
13351
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
24 janvier 2022
2 328
Bonsoir

Il n'y a pas de raison si tes 2 cellules contiennent G160 ça doit matcher et l'instruction s’exécuter
Si ce n'est pas le cas c'est que les 2 écritures ne sont pas identiques (un espace invisible après une valeur par exemple)Impossible d'en dire plus sans connaître ton fichier réel
Poste un exemple de ton fichier avec sa macro sur mon-partage.fr, copies le lien crée et reviens le coller ici

Cdlmnt
Via

1
Messages postés
24288
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
24 janvier 2022
7 034
Bonjour,

met le code exact que tu utilises.
Car si c'est
Sheets("Feuil1").Cells(1,1) = G160 = Sheets("Feuil2").Cells(1,1) 
tel que, pas étonnant que tu aies un pb.
eric

En essayant continuellement, on finit par réussir. 
Donc plus ça rate, plus on a de chances que ça marche.(les Shadoks)
En plus du merci (si si, ça se fait !!!), penser à mettre en résolu. Merci
1
Messages postés
29
Date d'inscription
jeudi 16 février 2017
Statut
Membre
Dernière intervention
5 août 2021

Bonjour,
Non eriiic ce n'est pas le code c'était pour montrer le défaut que j'avais écrit ça, désolé si c'était pas explicite.
En revanche j'ai résolu mon problème : j'ai juste réécrit ma liste à laquelle je comparais mon fichier principal, je n'avais pas de différence mais ça ne marchait pas. Je suppose que cela provienne du fait que ma liste provenait d'un copier-coller, j'avais vérifié le style de l'écriture et tout mais c'étais pareil. J'ai déjà eu des surprises avec les copier-coller.... Merci via55 de m'avoir mis sur la piste.

Merci de vos réponses !
0