super BOB, ça marche pas trop mal.
bon, après un essai dans l'usuform 1, j'ai essayé directement l'usuform 2 à partir de "modification d'une semaine). Pas mal la saisi pour les semaines, si j'ai tout compris c'estdécroissant ! bon petit souci, dès que je saisi une semaine un peu loin il plante, je te mets l'image de la copie écran.
sinon voici le code :
rivate Sub ComboBox2_Change()
Set plage = Range("A3:A" & Range("A" & Rows.Count).End(xlUp).Row)
With plage
Set c = .Find(Me.ComboBox1, LookIn:=xlValues)
If Not c Is Nothing Then
firstAddress = c.Address
Do
If c.Offset(0, 4) = CDbl(Me.ComboBox2) Then
Me.TextBox101 = "Du " & c.Offset(0, 6) & " Au " & c.Offset(6, 6)
For lig = c.Row To c.Row + 6
For j = 10 To 13
UserForm2.Controls("TextBox" & j - 9 + n) = Cells(lig, j)
If j = 10 Or j = 11 Then
UserForm2.Controls("TextBox" & j - 5 + n) = Cells(lig, j + 13)
End If
Next j
n = n + 6
Next lig
Exit Sub
End If
Set c = .FindNext(c)
Loop While Not c Is Nothing And c.Address <> firstAddress
End If
End With
End Sub
et c'est la ligne
For lig = c.Row To c.Row + 6
et si je modifie les horaires il ne les saisis pas après validation, mais je pense que tu en étais pas encore là !
encore un grand merci pour ces prouesse.
Francky