 |
 | Home | Contact Us | FAQ | Search & Site Map | Link to Us |
 | Sign In | Join | Other 45 Sites in Network |
| HomeDiscussionsAccessExcelInfoPathOutlookPowerPointPublisherWordDirectoryUser Groups Related Topics Outlook ExpressInternet ExplorerWindowsMS Server ProductsMore Topics ... |
MS Office Forum / General PowerPoint Questions / June 2006Applying a standard format to existing autoshapes in PowerPoint 20
I have multiple pages of org charts, aka wire diagrams. They have been sent to me by different people who have all used different formatting. (Applying the same template format, background, etc. to all the charts is not the problem. That's easy.) But, is there an easy way to apply a standard format to all of the boxes without having to redraw or format the boxes on every page separately? One way that may work is to use "format painter" tool. Select a correctly formatted shape, double click the format painter tool and then click each shape in turn - quicker than it sounds!  Signature----------------------------------------- Did that answer the question / help? _____________________________ John Wilson Microsoft Certified Office Specialist > I have multiple pages of org charts, aka wire diagrams. They have been sent > to me by different people who have all used different formatting. (Applying > the same template format, background, etc. to all the charts is not the > problem. That's easy.) But, is there an easy way to apply a standard format > to all of the boxes without having to redraw or format the boxes on every > page separately? Thanks John. That does help. I have used the format painter on text and thought I had tried it on shapes without luck and just realized the I had selected the text box and not the shape. D'oh. > One way that may work is to use "format painter" tool. Select a correctly > formatted shape, double click the format painter tool and then click each [quoted text clipped - 6 lines] > > to all of the boxes without having to redraw or format the boxes on every > > page separately? You could use vba. This code will change the fill of all diagrams to the RGB values specified. Sub Diagramfill() Dim oSld As Slide Dim oShp As Shape Dim onode As DiagramNode For Each oSld In ActivePresentation.Slides For Each oShp In oSld.Shapes If oShp.Type = msoDiagram Then For Each onode In oShp.Diagram.Nodes onode.Shape.Fill.ForeColor.RGB = RGB(128, 12, 12) Next onode End If Next oShp Next oSld End Sub Signature----------------------------------------- Did that answer the question / help? _____________________________ John Wilson Microsoft Certified Office Specialist > Thanks John. That does help. I have used the format painter on text and > thought I had tried it on shapes without luck and just realized the I had [quoted text clipped - 10 lines] > > > to all of the boxes without having to redraw or format the boxes on every > > > page separately? > I have multiple pages of org charts, aka wire diagrams. They have been sent > to me by different people who have all used different formatting. (Applying > the same template format, background, etc. to all the charts is not the > problem. That's easy.) But, is there an easy way to apply a standard format > to all of the boxes without having to redraw or format the boxes on every > page separately? Have a look here: http://shapestyles.pptools.com and go to the FAQ section (front page is still a bit of a mess, sorry 'bout that). The free demo will let you define and use up to five styles, which should get you through. You can select however many shapes you want on a slide and apply the same style to all of them in one go. ----------------------------------------- Steve Rindsberg, PPT MVP PPT FAQ: www.pptfaq.com PPTools: www.pptools.com ================================================
|
Reply to this Message |
 Sign In
 Join
 My Latest Posts My Monitored Threads My Blog My Photo Gallery My Profile My Homepage Start New Thread Enable EMail Alerts Rate this Thread
|
©2008 Advenet LLC Privacy Policy - Terms of Use
This website includes both content owned or controlled by Advenet as well as content owned or controlled by third parties.