XL 2010 Inputbox

[kkamadou]

Bonsoir
Je veux créer un fiche adhérent en passant par l'Inputbox
je veux sortir de la procédure lorsque je clique sur le bouton annuler
afficher à nouveau l'InputBox lorsque rien n'est saisi ou que la saisi n'est pas un nombre entier après avoir cliqué sur ok

 

[jmfmarques]

Bonjour
Je crois que tu n'as pas compris la vocation du bouton "ANNULER" d'une inputbox. Il n'a pas celle de quitter la boite de dialogue, mais celle de remettre à "" une saisie. Sa fonction est uniquement interne et ne retourne à l'utilisateur aucune valeur permettant une prise de décision.

PS : ouvrir deux discussions pour le même problème n'est pas apprécié ici.
Je te suggère de supprimer ton autre discussion et de t'intéresser par ailleurs à la méthode Application.inputbox (qui n'est pas la fonction InputBox)

 

[kkamadou]

pourtant quand je clique sur "Annuler" l'InputBox disparaît au lieu de remettre à "" la saisi

 

[jmfmarques]

Elle "disparait", puisque tu ne lui donnes pas d'autres instructions. De la même manière qu'elle "disparaîtrait" en cliquant sur OK sans avoir rien saisi
As-tu ouvert ton aide interne VBA pour t'intéresser à la méthode que je t'ai suggérée ( Application.inputbox) ?
Apparemment non
Alors ?

je veux sortir de la procédure lorsque je clique sur le bouton annuler
afficher à nouveau l'InputBox lorsque rien n'est saisi ou que la saisi n'est pas un nombre entier après avoir cliqué sur ok

s'obtient en écrivant par exemple ceci (entre autres manières de faire)

Dim toto As Boolean
Do While Not toto
   titi = Application.InputBox("Saisis un nombre ENTIER", , , , , , 1)
   If titi = False Or (titi <> "" And titi Like String(Len(titi), "#")) Then toto = True
Loop

Analyse et comprends-en la logique ainsi exprimée.

 

[kkamadou]

Merci Beaucoup

 

[job75]

Bonsoir,

Bah ce fil a été créé plus tôt et a reçu une solution plus tôt :

https://www.excel-downloads.com/threads/inputbox-condition-xl-2007.20042706/#post-20308460

A+

 

[jmfmarques]

Bonjour Job75
Vous portez-vous bien ?
Avez-vous par ailleurs lu le message #2 (à 20h01) de la présente discussion ?

 

[job75]

Pas de problème, en attendant des jours meilleurs je me suis retiré en Normandie.