Problème d'ouverture fichier image sous excel

[Résolu/Fermé]
Signaler
-
 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 .

3 réponses

Messages postés
1846
Date d'inscription
mercredi 19 janvier 2005
Statut
Membre
Dernière intervention
31 août 2021
1 473
.
Messages postés
1846
Date d'inscription
mercredi 19 janvier 2005
Statut
Membre
Dernière intervention
31 août 2021
1 473
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
Superbe, ca marcge nikel avec
If image <> "Faux" Then


MERCI Armojax ....