Excel -> Word :pb taille et habillage du graphique

  • Initiateur de la discussion Initiateur de la discussion Malka
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Malka

XLDnaute Occasionnel
Bonjour à tous,

Je suis super embetée sur mon code vba et je ne trouve pas la solution....
J'ai créé un programme sur excel qui m'envoie un graphique dans une page word sur la position d'un signet.
Mon probleme, c'est que dans je colle le graphique, il a une taille trop grande sur ma page word et je voudrais lui definir ses dimensions.
Mon deuxieme probleme concerne le type d'habillage... je voudrais qu'il soit de type "Rapproché" ou "Encadré" pour eviter qu'il me deplace tous mon texte vers le bas quand je le colle.... 😡

Voici mon code et en couleur ce que je veux lui faire faire à ce graphique :

ActiveSheet.ChartObjects("Graphique 67").CopyPicture
wdDoc.Activate
With wdApp
.Selection.HomeKey Unit:=wdStory 'envoie en début de page
.Selection.Goto What:=wdGoToBookmark, Name:="Graph" 'recherche du signet
End With

wdDoc.ActiveWindow.ActivePane.Selection.PasteSpecial , DataType:=wdPasteEnhancedMetafile, Placement:=wdInLine
Taille : 3,34 cm en hauteur et 6,28 cm en largeur
Habillage: type "Rapproché" ou "Encadré"

Application.CutCopyMode = False

Voila
Merci beaucoup pour ceux qui peuvent m'aider 😀

Malka
 
Re : Excel -> Word 😛b taille et habillage du graphique

Salut,

J'ai trouvé la solution...
pour la taille du graphique... ben je la definis directement dans excel et pour les questions d'habillage, j'ai contourné le pb en créant un tableau (1 colonne et 1 ligne) et je colle dedans.... c'est tourdu mais ca marche

Malka
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
2
Affichages
2 K
Retour