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
7326
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
7 avril 2021
122
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
15780
Date d'inscription
mardi 11 mars 2003
Statut
Contributeur
Dernière intervention
6 avril 2021
529
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