Erreur de type 1004

Résolu/Fermé
zenastytos Messages postés 16 Date d'inscription samedi 20 décembre 2014 Statut Membre Dernière intervention 26 mai 2017 - Modifié le 26 mai 2017 à 17:30
zenastytos Messages postés 16 Date d'inscription samedi 20 décembre 2014 Statut Membre Dernière intervention 26 mai 2017 - 26 mai 2017 à 20:39
Bonsoir le forum j'ai un petit soucis avec mon code . Normalement j'aimerais afficher un graphique dans mon user forme mais quand j'exécute lee programme me renvoi ce type d'erreur 1004 sur la ligne 6 (set mongraphe).
Voici le code
Private Sub btnAfficheGraphe_Click()
Dim Feuille As Worksheet
Dim Dossier As String
Dim MonGraphique As Object
Set Feuille = Sheets("MonGraphe")
Set MonGraphique = Feuille.ChartObjects(1).Chart
Dossier = "C:\Users\Dr Denis\Videos\ZIK\ImageGraph.jpg"
MonGraphique.Export Dossier
Me.imggraphique.Picture = LoadPicture(Dossier)

End Sub

merci

1 réponse

yg_be Messages postés 22719 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 23 avril 2024 1 476
26 mai 2017 à 17:51
bonjour, je pense que tu as cette erreur parce qu'il n'y a pas de graphique dans la feuille "MonGraphe".
1
zenastytos Messages postés 16 Date d'inscription samedi 20 décembre 2014 Statut Membre Dernière intervention 26 mai 2017
26 mai 2017 à 18:10
mais pourtant il ya un graphique
0
yg_be Messages postés 22719 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 23 avril 2024 1 476 > zenastytos Messages postés 16 Date d'inscription samedi 20 décembre 2014 Statut Membre Dernière intervention 26 mai 2017
26 mai 2017 à 18:12
peux-tu partager ton fichier?
0
zenastytos Messages postés 16 Date d'inscription samedi 20 décembre 2014 Statut Membre Dernière intervention 26 mai 2017 > yg_be Messages postés 22719 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 23 avril 2024
26 mai 2017 à 19:00
Ok J arrive
0
zenastytos Messages postés 16 Date d'inscription samedi 20 décembre 2014 Statut Membre Dernière intervention 26 mai 2017
26 mai 2017 à 18:20
En réinsérant le graphique ca a marché
0
zenastytos Messages postés 16 Date d'inscription samedi 20 décembre 2014 Statut Membre Dernière intervention 26 mai 2017
26 mai 2017 à 20:39
au fait j'ai un petit souci je n'arrive pas à joindre le fichier
0