Merci pour ce premier retour,
mon code ressemble à ce que tu me proposes, malgré tout, le format ds ma cellule n'est pris en compte, que seulement, après un double click
Extrait de mon code :
.Cells(derligne, 6).Value = TextBox_Vol
.Cells(derligne, 6).NumberFormat = "000"
LLc