Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Pb de foramt de cellule après saisie dans USF

martinjl

XLDnaute Nouveau
Bonjour à toutes et à tous,
Après m'être largement documenté sur le forum, j'ai réalisé ma première Userform.
C'est un formulaire de saisie de nom et d'adresses.
Le seul problème que je n'ai pas su résoudre est le suivant:
Pour les n° de telephone dom et portable, j'ai mis des cases à cocher si un n° est à saisir et ça marche bien.
Si la case est décochée, on passe à l'étape suivante en laissant la combobox vide.
Mais dans ce cas, au lieu de me laisser vide la cellule correspondante de la feuille Excel, j'ai un 0 qui s'y inscrit.
J'obtiens aussi un 0 si au lieu de rentrer des chiffres, je rentre des lettres dans les combobox 'n° de tel'.
Je pense que c'est parce que dans ma macro de validation, j'ai demandé pour ces cellules la transformation en valeur du texte par le code
Range('g' & num).Value = Val(TxttelDom).
Ci-joint mon fichier, en espérant que l'un d'entre vous pourra me donner l'astuce qui me manque.
jean-louis [file name=saisieadresses.zip size=22731]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/saisieadresses.zip[/file]
 

Pièces jointes

  • saisieadresses.zip
    22.2 KB · Affichages: 30
P

Papaye

Guest
Bonjour,

Tu peux mettre un test après avoir remplit ta case

Range('g' & num).Value = Val(TxtTelDom)
If Range('g' & num).Value = 0 Then Range('g' & num).Value = ''

Papaye
 

martinjl

XLDnaute Nouveau
Bonjour Papaye,
Merci pour cette réponse très simple.
J'avais essayé dans tous les sens de mettre des conditions If..Then et ça ne marchait pas.
j'ai réessayé et ça marche,
merci
jean louis
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…