Message-ID: <38303985.91782DEF@wanadoo.fr><laurent.longre@wanadoo.fr>
Date: Mon, 15 Nov 1999 17:49:09 +0100
From: Laurent longre 
Subject: Re: PB les arguments d'une fonction
Newsgroups: microsoft.public.fr.excel


D'une manière g&eacute;n&eacute;rale, pour tester si un argument Optional Variant a
&eacute;t&eacute; ou non transmis à la fonction:

If IsMissing(Arg) Then... ' Argument non renseign&eacute;

Laurent

Gilles Le Bret a &eacute;crit:
> 
> tu peux par exemple remplacer ton 2ieme parametre par un variant et faire le
> test suivant
> 
> function aze(ByVal z As double, Optional ByVal x As Variant)
>     If IsNumeric(x) Then
>         'la donn&eacute; a &eacute;t&eacute; rentr&eacute;
>         '&eacute;ventuellment transformer ici le variant en integer
>         msgbox "x num&eacute;rique"
>     Else
>         'pas d'entr&eacute;
>         msgbox "x vide"
>     End If
> End function
> 
> Sub Cas_x_vide()
>     aze 10
> End Sub
> 
> Sub Cas_x()
>     aze 10, 12
> End Sub
> 
><SHAMARD@CPR.FR> HAMARD Stephane  a &eacute;crit dans le message :
> BCB6369E596BD211982900104B6261CE02A133B7@serv-baker.systeme.cpr.fr...
> > Hello !
> >
> > dans une fonction j'ai un argument optionel
> > function myfunction (toto as double, optional titi as integer)
> >
> > comment savoir si l'utilisateur a entr&eacute; une valeur pour titi.
> > En effet si l'utilisateur n'entre rien titi=0 par d&eacute;faut.
> >
> > voici mon probl&eacute;me, si l'utilisateur n'entre rien dans titi je veux
> > pouvoir lui attribuer une valeur par d&eacute;faut, mais je ne peux pas faire
> > un test sur titi=0 car l'utilisateur peut entrer pour titi une valeur
> > =0....
> >
> > Je suis clair ?
> >
> > Merci pour votre aide.
> >