Microsoft Office Forums

Go Back   Microsoft Office Forums > >

Reply
 
Thread Tools Display Modes
  #1  
Old 08-30-2020, 03:12 PM
Guessed's Avatar
Guessed Guessed is online now Using the Drawing Canvas Windows 10 Using the Drawing Canvas Office 2016
Expert
 
Join Date: Mar 2010
Location: Canberra/Melbourne Australia
Posts: 4,176
Guessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant future
Default

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
Reply With Quote
  #2  
Old 08-30-2020, 10:45 PM
RobertWA RobertWA is offline Using the Drawing Canvas Windows 10 Using the Drawing Canvas Office 2019
Advanced Beginner
Using the Drawing Canvas
 
Join Date: Jan 2014
Posts: 33
RobertWA is on a distinguished road
Default

Thank you.


I'll try the macro.


Cheers
Reply With Quote
Reply



Similar Threads
Thread Thread Starter Forum Replies Last Post
Using the Drawing Canvas How do i remove the border around a text box in my drawing canvas? laredotornado Word 1 02-23-2017 11:11 AM
Using the Drawing Canvas How do I insert a drawing canvas in Office Professional 2010? laredotornado Word 2 02-22-2017 02:28 PM
Saving drawing canvas as vector graphic ChrisBrewster Word 1 11-17-2014 11:41 AM
Using the Drawing Canvas Copy a picture canvas: layout is changed 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

Other Forums: Access Forums

All times are GMT -7. The time now is 12:32 PM.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions Inc.
Search Engine Optimisation provided by DragonByte SEO (Lite) - vBulletin Mods & Addons Copyright © 2025 DragonByte Technologies Ltd.
MSOfficeForums.com is not affiliated with Microsoft