Pasting Excel To Word and resizing
I'm pasting ranges and charts to a word document using these lines
'goto Bookmark WDApp.Selection.Goto What:=wdGoToBookmark, Name:=toBookM ' Paste the range WDApp.Selection.PasteSpecial Link:=False DataType:=wdPasteMetafilePicture, _ Placement:=wdInLine, DisplayAsIcon:=False or 'goto Bookmark WDApp.Selection.Goto What:=wdGoToBookmark, Name:="two" ' Paste chart at cursor position WDApp.Selection.PasteSpecial Link:=False DataType:=wdPasteMetafilePicture, _ Placement:=wdInLine, DisplayAsIcon:=False Is there a way that the macro can resize the picture that has bee pasted in the document. Thank -- Message posted from http://www.ExcelForum.com |
Pasting Excel To Word and resizing
You should be able to backspace and select the picture, then set the
height and width: WDApp.Selection.TypeBackspace WDApp.Selection.InlineShapes(1).Height = 100 WDApp.Selection.InlineShapes(1).Width = 200 MTBer < wrote: I'm pasting ranges and charts to a word document using these lines 'goto Bookmark WDApp.Selection.Goto What:=wdGoToBookmark, Name:=toBookM ' Paste the range WDApp.Selection.PasteSpecial Link:=False, DataType:=wdPasteMetafilePicture, _ Placement:=wdInLine, DisplayAsIcon:=False or 'goto Bookmark WDApp.Selection.Goto What:=wdGoToBookmark, Name:="two" ' Paste chart at cursor position WDApp.Selection.PasteSpecial Link:=False, DataType:=wdPasteMetafilePicture, _ Placement:=wdInLine, DisplayAsIcon:=False Is there a way that the macro can resize the picture that has been pasted in the document. Thanks --- Message posted from http://www.ExcelForum.com/ -- Debra Dalgleish Excel FAQ, Tips & Book List http://www.contextures.com/tiptech.html |
Pasting Excel To Word and resizing
Excellent, that works lovely.
Thank you for assistanc -- Message posted from http://www.ExcelForum.com |
All times are GMT +1. The time now is 11:31 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com