Bonjour de nouveau,
dans un évennement je souhaiterais écrire la formule suivante :
if "echelle" compris entre 1 et 6 then
"nbjours" = "365"
if "echelle" compris entre 6 et 8 then
"nbjours" = 365*2
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
michel
Bonjour Uriane essaie
sub test select case echelle case 1 to 6 nbJours65 case 6 to 8 nbJours65*2 case else end select msgbox nbJours end sub -- Michel "uriane" a écrit dans le message de news:
Bonjour de nouveau, dans un évennement je souhaiterais écrire la formule suivante : if "echelle" compris entre 1 et 6 then "nbjours" = "365" if "echelle" compris entre 6 et 8 then "nbjours" = 365*2
etc .... merci -- Uriane
Bonjour Uriane
essaie
sub test
select case echelle
case 1 to 6
nbJours65
case 6 to 8
nbJours65*2
case else
end select
msgbox nbJours
end sub
--
Michel
"uriane" <uriane@discussions.microsoft.com> a écrit dans le message de news:
636DBAED-6C4A-4A91-9102-8129B832BE39@microsoft.com...
Bonjour de nouveau,
dans un évennement je souhaiterais écrire la formule suivante :
if "echelle" compris entre 1 et 6 then
"nbjours" = "365"
if "echelle" compris entre 6 et 8 then
"nbjours" = 365*2
sub test select case echelle case 1 to 6 nbJours65 case 6 to 8 nbJours65*2 case else end select msgbox nbJours end sub -- Michel "uriane" a écrit dans le message de news:
Bonjour de nouveau, dans un évennement je souhaiterais écrire la formule suivante : if "echelle" compris entre 1 et 6 then "nbjours" = "365" if "echelle" compris entre 6 et 8 then "nbjours" = 365*2
etc .... merci -- Uriane
uriane
Merci Michel, je vais de ce pas essayer -- Uriane
Bonjour Uriane essaie
sub test select case echelle case 1 to 6 nbJours65 case 6 to 8 nbJours65*2 case else end select msgbox nbJours end sub -- Michel "uriane" a écrit dans le message de news:
Bonjour de nouveau, dans un évennement je souhaiterais écrire la formule suivante : if "echelle" compris entre 1 et 6 then "nbjours" = "365" if "echelle" compris entre 6 et 8 then "nbjours" = 365*2
etc .... merci -- Uriane
Merci Michel, je vais de ce pas essayer
--
Uriane
Bonjour Uriane
essaie
sub test
select case echelle
case 1 to 6
nbJours65
case 6 to 8
nbJours65*2
case else
end select
msgbox nbJours
end sub
--
Michel
"uriane" <uriane@discussions.microsoft.com> a écrit dans le message de news:
636DBAED-6C4A-4A91-9102-8129B832BE39@microsoft.com...
Bonjour de nouveau,
dans un évennement je souhaiterais écrire la formule suivante :
if "echelle" compris entre 1 et 6 then
"nbjours" = "365"
if "echelle" compris entre 6 et 8 then
"nbjours" = 365*2
sub test select case echelle case 1 to 6 nbJours65 case 6 to 8 nbJours65*2 case else end select msgbox nbJours end sub -- Michel "uriane" a écrit dans le message de news:
Bonjour de nouveau, dans un évennement je souhaiterais écrire la formule suivante : if "echelle" compris entre 1 et 6 then "nbjours" = "365" if "echelle" compris entre 6 et 8 then "nbjours" = 365*2
