Ouvrir un fichier JPEG

Quel est le language, et puis, se serait plus facile de mettre ton code en entier

Le langage c'est du VBA sous excel.

Le code en entier :

Private Sub ComboBox1_change()

ComboBox1.AddItem "Graphique répartition rebuts CAL 1 Lin tendance"

If ComboBox1.Value = "Graphique répartition rebuts CAL 1 Lin tendance" Then
ActiveSheet.Pictures.Insert("C:\data\B58\Répartition des pièces par linéarité tendance CAL 1.jpg").Select

End If

Merci.

activesheet ? c est ta feuille ecel il me semble ! non?

Bonjour

J'ai un début de solution :
Shell """C:\Program Files\Internet Explorer\iexplore.exe"" ""C:\data\B58\Répartition des pièces par linéarité tendance CAL 1.jpg"""
Mais ce n'est pas top, car ça suppose que tu connaisses d'avance le chemin de l'application qui va servir à ouvrir le fichier. Enfin, ça peut marcher si tu maîtrises le poste sur lequel tu veux faire tourner ton application.
Remarque : fais attention aux " . Il en faut autour du chemin de l'application parce qu'il y a des espaces, idem pour le fichier à afficher et en plus il faut les doubler parce qu'on à l'intérieur d'une chaîne entre " "

Effectivement ça fonctionne avec ce code...j'avais commencé a regarder avec Shell..
Pr l'instant je vais me contacter de ça, mais effectivement cet appli doit pouvoir tourner sur plusieurs PC.
Je sais comment récupérer le chemin :
vTargetPath = Application.ThisWorkbook.Path
ChDir (vTargetPath)

Mais je n'arrive pas à utiliser vTargetPath ds la fonction Shell...

Bonjour,

J'ai utilisé le code de "le père" :

If ComboBox1.Value = "Graphique répartition rebuts CAL 1 Lin tendance" Then
Shell """C:\Program Files\Internet Explorer\iexplore.exe"" ""C:\data\B58\Répartition des pièces par linéarité tendance CAL 1.jpg"""

Mon soucis c'est que ca génère une fenêtre mais ca ne l'ouvre pas. C'est à moi de cliquer sur l'onglet pr l'ouvrir.
Quelqu'un à une idée?