Exporter un graphique

Exporter un graphique dans un fichier image

Deux objets OLE MSGraph.Chart et Excel.Chart permettent d'être exportés dans un fichier jpg, gif ou png

Private Sub CmdExportJPG_Click()

    Dim oleGrf As Object

    Dim strFileName As String

    Set oleGrf = Me!MonGraphique.Object

    strFileName = "C:\Mes Documents\MonGraphique.jpg"

    oleGrf.export filename:=strFileName

    Set oleGrf = Nothing

End Sub