![]() |
|
#1
|
||||
|
||||
![]()
1. As far as I know, you would need to select and cut the items and then paste them inside a new Drawing Canvas.
2. It is also not apparent whether you can set a default for new Canvas Items. However you could use a macro to create a new drawing canvas with your preferred 'default' fill AND if you have selected shapes before running the macro, those shapes could be put inside the canvas by the same macro. Code:
Sub AddInlineCanvas() Dim shpCanvas As Shape Set shpCanvas = ActiveDocument.Shapes.AddCanvas(Left:=150, Top:=150, Width:=144, Height:=144) With shpCanvas .WrapFormat.Type = wdWrapInline .Fill.ForeColor.RGB = RGB(220, 40, 0) If Selection.ShapeRange.Count > 0 Then Selection.Cut .Select Selection.Paste End If End With End Sub
__________________
Andrew Lockton Chrysalis Design, Melbourne Australia |
#2
|
|||
|
|||
![]()
Thank you.
I'll try the macro. Cheers |
![]() |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
![]() |
laredotornado | Word | 1 | 02-23-2017 11:11 AM |
![]() |
laredotornado | Word | 2 | 02-22-2017 02:28 PM |
Saving drawing canvas as vector graphic | ChrisBrewster | Word | 1 | 11-17-2014 11:41 AM |
![]() |
odon2007 | Drawing and Graphics | 1 | 04-29-2012 03:14 AM |
Pasting screendumped pictures into a drawing canvas | simian | Drawing and Graphics | 0 | 10-06-2008 06:01 AM |