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
MichDenis
Bonjour JeNeVois,
Select case Range("A2").value case 1 mymacro1 case 2 mymacro2 'Autant de case que tu veux case else 'si aucun des cas précédents arrivent 'l'action à entreprendre (seulement si nécessaire) End Select
Salutations!
"JeNeVois" a écrit dans le message de news:
Bonjour
j'aimerais associer des noms de macros à exécuter à la valeur d'une cellule donnée, et ceci, si possible, sans if...else.
exp: if Range("A2").Value=1 then mymacro1 else if Range("A2").Value=2 then mymacro2 'etc. end if end if
Est-il possible de réealiser cela avec "Select Case" (ou une autre méthode) ?
Merci d'avance pour toute réponse
Bonjour JeNeVois,
Select case Range("A2").value
case 1
mymacro1
case 2
mymacro2
'Autant de case que tu veux
case else
'si aucun des cas précédents arrivent
'l'action à entreprendre (seulement si nécessaire)
End Select
Salutations!
"JeNeVois" <JeNeVois@discussions.microsoft.com> a écrit dans le message de news:
F06610DD-D2FA-4CE7-BAFD-9D9A73D434D3@microsoft.com...
Bonjour
j'aimerais associer des noms de macros à exécuter
à la valeur d'une cellule donnée, et ceci, si possible,
sans if...else.
exp:
if Range("A2").Value=1 then
mymacro1
else
if Range("A2").Value=2 then
mymacro2 'etc.
end if
end if
Est-il possible de réealiser cela avec "Select Case"
(ou une autre méthode) ?
Select case Range("A2").value case 1 mymacro1 case 2 mymacro2 'Autant de case que tu veux case else 'si aucun des cas précédents arrivent 'l'action à entreprendre (seulement si nécessaire) End Select
Salutations!
"JeNeVois" a écrit dans le message de news:
Bonjour
j'aimerais associer des noms de macros à exécuter à la valeur d'une cellule donnée, et ceci, si possible, sans if...else.
exp: if Range("A2").Value=1 then mymacro1 else if Range("A2").Value=2 then mymacro2 'etc. end if end if
Est-il possible de réealiser cela avec "Select Case" (ou une autre méthode) ?
Merci d'avance pour toute réponse
anonymousA
bonjour
select case range("A2").value
case 1 MyMacro1 case 2 My Macro2 etc...
end select
possible aussi avec des Elseif
A+
Bonjour
j'aimerais associer des noms de macros à exécuter à la valeur d'une cellule donnée, et ceci, si possible, sans if...else.
exp: if Range("A2").Value=1 then mymacro1 else if Range("A2").Value=2 then mymacro2 'etc. end if end if
Est-il possible de réealiser cela avec "Select Case" (ou une autre méthode) ?
Merci d'avance pour toute réponse
bonjour
select case range("A2").value
case 1
MyMacro1
case 2
My Macro2
etc...
end select
possible aussi avec des Elseif
A+
Bonjour
j'aimerais associer des noms de macros à exécuter
à la valeur d'une cellule donnée, et ceci, si possible,
sans if...else.
exp:
if Range("A2").Value=1 then
mymacro1
else
if Range("A2").Value=2 then
mymacro2 'etc.
end if
end if
Est-il possible de réealiser cela avec "Select Case"
(ou une autre méthode) ?
j'aimerais associer des noms de macros à exécuter à la valeur d'une cellule donnée, et ceci, si possible, sans if...else.
exp: if Range("A2").Value=1 then mymacro1 else if Range("A2").Value=2 then mymacro2 'etc. end if end if
Est-il possible de réealiser cela avec "Select Case" (ou une autre méthode) ?
Merci d'avance pour toute réponse
JeNeVois
@anonymousA @MichDenis
Merci et bonne journée !
salutations
Bonjour JeNeVois,
Select case Range("A2").value case 1 mymacro1 case 2 mymacro2 'Autant de case que tu veux case else 'si aucun des cas précédents arrivent 'l'action à entreprendre (seulement si nécessaire) End Select
Salutations!
"JeNeVois" a écrit dans le message de news:
Bonjour
j'aimerais associer des noms de macros à exécuter à la valeur d'une cellule donnée, et ceci, si possible, sans if...else.
exp: if Range("A2").Value=1 then mymacro1 else if Range("A2").Value=2 then mymacro2 'etc. end if end if
Est-il possible de réealiser cela avec "Select Case" (ou une autre méthode) ?
Merci d'avance pour toute réponse
@anonymousA
@MichDenis
Merci et bonne journée !
salutations
Bonjour JeNeVois,
Select case Range("A2").value
case 1
mymacro1
case 2
mymacro2
'Autant de case que tu veux
case else
'si aucun des cas précédents arrivent
'l'action à entreprendre (seulement si nécessaire)
End Select
Salutations!
"JeNeVois" <JeNeVois@discussions.microsoft.com> a écrit dans le message de news:
F06610DD-D2FA-4CE7-BAFD-9D9A73D434D3@microsoft.com...
Bonjour
j'aimerais associer des noms de macros à exécuter
à la valeur d'une cellule donnée, et ceci, si possible,
sans if...else.
exp:
if Range("A2").Value=1 then
mymacro1
else
if Range("A2").Value=2 then
mymacro2 'etc.
end if
end if
Est-il possible de réealiser cela avec "Select Case"
(ou une autre méthode) ?
Select case Range("A2").value case 1 mymacro1 case 2 mymacro2 'Autant de case que tu veux case else 'si aucun des cas précédents arrivent 'l'action à entreprendre (seulement si nécessaire) End Select
Salutations!
"JeNeVois" a écrit dans le message de news:
Bonjour
j'aimerais associer des noms de macros à exécuter à la valeur d'une cellule donnée, et ceci, si possible, sans if...else.
exp: if Range("A2").Value=1 then mymacro1 else if Range("A2").Value=2 then mymacro2 'etc. end if end if
Est-il possible de réealiser cela avec "Select Case" (ou une autre méthode) ?
