[VBA-W] Copier un graphique Excel sous Word avec Access ;)

Question

Salut tout le monde !


Voil&#224;, je r&#233;alise actuellement un formulaire sous Access qui ouvre un fichier Excel, copie un Graphique, ouvre un fichier Word, colle le graphique dans ce dernier.


 


J&#146;ai vu sur internet qu&#146;il &#233;tait impossible de copier un graphique Excel depuis Access. Est-ce que cela est vrai ?


Ce que j&#146;ai fait c&#146;est que j&#146;ai mis au lancement du fichier Excel ce code ci-dessous qui permet de copier le graphique. 


ActiveSheet.ChartObjects("Graphique 2").Activate


ActiveChart.ChartArea.Select


ActiveChart.ChartArea.Copy




Ce code marche tr&#232;s bien lorsque je lance le fichier &#224; la main, mais quand c&#146;est mon formulaire que le fait j&#146;ai le message : &#171; Impossiblit&#233; de lire la propri&#233;t&#233; ChartObjects de la classe Chart &#187; puis je clic sur d&#233;bogage, ou fin, mon programme ce termine et tout &#224; bien march&#233;, le graphe est bien dans ma page Word&#133;


Savez vous comment je pourrais r&#233;soudre cette erreur, ou tout bonnement ne pas faire afficher ce message d&#146;erreur, vu qu&#146;il ne sert &#224; rien en faite&#133;


Un grand merci d&#146;avance !!

Alongra · Answer

Bon bah voil&#224;, je fais question r&#233;ponse en faite... 

On peut copier un graphique depuis access, le site ou j'ai vu &#231;a &#233;tait mensong&#233;.

Voici le code que j'ai effectu&#233; si &#231;a peut int&#233;ress&#233; quelqu'un:

    appExcel.ActiveSheet.ChartObjects("Graphique 2").Activate
    
    appExcel.ActiveChart.ChartArea.Select


    appExcel.ActiveChart.ChartArea.Copy

appExcel etant l'application Excel.

Donc voil&#224;, probl&#232;me r&#233;solu

[VBA-W] Copier un graphique Excel sous Word avec Access ;)

1 réponse

Discussions similaires