Bonsoir,
(Désolé mon fichier que je devais joindre précédemment n'a pas voulu se joindre quand Jai fais "parcourir") ^^
Sinon,
Franchement LouReed t'assure !
Encore merci de m'avoir une nouvelle fois débloqué !
J'ai légèrement modifié ton code de ci-dessous pour la parti Cbo_machine2 et j'ai tout mis dans ma commande Cmd_valider
et sa marche nickel
Ton " If OptionButton1 = True Then" et ton "Image1.Picture = LoadPicture(Le_chemin_de_mon_Image) " mon vraiment bien débloqué.
Dim Le_chemin_de_mon_Image As String
On Error Resume Next
If OptionButton1 = True Then
Sheets(2).Cells(2, 2).Value = "Mécanique"
Else
Sheets(2).Cells(2, 2).Value = "Pneumatique"
End If
Sheets(2).Cells(2, 1).Value = Cbo_machine.Value
Le_chemin_de_mon_Image = Sheets(2).Cells(2, 4).Value
If Le_chemin_de_mon_Image <> 0 Then
Image1.Picture = LoadPicture(Le_chemin_de_mon_Image)
End If
End Sub
A bientôt