créer un lien entre menu déroulant et plusieurs feuilles excel

Question

Sujet : Associer un menu déroulant à plusieurs feuilles

Message :
Je voudrai savoir comment à partir d'une liste déroulante placée sur le feuille 1 d'un classeur excel, on peut aller à une autre feuille. 
en réalité, je veux que dans le liste déroulante il y ait plusieurs opérations et quand on selectionne une opération on va sur la page de l'opération(ex: si je sélectionne echange visseuse on va sur la page mvt moyen process (echange visseuse  étant la feuille mvt moyen process du classeur) 
Merci beaucoup pour votre aide car c'est super urgent !!! 

Private Sub Worksheet_Change(ByVal Target As Range) 

    On Error GoTo ErrorHandler 
    On Error GoTo 0 
    On Error Resume Next 

    If Target.Column = 8 Then 
        If Target.Value > 67000 Then 
            Sheets("Saisie").Select 
            Application.Goto Reference:="R65536C1" 
            Selection.End(xlUp).Select 
            Ligne = ActiveCell.Row 
            While Ligne > 1 
                Valeur = Worksheets("Saisie").Range("H" & Ligne) 
                If Valeur = "Echange visseuse" Then 
                    Sheets("MVT MOYEN PROCESS").Select 
                     
                End If 
           
             
                    Valeur = Worksheets("Saisie").Range("H" & Ligne) 
                    If Valeur = "changement couple" Then 
                    Sheets("DEMANDE CHANGEMENT COUPLE  ").Select 
                     
                    End If 
                   
           
           
                    Valeur = Worksheets("Saisie").Range("H" & Ligne) 
                    If Valeur = "changement criticite" Then 
                    Sheets("DEMANDE CHANGEMENT de CRITICITE").Select 
                     
                    End If 
                 
             
                    Valeur = Worksheets("Saisie").Range("H" & Ligne) 
                    If Valeur = "Preparation outil" Then 
                    Sheets("DEMANDE DE PREPARATION VISSEUSE").Select 
                     
                End If 
                 
                Ligne = Ligne - 1 
           
           
          Wend 
        End If 
    End If 
     
ErrorHandler: 
    If Err.Number <> 13 Then Resume 

End Sub 

Par contre le^programme ne fonctionne pas 

Voici une partie de mon programme

jrivet · Answer

Salut, Ne le prends pas mal mais

[reglement.aspx Voir le règlement de CodeS-SourceS]
Si ton sujet n'est pas résolu il ne SERT A RIEN D'APPUYER SUR Réponse acceptée dans l'autre post. [infomsgf_VISUAL-BASIC_1.aspx Visual Basic 6] / [infomsgt_MULTIMEDIA_246.aspx Multimédia] / [infomsgt_DIRECTX_248.aspx DirectX] / [infomsg_MENU-DEROULANT_1112876.aspx#1 menu déroulant]
Tu noteras que ton problème n'a RIEN a voir avec [infomsgt_MULTIMEDIA_246.aspx Multimédia] / [infomsgt_DIRECTX_248.aspx DirectX]
Il faut prendre conscience que ceux qui répondent sur le forum NE SONT PAS FORCEMENT Scotché devant leur PC il est possible voir souhaitable qu'ils AIENT UN TRAVAIL. donc quand tu postes sur un forum tu dois avoir de la PATIENCE. Si tu n'en as pas assez pour attendre utilises Google et décrouilles toi. le travail ira toujours plus vite si tu ne compte pas sur les autres pour résoudre tes problème
Merci de plus m'envoyer de MP (message privé) surtout 2 dans la meme journée.
Copie des MP recus (tu noteras que envoyer un MP et REPOSTER une question c'est limite)

Message envoyé par [auteur/MOUNIRT82/1370490.aspx mounirt82]le 17/04/2008 11:49:45 Sujet : menu déroulant Message : t'entends quoi par select de l'objet sheet

Message envoyé par [auteur/MOUNIRT82/1370490.aspx mounirt82] le 17/04/2008 15:36:32 Sujet : menu déroulant + lien onglet "Je voudrai savoir comment à partir d'une liste déroulante placée sur le feuille 1 d'un classeur excel, on peut aller à une autre feuille. en réalité, je veux que dans le liste déroulante il y ait plusieurs opérations et quand on selectionne une opération on va sur la page de l'opération(ex: si je sélectionne echange visseuse on va sur la page mvt moyen process (echange visseuse étant la feuille mvt moyen process du classeur) Merci beaucoup pour votre aide car c'est super urgent !!! Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo ErrorHandler On Error GoTo 0 On Error Resume Next If Target.Column = 8 Then If Target.Value > 67000 Then Sheets("Saisie").Select Application.Goto Reference:= "R65536C1" Selection.End(xlUp).Select Ligne = ActiveCell.Row While Ligne > 1 Valeur = Worksheets("Saisie").Range("H" & Ligne) If Valeur = "Echange visseuse" Then Sheets("MVT MOYEN PROCESS").Select End If Valeur = Worksheets("Saisie").Range("H" & Ligne) If Valeur = "changement couple" Then Sheets("DEMANDE CHANGEMENT COUPLE ").Select End If Valeur = Worksheets("Saisie").Range("H" & Ligne) If Valeur = "changement criticite" Then Sheets("DEMANDE CHANGEMENT de CRITICITE").Select End If Valeur = Worksheets("Saisie").Range("H" & Ligne) If Valeur = "Preparation outil" Then Sheets("DEMANDE DE PREPARATION VISSEUSE").Select End If Ligne = Ligne - 1 Wend End If End If ErrorHandler: If Err.Number <> 13 Then Resume End Sub Par contre le^programme ne fonctionne pas Voici une partie de mon programme Au faite j'ai un menu déroulant composé de plusieurs paramètres qui sont les suivants:echange visseuse, préparation outil, changement couple, changement criticité, controle et pret. Sur le meme fichier excel j'ai 4 onglets qui correspondent à mvt moyen process prépartion outil... Ce fichier sera utilisé par différentes personnes et je veux que quand une personne va renseigner le fichier et qu'elle va à la colonne h la j'ai intégrer un menu déroulant et quand la personne sélectionne par ex échange visseuse automatiquement elle le renvoie à l'onglet mvt process qui est dans le meme fichier mais pas dans la meme feuille. Merci de ton aide car sa fait une semaine que je suis dessus et toujours rien "

@+: Ju£i?n Pensez: Réponse

Créer un lien entre menu déroulant et plusieurs feuilles excel

1 réponse

Votre réponse

Discussions similaires