OVH Cloud OVH Cloud

inputbox et valeur 0

1 réponse
Avatar
pPTIFRED
rebonjour
voila dans mon code j'ai un soucis je doit rentrer 5 chiffres mais aussi
cela est possible que ce soit que des zeros mais dans ce cas il ne veut pas
prendre la valeur zero comment faire ??

Range("c19").Select
response13 = Application.InputBox("Saisir les 3 Derniers Chiffre du N° de
Compte Suivie de 2 Zeros", , ActiveWorkbook.ActiveSheet.Range("c19").Value)
If response13 <> False Then ActiveCell.Value = response13

merci par avance
ptifred

1 réponse

Avatar
Daniel
Bonjour.
Essaie :

Range("c19").Select
Range("C19").NumberFormat = "00000"
response13 = InputBox("Saisir les 3 Derniers Chiffre du N° de Compte Suivie
de 2 Zeros", _
, ActiveWorkbook.ActiveSheet.Range("c19").Value)
If response13 <> False Then ActiveCell.Value = response13

Cordialement.
Daniel
"pPTIFRED" a écrit dans le message de
news:
rebonjour
voila dans mon code j'ai un soucis je doit rentrer 5 chiffres mais aussi
cela est possible que ce soit que des zeros mais dans ce cas il ne veut
pas
prendre la valeur zero comment faire ??

Range("c19").Select
response13 = Application.InputBox("Saisir les 3 Derniers Chiffre du N° de
Compte Suivie de 2 Zeros", ,
ActiveWorkbook.ActiveSheet.Range("c19").Value)
If response13 <> False Then ActiveCell.Value = response13

merci par avance
ptifred