Sélectionner une case en croisant deux listes

Bonjour à tous,

Depuis quelques jours je suis bloquée sur un sujet.

J'ai créée la frm ci dessous :

Les listes sont incrémentées de la manière suivante :

Ligne des salariés pour le choix salarié,

Colonnes des semaines pour le choix semaine.

Je souhaite croiser les deux listes afin de sélectionner une case et y insérer le nombre d'heures via la texte box.

J'ai essayé plusieurs choses mais je me retrouve toujours bloquée.

Par exemple :

Private Sub Btvalider_Click()

a = FrmDepMo.ZLchoixsalarie
b = FrmDepMo.ZLchoixsem
c = FrmDepMo.TbNbHeures

Worksheets("MO").Select

Dim a As Range
Dim b As Range

Intersect(a, b).Select
ActiveCell = c

End Sub

Si vous avez une petite idée je suis preneuse :)

Je vous remercies d'avance pour votre aide !

Cordialement,

Bonjour,

Sans le classeur, pas possible de donner des infos qui fonctionneront à coup sûr.

mais, en adaptant ce principe .... :

a = FrmDepMo.ZLchoixsalarie.ListIndex + 2 'adapter le décalage
b = FrmDepMo.ZLchoixsem.ListIndex + 6     'adapter le décalage
c = FrmDepMo.TbNbHeures

Worksheets("MO").Cells(b , a).Value = c

A+

Super, sincèrement merci beaucoup j'ai réussi à la faire fonctionner !

Je pourrais m'en servir à nouveau

Bonjour tout le monde,

Une proposition :