Bonjour à tous, j'aimerai afficher une image dans un Label dans un Userform.
Le but principal étant d'afficher des hachures, mais n'y arrivant pas, j'ai décidé de mettre une image à la place
voici le code :
Set Obj2 = Form_Personne.Controls.Add("forms.label.1")
With Obj2
.Name = "Personne" & i + 1
.Object.Caption = "Plusieurs tâches"
.Left = 50 + nbPar8 * 230
.Top = 30 + nbColor * 30
.Width = 50
.Height = 20
End With
Set Obj2 = Form_Personne.Controls.Add("forms.label.1")
With Obj2
.Name = "couleur" & i + 1
.Object.Caption = ""
.Left = 140 + nbPar8 * 230
.Top = 30 + nbColor * 30
.Picture = LoadPicture("\\f-bastet\home5$\p080738\MyDocs\calendrier\hachure.png")
End With
Merci de votre future aide
Cordialement