Databases
StackOverflow2013
Postsdbo
POPowerPoint 2007/2010 VBA code to change Type of Gradient Fill on a Shape object
 

Note that there are some explanatory texts on larger screens.

plurals
  1. POPowerPoint 2007/2010 VBA code to change Type of Gradient Fill on a Shape object
    primarykey
    data
    text
    <p>With PowerPoint 2007 &amp; 2010, I have been trying to change the Type of Gradient Fill on a Shape object from default "Rectangular" to "Path" for days. Searched online but seems like no such question asked.</p> <p>So far I can only get the Gradient Fill to be "Rectangle" (the default with 2 color gradient?). But I want it to be "Path". So far only able to do that by right click on the actual Shape --> Format Shape. "Format Shape" form shows and I can change the "Type:" from Rectangle to Path. But I want to do this change in VBA, anyone have a solution?</p> <p>My code below. Variables starting with g are As Single</p> <pre><code>Set oSlide = ActivePresentation.Windows(1).View.Slide With oSlide.Shapes.AddShape(msoShapeIsoscelesTriangle, gLeft, gTop, gWidth, gHeight) .Line.Visible = msoFalse ' No Outline .Adjustments(1) = gAdj1 ' Adjust the position of the pointing tip .Rotation = gAngle ' Change the angle of Rotation .Fill.Visible = msoTrue .Fill.TwoColorGradient msoGradientFromCenter, 1 ' Enable Two Colour Gradient .Fill.GradientStops(1).Color.RGB = RGB(255,255,255) ' Colour at center .Fill.GradientStops(2).Color.RGB = RGB(121,121,121) ' Colour at edge .Select End With Set oSlide = Nothing </code></pre> <p>If no VBA codes can achieve that, I will have to use workaround... Copy and Paste those Shapes from a Template file - this sounds bad as I am going to make it a PowerPoint AddIn.</p> <p>Thanks in advance! Patrick</p>
    singulars
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. PTQuestion
    1. This table or related slice is empty.
    1. USPatricK
    plurals
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. VO
      singulars
      1. POPowerPoint 2007/2010 VBA code to change Type of Gradient Fill on a Shape object
      1. This table or related slice is empty.
      1. VTUpMod
    1. COcould you show the picture with expected result of using `Path gradient style`? you could upload it anywhere in the web and attach a link here or by editing your question.
      singulars
      1. POPowerPoint 2007/2010 VBA code to change Type of Gradient Fill on a Shape object
      1. USKazimierz Jawor
    2. COSee the different types of results: http://www.powerpointninja.com/images/2009/02/newgrad1.jpg The default is Rectangular and seems no VBA way to change it. Full page with this image: http://www.powerpointninja.com/powerpoint-2007/three-new-gradient-effect-options-in-powerpoint-2007/
      singulars
      1. POPowerPoint 2007/2010 VBA code to change Type of Gradient Fill on a Shape object
      1. USPatricK
    3. COok, but what is expected result in your situation while you have rectangle shape which you fill. Possibly you can't see the result as using `path style` in such situation... it will be the same for `rectangle style` of gradient.
      singulars
      1. POPowerPoint 2007/2010 VBA code to change Type of Gradient Fill on a Shape object
      1. USKazimierz Jawor
 

Querying!

 
Guidance
A row detail

Detail views are divided into sections. All the information in the data section comes from columns in the selected row. The other sections display data from other, related rows.

Related data can be related in a to-one or a to-many fashion. Captions of data related in a to-many fashion link to a list view showing a filtered view of the table.

Try moving around until you find a non-empty to-many entry and click on the label to get to one. You can move back to the root by clicking on the database name in the header.

SQuiL has stopped working due to an internal error.

If you are curious you may find further information in the browser console, which is accessible through the devtools (F12).

Reload