How to change properties of selected shapes

macropod · #2 08-09-2017, 03:21 PM

Assuming you're referring to autoshapes, all of this is possible with VBA but, without knowing precisely what you want to change, it's impossible to supply the code. As a demo:

Code:

Sub Demo()
With ActiveDocument.Shapes(1)
  .AutoShapeType = msoShapeOval 'msoShapeRectangle
  .Fill.ForeColor.RGB = RGB(255, 255, 0)
  .Fill.BackColor.RGB = RGB(127, 0, 0)
  .Fill.TwoColorGradient msoGradientFromCenter, 2
  .Fill.Transparency = 0.25
  .Line.Weight = 2
  .Height = InchesToPoints(1.25)
  .Width = InchesToPoints(1.5)
End With
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Macro to change all text color to black in all docx files in a selected folder	joewoods	Word VBA	13	05-16-2016 06:29 PM
Margin change for selected text in Word 7	Richtriebe	Word	4	03-14-2016 11:57 AM
Change ComboBox Properties	ll4u76	Word VBA	1	03-31-2012 05:08 AM
Change object properties by clicking	PopOnTheAir	PowerPoint	7	03-16-2012 02:13 PM
Change cell color everytime a value is selected in dropdown list	angelica_gloria	Excel	4	01-27-2012 06:47 PM