Récupérer un type String issue cellule dans Excel en macro VBRésolu

Question

Bonjour, Voila j'ai un petit problème qui va vous semblez trés simple je pense, mais je ne suis habitué des macros vb dans excel Comment puis-je récupérer un type String en retour de range("A2").Value Car dans le code ci-dessous il me met incompatibilité de type alors que xls2.Worksheets(1).Range("c" & CStr(i)) <> "11E" fonctionnent trés bien i = 3 While xls2.Worksheets(1).Range("c" & CStr(i)).Value <> xls1.Worksheets(1).Range(Pos_Field_Ref).Value i = i + 1 Wend Merci d'une réponse rapide de votre part, cela me débloquerait

mortalino · Accepted Answer

Salut,

remplace le .Value par .Text

@++ 

<hr width="100%" size="2" />
  --Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
/DIV>

cs_MPi · Answer

Et le Cast dans

Range("c" & CStr(i))

n'est pas nécessaire dans ce genre de code VBA


Tu peux tout aussi bien écrire

Range("c" & i)


Et comme l'a bien dit Mortalino, .Text te renvoie la valeur textuelle de la cellule


De plus, si tu fais des comparaisons de texte et que la casse peut
différer, il est préférable de forcer les majuscules ou minuscules lors
de la comparaison

If LCASE("MOT") = LCASE("mot") then ... ' retourne Vrai

ou

If UCASE("MOT") = UCASE("mot") then ... ' retourne Vrai aussi

mais

If "MOT" = "mot" then ...  ' retourne Faux

MPi

jeopardy27 · Answer

Merci pour les réponses, c'est ce que je voulais

Récupérer un type String issue cellule dans Excel en macro VB

3 réponses

Votre réponse