PowerPoint Programming
Everything about PowerPoint programming including VBA, VSTO, and more.
Note: If you don't know how to use macro snippets or scripts inside PowerPoint, look here... Labels: powerpoint, programming, snippets, spirograph, vba
This started with my Create Spirograph in PowerPoint tutorial -- and thanks to my friend Shyam Pillai who said I could do that so much faster programattically by using this code:
Sub CreateSpirograph()
Dim oShp As Shape
Dim I As Single
Const ROTATION_INCREMENT = 5 'Rotation Increment
Const ROTATION_MAX = 360 'Max rotation
'Select a shape on the slide and then run this
Set oShp = ActiveWindow.Selection.ShapeRange(1)
For I = ROTATION_INCREMENT To ROTATION_MAX Step ROTATION_INCREMENT
With oShp.Duplicate
.Rotation = I
.Left = oShp.Left
.Top = oShp.Top
End With
Next
End Sub
Remember you need to have some shape selected before you run this code. Also, Shyam adds that you can change the ROTATION_INCREMENT and ROTATION_MAX values to get different graphs.
Shyam Pillai is a Microsoft PowerPoint MVP, visit his site for many VBA snippets, free and commercial PowerPoint add-ins
What can be better to start a blog on PowerPoint programming that discussing a tutorial I wrote on using scripts and macros from elsewhere even if you don't know how to do VBA programming! Labels: powerpoint, programming, vba
If you like that though, run now to this page! As that page says: "This article is not about creating your own macros or scripts to automate PowerPoint. However, if you just want to run any macros or scripts that a friend shares, or you just got it from a book or newsgroup, then you are on the right page."
Archives:
March 2009 | April 2009 |
