Conversion nombre en texte [Résolu]

Signaler
-
 Phil97214 -
Bonsoir,
Je connais quelque trucs en VBA excel je suis en quelque sorte un autodidacte mais là je bute. J'ai deux cellules l'une contenant du texte ( PRLV SEPA N°03097680 ) et l'autre des chiffres ( 920431955605621000000 ) .
je voudrais obtenir ces 2 données sur dans une seule cellule. actuellement j'obtiens :
PRLV SEPA N°03097680 '9,20431955605621E+20 

Si je fais manuellement au moyen de
Range("H42").Select
    ActiveCell.FormulaR1C1 = "=FIXED(RC[-6])"

j'y arrive mais sur toute une feuille, ça devient long ; j'aimerais bien une macro.
Quelqu'un peut-il m'aider?
Merci par avance.

2 réponses

Messages postés
7039
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
14 novembre 2020
116
Bonjour,

tu peux essayer cela

Option Explicit
Sub test()
Range("C1").Value = Range("A1").Value & " " & Range("B1").Value
Range("C1") = Replace(Range("C1"), "E+20", "000000")
End Sub


voilà
Je ne connaissais pas cette méthode. Merci.
Toutes fois,je me demande si à la place des 6 zeros s'il y avait des chiffres ... mais je ne pense pas que ce soit possible
Merci encore.
Messages postés
15086
Date d'inscription
mardi 11 mars 2003
Statut
Contributeur
Dernière intervention
14 novembre 2020
459
Bonjour

actuellement j'obtiens :
PRLV SEPA N°03097680 '9,20431955605621E+20

comment arrives tu à ça?
Bonjour,
j'arrive à cette solution par : cstr(range("B20").value)
j'ai essayé d'autre trucs comme Vt="'" & (range("B20").value) mais ça ne marche pas non plus!
Merci de vous pencher sur mon problème