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
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
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
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" <pPTIFRED@discussions.microsoft.com> a écrit dans le message de
news: 4935B1C1-FDAB-49FB-9F5A-7DA13CCF0E27@microsoft.com...
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
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