bonjour Adrien
pour ajouter une barre de progression dynamiquement dans une USF , tu peux essayer
Dim NewBar As Object
Set NewBar = NewForm.Designer.Controls.Add('MSComctlLib.ProgCtr l.2')
With NewBar
.Height = 30
.Width = 200
.Left = 150
.Top = 50
.Min = 0
.Max = 100
End With
bonne journée
MichelXld