pb de format automatique

Bonjour,

j'ai un soucis avec une mise en forme (apparemment) automatique du format de cellule sous excel.
Ce que je fait c'est créer une feuille xls qui est une copie d'une feuille "standard", puis qui est rempli via VBA.

Sur une cellule (dont le format sur la feuille "standard" est texte), je dois inscrire "11-2". Ce que je fait avec :

Code:

---

.Cells(12, 4) = comcreation.numaff.Value

---

cette ligne de code est bien sur dans un with, et "numaff" est une combobox sur le userform "comcreation"

Mais au lieu d'avoir "11-2" dans la cellule (12,4), j'ai "40484".
Après quelque recherche, j'ai remarqué que "40484" est la transformation en format texte de la date "2 novembre".

Pour tenter de résoudre ce problème j'ai forcé le format de ce que je met dans la cellule avec cstr :

Code:

---

.Cells(12, 4) = CStr(comcreation.numaff.Value)

---

Mais cela ne change rien.

Pouvez-vous m'aider ?

bonjour zandru,

Code:

---

.Cells(12, 4) = Format(comcreation.numaff.Value, "d mmmm")

---

isabelle

Salut,

Force le format de la cellule en texte avant de mettre la valeur:

Code:

---

1 2	.Cells(12, 4).NumberFormat = "@" .Cells(12, 4) = comcreation.numaff.Value

---