Bonjour
@Steelson
Oh non Dan, j'aime bien aussi différentes visions ...
Ok. J'essaie toujours de ne pas interférer... ou de participer à deux sur un même fil. Souvent le demandeur s'y retrouve plus
Bon à la relecture du fil...
J'ai trouvé un "truc" qui permet de vider mon userform plus rapidement qu'en passant par le "vidage de chaque textbox...
C'est peut la méthode en dur cela...
Vous déchargez puis vous remettez...
Essayez le code ci-dessous
Private Sub Reset_Click()
Dim txtb()
Dim i As Byte
txtb = Array("AT1", "AT2", "AT3", "AT4", "AT5", "BT1", "BT2", "BT3", "BT4", "BT5", _
"CT1", "CT2", "CT3", "CT4", "CT5", "DT1", "DT2", "DT3", "DT4", "DT5", "ET1", "ET2", "ET3", "ET4", "ET5", _
"AA1", "AA2", "AA3", "AA4", "AA5", "BA1", "BA2", "BA3", "BA4", "BA5", "CA1", "CA2", "CA3", "CA4", "CA5", _
"DA1", "DA2", "DA3", "DA4", "DA5", "EA1", "EA2", "EA3", "EA4", "EA5")
For i = 0 To UBound(txtb)
Controls(txtb(i)).Value = ""
Next i
End Sub
Il y aurait moyen de faire plus court encore...
Cordialement