Adapter le format d'une cellule en texte

Bonjour,

Après un traitement dans des tableaux dynamiques, je souhaite insérer les résultats de ma macro dans un tableau excel.
Mais j'ai des données (qui pourtant sont stockées dans une variable string) qui changent de format une fois copiées sur la feuille Excel.
Par exemple un texte "0/6" va se transformer en date et un "07," va se transformer en "7" ou pire avec des décimales.
Je souhaiterai donc forcer toutes ces cellules en format TEXTE.

Merci à vous ;)

Bonsoir
En effet, Excel interprète certaines données spécifiques.

Manuellement, sur une cellule au format standard, écris 1/6
Sur une autre, au format texte, écris la même chose
Et enfin, sur une dernière cellule écris '1/6 (avec une apostrophe au préalable)

Refais le même teste avec 007

Par macro, lance ce test et tu comprendra

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20

Sub Test() Dim t As String   '1-------------------------------- t = "1/6" With Range("A1") .NumberFormat = "@" .Value = t End With Range("B1").Value = "'" & t Range("C1").Value = t '2-------------------------------- t = "007" With Range("A2") .NumberFormat = "@" .Value = t End With Range("B2").Value = "'" & t Range("C2").Value = t End Sub

---

C'est bon, c'est ca !

Code:

---

1 2 3 4

With Range("A1") .NumberFormat = "@" .Value = t End With

---

Merci beaucoup :ccool: