Discussion :

[pippoprod]

Bonjour,

Je débute en VBA et je souhaite récupérer la valeur choisie par l'utilisateur dans une liste déroulante.

Voici mon code :

Code :

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

1
2
3
4
5
6
 
Sub contrat_CDI()
 
Worksheets("CONTRAT_CDI").Cells(30, 11).Value = liste1.Value
 
End Sub

liste1 est le nom de ma liste qui est sur la même feuille.

J'ai le message d'erreur : "erreur d'execution 424" objet requis

merci d'avance pour votre aide.

Alexandre

[Ben_L]

Bonjour,

Le code à utiliser peut dépendre du type de contrôle que vous avez choisi (contrôle ActiveX ou contrôle de formulaire).
Pour un contrôle ActiveX :

Code :

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

1
2
3
4
5
Sub contrat_CDI()
    With Worksheets("CONTRAT_CDI")
        .Cells(30, 11).Value = .liste1.Value
    End With
End Sub

Pour un contrôle de formulaire :

Code :

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

1
2
3
4
5
Sub contrat_CDI()
    With Worksheets("CONTRAT_CDI")
        .Cells(30, 11).Value = .Shapes("liste1").OLEFormat.Object.Value
    End With
End Sub

Mais dans le cas d'un contrôle de formulaire, il n'est pas nécessaire de passer par une macro.
Le même comportement peut être obtenu en passant par la boîte de dialogue Format de contrôle (accessible par clic droit), onglet Contrôle. Utilisez la propriété nommée Cellule liée.

Cordialement

[pippoprod]

C'est parfait, merci beaucoup