choudoudou
XLDnaute Nouveau
Bonsoir,
dans le fichier joint , j'ai crée un graphique dynamique à l'aide du liste déroulante ( feuille graphique Ouest )
Ce grahique , je le fais apparaître à l'aide d'un bouton "Userform" -> bouton1 dans la feuille " acceuil". il apparaît sous la forme d'une image.
j'aimerais le faire apparaître comme dans la feuille "graphique Ouest" où je puisse le modifier avec la liste déroulante.
Je pense que j'ai fait une erreur dans le code ci dessous :
Private Sub UserForm_Initialize()
Set g = Sheets("Graphiques OUEST").ChartObjects(1).Chart
fichier = ActiveWorkbook.Path & "\" & "graphe.gif"
g.Export Filename:=fichier, FilterName:="GIF"
Image1.Picture = LoadPicture(fichier)
End Sub
Comme je suis un débutant en userform, j'ai fait un copier coller d'un exemple et je ne sais pas comment le modifier.
Merci d'avance pour votre aide
dans le fichier joint , j'ai crée un graphique dynamique à l'aide du liste déroulante ( feuille graphique Ouest )
Ce grahique , je le fais apparaître à l'aide d'un bouton "Userform" -> bouton1 dans la feuille " acceuil". il apparaît sous la forme d'une image.
j'aimerais le faire apparaître comme dans la feuille "graphique Ouest" où je puisse le modifier avec la liste déroulante.
Je pense que j'ai fait une erreur dans le code ci dessous :
Private Sub UserForm_Initialize()
Set g = Sheets("Graphiques OUEST").ChartObjects(1).Chart
fichier = ActiveWorkbook.Path & "\" & "graphe.gif"
g.Export Filename:=fichier, FilterName:="GIF"
Image1.Picture = LoadPicture(fichier)
End Sub
Comme je suis un débutant en userform, j'ai fait un copier coller d'un exemple et je ne sais pas comment le modifier.
Merci d'avance pour votre aide