Discussion :

[Maxou 10]

Bonjour à tous,

J'ai essayer de faire un code pour ouvrir une feuille en fonction de la case C4 et C5.
Il me semble que j'arrive au bout de mes petites compétences car je n'y suis pas arriver.

ma combobox s'appelle ListeEleve et ma userform Liens.
mes feuilles sont nommées "tableau synthèse" puis "Élève ligne 04" à "Élève ligne 17".

voici comment je charge ma combobox en prenant les 2 colonnes de ma première feuille Tableau synthèse

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Private Sub UserForm_Initialize()
    Set Ws = Sheets("Tableau synthèse")
 
    With Me.ListeEleve
        For Plage = 4 To 17
        Text = Ws.Cells(Plage, 1)
            If Text <> "" Then
                .AddItem Ws.Range("A" & Plage) & " " & Ws.Range("F" & Plage)
            End If
        Next Plage
    End With
End Sub

Et j'essai de faire mes liens en comparant mes cases C4 et C5 qui sont un repports de mes 2 colonnes Tableau synthèse.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Valider_Click()
        For i = 4 To 17
        Dim sheetName As String
        sheetName = "Élève ligne 0" & i
 
        If Sheets(sheetName).Range("C4") & Sheets(sheetName).Range("C5") = ListeEleve Then
            Sheets(sheetName).Select
        End If
    Next i
 
    Unload Me
End Sub

Je ne sais pas si j'ai était clair dans mes explication et merci de votre aide.
Bonne soirée

[Franc]

Bonsoir, pour moi c'est pas très clair, je ne vois pas ce que tu veux dire par "j'essaie de faire mes liens".
Que veux-tu obtenir quand tu cliques sur le bouton valider et quel est le problème ?

[Maxou 10]

Bonsoir, pour moi c'est pas très clair, je ne vois pas ce que tu veux dire par "j'essaie de faire mes liens".
Que veux-tu obtenir quand tu cliques sur le bouton valider et quel est le problème ?

Dans ma feuille "Tableau synthèse" j'ai la colonne en A avec les noms et la colonne F avec les prénoms.
j'ai fait des feuilles qui répercute en fiche individuelle qui s'appelle Élève ligne 04; Élève ligne 05;......Élève ligne 17. Dans ces feuilles, j'ai le nom en C4 et le prénom en C5

J'aimerais pouvoir choisir dans ma combobox par exemple DUPONT Francis puis quand je valide avec mon bouton, cela m'ouvre la feuille qui à DUPONT en C4 et Francis en C5.

Excel me dit que cette ligne doit être déboger :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If Sheets(sheetName).Range("C4") & Sheets(sheetName).Range("C5") = ListeEleve Then

J'ai pensé à faire:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ListeEleve.value = Sheets(sheetName).Range("C4") & Sheets(sheetName).Range("C5") Then

Mais je pense que je suis à coté de la plaque.....
J'espère avoir été plus clair...

Merci encore

[Franc]

Moi je modifierais en

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 If Sheets(sheetName).Range("C4") & " " & Sheets(sheetName).Range("C5") = ListeEleve.Value Then

j'ai ajouté un espace entre C4 et C5, j'imagine que dans ton combobox les noms et prénoms ne sont pas collés l'un à l'autre et j'ajoute .value pour faire la comparaison avec la valeur de ta sélection dans ton combobox.

[Maxou 10]

Effectivement il me fallait un espace.
Cela fonctionne mais j'ai quand même un message d'erreur sur ma ligne. (Erreur d'exécution '9': L'indice n'appartient pas à la sélection.)

De plus, si j'ai une ligne vide dans "tableau synthèse" le select devient inactif....

[Franc]

Ce serait mieux avec un fichier exemple pour tester.