recopie : mes chaines de caractères se transforment en valeurs numériques

[dut-dut]

Bonjour !

Je recopie certaines lignes d'un tableau dans une autre feuille ainsi :

[...]
coll.Add Range(Cells(row1, 1), Cells(row1, 6))

[...]
lig = 1
Do While lig <= coll.Count
Range(Cells(lig, 1), Cells(lig, 6)) = coll(lig).Value
lig = lig + 1
Loop


Seulement dans ce tableau j'ai des chaines de caractères genre ' 23' qui deviennent des valeurs numériques (23) à la recopie.

Comment puis-je faire pour garder le format d'origine ? (chaine de caractères)

 

[dut-dut]

Oups ! j'ai oublié de dire que coll est une collection.

Merci de votre aide.

 

[Michel_M]

Demande peut-être à l'auteur de la macro 'dupliquer"...

 

[dut-dut]

Hier soir le déclic : il suffit de définir le format des cellules comme du texte. Comme ça les espaces situés avant les nombres sont conservés.

C'est tout bête !

Merci à... moi. (merci aussi à Michel_M)
Salut !