graphique dans un multi Page

[Philo]

bonsoir le forum

serait il possible de reproduire mon graphique qui se trouve sur ma feuille graphique dans la page deux de mon multi page dans mon USF et me dire la procédure pour y arriver car après j'ai l'intention de masquer cette feuille graphique ou même éventuellement la supprimer et que le graphique soit toujours dans le multi page

merci de me tenir au courant je vous et joint le fichier

amicalement

 

[Compte Supprimé 979]

Re : graphique dans un multi Page

Bonsoir Philo,

Une possibilité en exportant le graphique au format ".gif"
Et en insérant ensuite cette image dans un controle image

A+

 

[Philo]

Re : graphique dans un multi Page

bonjour le forum

merci BrunoM45 pour cette solution pourrais tu m'expliquer comment tu as fait pour l'exporter et l'inserer

merci bien, j'oublier serait il possible de ne pas avoir la boite a outil qui s'affiche a l'appel de mon USF

PS : croit tu que je peut supprimer cette feuille graphique?

merci de voir ce que vous pouvez faire

Amicalement

 

[Compte Supprimé 979]

Re : graphique dans un multi Page

Bonjour Philo,

Le code pour ça est celui-ci

Private Sub MultiPage1_Change()  Dim ObjGraph As Object, Fichier
  ' Si l'utilisateur se trouve sur la page du graphique
  If Me.MultiPage1.Value = 1 Then
    ' Définir l'objet graphique
    Set ObjGraph = Sheets("Graphique").ChartObjects(1).Chart
    ' Exporter le graphique au format GIF
    Fichier = ActiveWorkbook.Path & "\" & "graphe.gif"
    ObjGraph.Export Filename:=Fichier, FilterName:="GIF"
    ' Insérer cette image dans l'ogjet Image de l'USF
    Image1.Picture = LoadPicture(Fichier)
  End If
End Sub

Il se trouve dans ton USF

En ce qui concerne la boite à outil qui apparait, je ne sais pas pourquoi !?
Quand tu veux aller voir Outils-> Références, ton Projet VBA est protégé par un mot de passe !?

Tu ne peux pas supprimer la feuille graphique, puisqu'elle est utilisée pour exporter le graphique

A+

 

[Philo]

Re : graphique dans un multi Page

Bonjour Le forum
Personne pour me résoudre mon problème de boite a outil qui apparaît