Discussion :

[petitchti]

Bonjour à tous,

Utilisant VBA depuis un petit moment, j'essaye de simplifier mes codes et de les rendre plus propres. Entre autres, je souhaite modifier les lignes de code dans lesquelles j'utilise le presse-papier pour ne plus l'utiliser. Le changement me semble aisé lorsqu'il s'agit de cellules (valeurs, formules...) mais beaucoup moins quand il s'agit de graphique.

Ce que je voudrais faire est copier un graphique (ChartArea) dans une feuille Excel mais sans utiliser le presse-papier. Voici l'extrait intéressant du code en question que je souhaite modifier:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Sub Chart_copy()
 
Charts("Graph_Source").ChartArea.Copy
Worksheets("Feuil_Destination").Paste
 
End Sub

Est-il possible de réaliser cette opération directement sans le Copy/Paste? Peut-être faut-il passer par une variable intermédiaire stockant le graphique? J'ai essayé plusieurs solutions, mais rien n'y fait, je sèche. Les premières pistes sont les bienvenus

Merci d'avance,

[Menhir]

Peut-être faut-il passer par une variable intermédiaire stockant le graphique?

Non, la variable objet stockera une référence au graphique source, pas le graphique lui-même comme elle pourrait le faire avec une valeur.

La seule solution que je vois serait de copier une à une toutes les propriétés du graphique source.
Mais je ne vois pas trop l'intérêt d'une telle usine à gaz comparer aux deux lignes assez simples d'un copier/coller.

[petitchti]

Merci Menhir pour ta réponse

L'objectif de faire disparaitre les fonctions copier/coller dans la macro est que l'utilisateur puisse faire d'autres choses (bureautique par exemple, et utilisation du presse-papier en l'occurence) pendant que la macro tourne pendant plusieurs minutes. Donc l'intérêt de copier une à une toutes les propriétés du graphique serait que l'opération soit transparente pour l'utilisateur (bien que la macro devienne beaucoup plus compliqué, je te l'accorde).

Non, la variable objet stockera une référence au graphique source, pas le graphique lui-même comme elle pourrait le faire avec une valeur.

Et il n'y a pas moyen ensuite (même si c'est juste stockée sous forme de référence) de mettre cette référence dans la feuille de destination?

[Menhir]

Et il n'y a pas moyen ensuite (même si c'est juste stockée sous forme de référence) de mettre cette référence dans la feuille de destination?

Ce serait un peu comme relever la plaque d’immatriculation d'une voiture et se dire qu'avec ce numéro, tu pourras déplacer la voiture.

[petitchti]

Ce serait un peu comme relever la plaque d’immatriculation d'une voiture et se dire qu'avec ce numéro, tu pourras déplacer la voiture.

Ok avec cette comparaison, c'est plus clair

Bon si aucun moyen n'existe, je pense que je vais laisser comme ça

Merci pour ton aide.