Bonjour,
J'ai cr=E9e une liste de noms correspondants chacuns =E0 une feuille d'1
m=EAme classeur.
A partir d'une cellule avec cette liste d=E9roulante
(Donn=E9es/Validation/Liste) j'aimerais cr=E9e 1 macro qui permette
d'aller directement sur la feuille concern=E9e.
Est_ce que quelqu'un =E0 une solution ?
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 SD,
Si tu as une version récente 2002 et 2003, tu peux utiliser ceci car la modification de la liste n'active pas les procédures événementielles.
Code à copier dans le module feuille où ta liste est située : E1 = cellule où est ta liste déroulante ! '------------------------------- Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("E1").Address And _ Range("E1") <> "" Then Sheets(Range("E1").Text).Select End If
End Sub '-------------------------------
Pour une plus ancienne version, tu insères une feuille que tu masquera et dans la cellule E1, tu inscris la formule : þuil1!E1 Feuil1 étant la feuille où se trouve ta liste déroulante. et tu insères le même code dans la feuille masquée.
à chaque fois que tu modifieras ta liste déroulante, cela modifiera l'information dans ta feuille cachée et activera l'événement de la macro.
Salutations!
"SD" a écrit dans le message de news: Bonjour, J'ai crée une liste de noms correspondants chacuns à une feuille d'1 même classeur. A partir d'une cellule avec cette liste déroulante (Données/Validation/Liste) j'aimerais crée 1 macro qui permette d'aller directement sur la feuille concernée. Est_ce que quelqu'un à une solution ?
Bonjour SD,
Si tu as une version récente 2002 et 2003, tu peux utiliser ceci car la modification de la liste n'active pas les procédures
événementielles.
Code à copier dans le module feuille où ta liste est située :
E1 = cellule où est ta liste déroulante !
'-------------------------------
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("E1").Address And _
Range("E1") <> "" Then
Sheets(Range("E1").Text).Select
End If
End Sub
'-------------------------------
Pour une plus ancienne version, tu insères une feuille que tu masquera et dans la cellule E1, tu inscris la formule :
þuil1!E1
Feuil1 étant la feuille où se trouve ta liste déroulante.
et tu insères le même code dans la feuille masquée.
à chaque fois que tu modifieras ta liste déroulante, cela modifiera l'information dans ta feuille cachée et activera l'événement de
la macro.
Salutations!
"SD" <stephetnel@aol.com> a écrit dans le message de news: 1125166613.451825.167410@g43g2000cwa.googlegroups.com...
Bonjour,
J'ai crée une liste de noms correspondants chacuns à une feuille d'1
même classeur.
A partir d'une cellule avec cette liste déroulante
(Données/Validation/Liste) j'aimerais crée 1 macro qui permette
d'aller directement sur la feuille concernée.
Est_ce que quelqu'un à une solution ?
Si tu as une version récente 2002 et 2003, tu peux utiliser ceci car la modification de la liste n'active pas les procédures événementielles.
Code à copier dans le module feuille où ta liste est située : E1 = cellule où est ta liste déroulante ! '------------------------------- Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("E1").Address And _ Range("E1") <> "" Then Sheets(Range("E1").Text).Select End If
End Sub '-------------------------------
Pour une plus ancienne version, tu insères une feuille que tu masquera et dans la cellule E1, tu inscris la formule : þuil1!E1 Feuil1 étant la feuille où se trouve ta liste déroulante. et tu insères le même code dans la feuille masquée.
à chaque fois que tu modifieras ta liste déroulante, cela modifiera l'information dans ta feuille cachée et activera l'événement de la macro.
Salutations!
"SD" a écrit dans le message de news: Bonjour, J'ai crée une liste de noms correspondants chacuns à une feuille d'1 même classeur. A partir d'une cellule avec cette liste déroulante (Données/Validation/Liste) j'aimerais crée 1 macro qui permette d'aller directement sur la feuille concernée. Est_ce que quelqu'un à une solution ?
