Bonjour, j'ai posé à peu près la même question hier, je vais essayé de te répondre.
On m'a conseillé de mettre devant Clng:
pour reconnaître en tant que valeur et non texte, ça marche bien tant que ta cellule reste formatée en tel comme dans ton exemple.
Par contre j'ai toujours été ennuyé avec les numéro de sécu mais bon...
ActiveCell.Offset(0, 2).Value = CLng(UserForm1.TxtTelDom)
après j'ai eu un autre souci, quand je ne rentrais rien ça plantais donc pour valeur vide:
If IsNumeric(UserForm1.TxtTelDom) = True Then ActiveSheet.Range("D13") = CLng(UserForm1.TxtTelDom)
à plus et bon courage