Problème d'ouverture fichier image sous excel

Résolu
Bonjour,

Je voudrais un petit programme dans excel en vba, pour faire un boutton qui me donne :

1. Clic sur le boutton
2. Ouverture d'une fenêtre
3. Je selectionne un fichier image .jpeg "par exemple"
4. Importation dans un emplacement bien precie sur m'a feuille

Mon problème:
5. Si je fait annuler sur cette fenêtre, j'ai une erreur d'execution 1004.

Le script que j'ai fait:

Private Sub CommandButton1_Click()
Dim image As String
image = Application.GetOpenFilename
Shapes.AddPicture image, True, True, 100, 122, 330, 246
End Sub

Merci, te me dire quoi rajouter pour ne plus avoir d'erreur .

3 réponses

  1. Bonsoir Evicta,

    Erreur de manip dans l'item du dessus !!!
    Conditionne ta ligne Shapes.AddPicture :
    If image <> "Faux" Then
      Shapes.AddPicture image, True, True, 100, 122, 330, 246
    End If
    0
    1. Superbe, ca marcge nikel avec
      If image <> "Faux" Then

      MERCI Armojax ....
      0