Intersection tableau multi-entrée (3)

Bonjour,

Je reviens à la charge avec mon problème que j’essaie de regler depuis plusieurs semaines sans succès.

Pour faire simple j'ai un userform à l'ouverture du document. J'entre ma date (DTPicker) qui s'affiche sur la ligne 1 puis je choisis le moment de la journée (Button) qui s'affiche dans un label. L'intitulé du label s'affichera ensuite sur la ligne 2. Enfin je rentre la durée dans une Textbox et cette durée (de l'entrainement ici) doit s'afficher dans la colonne correspondante au jour et moment de la journée défini.

Jusque là avec une intersection simple 1 ligne et 1 donné dans la colonne j'y arrivais et j'étais parti sur ca pour resoudre mon problème mais cela ne prend en compte que 1 variable

Private Sub TextBox2_Change()
Col = [1:1].Find(Me.DTPicker1.Value).Column
Col = [2:2].Find(Me.Label3.Caption).Column
Lig = 36
Cells(Lig, Col) = Me.TextBox2.Value
End Sub

Puis on m'a proposé mais le problème c'est qu'en cas de DTPicker 1 identique ou de label3 identique toutes les colonnes concernées sont changées

Private Sub TextBox2_Change()
Cells(36, [1:1].Find(Me.DTPicker1.Value).Column) = Me.TextBox2.Value
Cells(36, [2:2].Find(Me.Label3.Caption).Column) = Me.TextBox2.Value

End

Cela ne fonctionne pas et malgré plusieurs autre essais je bloque.

CE que j'aimerais c'est que si j'ai deux jour identique ou deux moments de la journée identique dans deux colonnes à la suite la durée s'affiche correctement dans la bonne colonne.

Merci par avance pour votre aide car là étant débutant je colle.

Bonjour

A voir

J'ai ôté l'image de l'userform afin que le fichier passe sur le forum

Dans ce cas utiliser l'évènement change d'un textbox c'est plutôt sportif : un bouton pour valider aurait (un peu) simplifié le problème

Merci c'est exactement ce que je cherchais. N'ayant pas de réponse j'avais opté pour une solution un peu bâtarde en introduisant un labelbox et en y réunissant la date et le moment de la journée. Mais cette solution va bien m'arranger et c'est bien plus "propre"

Merci pour tout