Discussion :

[zandru]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

.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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

Mais cela ne change rien.

Pouvez-vous m'aider ?

[sabzzz]

bonjour zandru,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

isabelle

[Minick]

Salut,

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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