XL 2016 Aide macro

[michokette]

Bonjour à tous
je me suis inspiré d'une macro prise sur le site de Jacque BOISGONTIER, mais n'arrive pas à l'adapter à mon cas.
Ainsi quand je double clique sur la cellule E14 de l'onglet Fiche, un Userform s'affiche et je choisie un salarié dans la liste, puis je clique sur ok
et c'est la que mon problème commence
si je clique sur OK les éléments vont venir s'afficher dans ma feuille les uns aprés les autres soit respectivements dans les cellules I14, j14, et k14
Normal me diriez vous puisque cela ne fait suivre que les instructions donné par la macro :
Private Sub ComboBox1_Click()
Set result = Rng.Find(what:=Me.ComboBox1)
If Not result Is Nothing Then
Me.TextBox1 = result.Offset(, 1)
Me.TextBox2 = result.Offset(, 2)
Me.TextBox3 = result.Offset(, 3)
End If
End Sub
Private Sub B_ok_Click()
ActiveCell = Me.ComboBox1
ActiveCell.Offset(, 1) = Me.TextBox1
ActiveCell.Offset(, 2) = Me.TextBox2
ActiveCell.Offset(, 3) = Me.TextBox3
Unload Me
End Sub

Il faudrait donc modifier le code de la macro pour que:
la dénomination sociale qui apparait sur l'userform s'affiche en F8
le prénom qui apparait sur l'userform s'affiche en E16
le SIRET qui apparait sur l'userform s'affiche en F10

En vous remerciant par avance de vos réponses

 

[chris]

Bonjour

J'ai

• mis ta base de données sous forme de tableau structuré
• corrigé la formule en M14
• modifié le code : l'offset n'était pas bon et n'est pas applicable avec des cellules fusionnées

 

[michokette]

Chris bonjour

que dire a part que tout est nickel
un grand merci à toi
Bien cordialement