Problème d'ouverture fichier image sous excel

Résolu
Evicta -  
 Evicta -
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 .
A voir également:

3 réponses

Armojax Messages postés 1860 Date d'inscription   Statut Membre Dernière intervention   1 528
 
.
0
Armojax Messages postés 1860 Date d'inscription   Statut Membre Dernière intervention   1 528
 
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
Evicta
 
Superbe, ca marcge nikel avec
If image <> "Faux" Then


MERCI Armojax ....
0