Bonjour,
j'ai une Inputbox qui demande une valeur:
decale = InputBox("nombre de minutes", "nombre", 0)
pas de souci en fonctionnement "normal"
je souhaite traiter le cas où on appuie sur annuler sans entrer de valeur et
sortir de la procédure
quelle valeur est renvoyée dans ce cas ? et quelle suite ?
Merci de vos réponses
Bonjour, j'ai une Inputbox qui demande une valeur: decale = InputBox("nombre de minutes", "nombre", 0) pas de souci en fonctionnement "normal" je souhaite traiter le cas où on appuie sur annuler sans entrer de valeur et sortir de la procédure quelle valeur est renvoyée dans ce cas ? et quelle suite ? Merci de vos réponses
Bonsoir,
Essaie ceci :
Sub sdeca()
decale = InputBox("nombre de minutes", "nombre", 0)
If decale = "" Then MsgBox "t'as rien saisi, vilain !"
End Sub
tu constateras qu'annuler reviens à renvoyer une valeur vide
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/mpfe/connexion.php
News://news.microsoft.com/microsoft.public.fr.excel
"Unss34" <unss34(a_enlever)@free.fr> a écrit dans le message de
news:eQKtkgeaJHA.6036@TK2MSFTNGP05.phx.gbl...
Bonjour,
j'ai une Inputbox qui demande une valeur:
decale = InputBox("nombre de minutes", "nombre", 0)
pas de souci en fonctionnement "normal"
je souhaite traiter le cas où on appuie sur annuler sans entrer de valeur
et sortir de la procédure
quelle valeur est renvoyée dans ce cas ? et quelle suite ?
Merci de vos réponses
Bonjour, j'ai une Inputbox qui demande une valeur: decale = InputBox("nombre de minutes", "nombre", 0) pas de souci en fonctionnement "normal" je souhaite traiter le cas où on appuie sur annuler sans entrer de valeur et sortir de la procédure quelle valeur est renvoyée dans ce cas ? et quelle suite ? Merci de vos réponses
JB
Bonsoir,
decale = InputBox("nombre de minutes", "nombre", 0) If Len(decale) = 0 Then Exit Sub
On 29 déc, 20:05, "Unss34" <unss34(a_enlever)@free.fr> wrote:
Bonjour, j'ai une Inputbox qui demande une valeur: decale = InputBox("nombre de minutes", "nombre", 0) pas de souci en fonctionnement "normal" je souhaite traiter le cas où on appuie sur annuler sans entrer de vale ur et sortir de la procédure quelle valeur est renvoyée dans ce cas ? et quelle suite ? Merci de vos réponses
Bonsoir,
decale = InputBox("nombre de minutes", "nombre", 0)
If Len(decale) = 0 Then Exit Sub
JB
http://boisgontierjacques.free.fr
On 29 déc, 20:05, "Unss34" <unss34(a_enlever)@free.fr> wrote:
Bonjour,
j'ai une Inputbox qui demande une valeur:
decale = InputBox("nombre de minutes", "nombre", 0)
pas de souci en fonctionnement "normal"
je souhaite traiter le cas où on appuie sur annuler sans entrer de vale ur et
sortir de la procédure
quelle valeur est renvoyée dans ce cas ? et quelle suite ?
Merci de vos réponses
On 29 déc, 20:05, "Unss34" <unss34(a_enlever)@free.fr> wrote:
Bonjour, j'ai une Inputbox qui demande une valeur: decale = InputBox("nombre de minutes", "nombre", 0) pas de souci en fonctionnement "normal" je souhaite traiter le cas où on appuie sur annuler sans entrer de vale ur et sortir de la procédure quelle valeur est renvoyée dans ce cas ? et quelle suite ? Merci de vos réponses
michdenis
que tu peux adapter selon tes besoins
Sub test() Dim decale As Variant Do decale = Application.InputBox("nombre de minutes", "nombre", 0) If Format(decale) = False Then MsgBox "L'usage a cliqué sur annuler." Exit Sub End If If decale = "" Then MsgBox "La boîte de saisie est vide et l'usage a dit Ok" End If Loop Until IsNumeric(decale) End Sub
"Unss34" <unss34(a_enlever)@free.fr> a écrit dans le message de news:
Bonjour, j'ai une Inputbox qui demande une valeur: decale = InputBox("nombre de minutes", "nombre", 0) pas de souci en fonctionnement "normal" je souhaite traiter le cas où on appuie sur annuler sans entrer de valeur et sortir de la procédure quelle valeur est renvoyée dans ce cas ? et quelle suite ? Merci de vos réponses
que tu peux adapter selon tes besoins
Sub test()
Dim decale As Variant
Do
decale = Application.InputBox("nombre de minutes", "nombre", 0)
If Format(decale) = False Then
MsgBox "L'usage a cliqué sur annuler."
Exit Sub
End If
If decale = "" Then
MsgBox "La boîte de saisie est vide et l'usage a dit Ok"
End If
Loop Until IsNumeric(decale)
End Sub
"Unss34" <unss34(a_enlever)@free.fr> a écrit dans le message de news:
eQKtkgeaJHA.6036@TK2MSFTNGP05.phx.gbl...
Bonjour,
j'ai une Inputbox qui demande une valeur:
decale = InputBox("nombre de minutes", "nombre", 0)
pas de souci en fonctionnement "normal"
je souhaite traiter le cas où on appuie sur annuler sans entrer de valeur et
sortir de la procédure
quelle valeur est renvoyée dans ce cas ? et quelle suite ?
Merci de vos réponses
Sub test() Dim decale As Variant Do decale = Application.InputBox("nombre de minutes", "nombre", 0) If Format(decale) = False Then MsgBox "L'usage a cliqué sur annuler." Exit Sub End If If decale = "" Then MsgBox "La boîte de saisie est vide et l'usage a dit Ok" End If Loop Until IsNumeric(decale) End Sub
"Unss34" <unss34(a_enlever)@free.fr> a écrit dans le message de news:
Bonjour, j'ai une Inputbox qui demande une valeur: decale = InputBox("nombre de minutes", "nombre", 0) pas de souci en fonctionnement "normal" je souhaite traiter le cas où on appuie sur annuler sans entrer de valeur et sortir de la procédure quelle valeur est renvoyée dans ce cas ? et quelle suite ? Merci de vos réponses
Tendasque
Bonjour, et merci à vous trois; j'ai adopté la solution de JB qui s'intègre le mieux à mon cas Bonne fin d'année et meilleurs voeux pour 2009 !
"michdenis" a écrit dans le message de news: edG%
que tu peux adapter selon tes besoins
Sub test() Dim decale As Variant Do decale = Application.InputBox("nombre de minutes", "nombre", 0) If Format(decale) = False Then MsgBox "L'usage a cliqué sur annuler." Exit Sub End If If decale = "" Then MsgBox "La boîte de saisie est vide et l'usage a dit Ok" End If Loop Until IsNumeric(decale) End Sub
"Unss34" <unss34(a_enlever)@free.fr> a écrit dans le message de news:
Bonjour, j'ai une Inputbox qui demande une valeur: decale = InputBox("nombre de minutes", "nombre", 0) pas de souci en fonctionnement "normal" je souhaite traiter le cas où on appuie sur annuler sans entrer de valeur et sortir de la procédure quelle valeur est renvoyée dans ce cas ? et quelle suite ? Merci de vos réponses
Bonjour,
et merci à vous trois; j'ai adopté la solution de JB qui s'intègre le mieux
à mon cas
Bonne fin d'année et meilleurs voeux pour 2009 !
"michdenis" <michdenis@hotmail.com> a écrit dans le message de news:
edG%23W2eaJHA.4732@TK2MSFTNGP04.phx.gbl...
que tu peux adapter selon tes besoins
Sub test()
Dim decale As Variant
Do
decale = Application.InputBox("nombre de minutes", "nombre", 0)
If Format(decale) = False Then
MsgBox "L'usage a cliqué sur annuler."
Exit Sub
End If
If decale = "" Then
MsgBox "La boîte de saisie est vide et l'usage a dit Ok"
End If
Loop Until IsNumeric(decale)
End Sub
"Unss34" <unss34(a_enlever)@free.fr> a écrit dans le message de news:
eQKtkgeaJHA.6036@TK2MSFTNGP05.phx.gbl...
Bonjour,
j'ai une Inputbox qui demande une valeur:
decale = InputBox("nombre de minutes", "nombre", 0)
pas de souci en fonctionnement "normal"
je souhaite traiter le cas où on appuie sur annuler sans entrer de valeur
et
sortir de la procédure
quelle valeur est renvoyée dans ce cas ? et quelle suite ?
Merci de vos réponses
Bonjour, et merci à vous trois; j'ai adopté la solution de JB qui s'intègre le mieux à mon cas Bonne fin d'année et meilleurs voeux pour 2009 !
"michdenis" a écrit dans le message de news: edG%
que tu peux adapter selon tes besoins
Sub test() Dim decale As Variant Do decale = Application.InputBox("nombre de minutes", "nombre", 0) If Format(decale) = False Then MsgBox "L'usage a cliqué sur annuler." Exit Sub End If If decale = "" Then MsgBox "La boîte de saisie est vide et l'usage a dit Ok" End If Loop Until IsNumeric(decale) End Sub
"Unss34" <unss34(a_enlever)@free.fr> a écrit dans le message de news:
Bonjour, j'ai une Inputbox qui demande une valeur: decale = InputBox("nombre de minutes", "nombre", 0) pas de souci en fonctionnement "normal" je souhaite traiter le cas où on appuie sur annuler sans entrer de valeur et sortir de la procédure quelle valeur est renvoyée dans ce cas ? et quelle suite ? Merci de vos réponses