Conversation Between Zack Barresse and Red2034

IMPORTANT! READ THIS FIRST!This form is to write a personal message to another user. DO NOT ASK FOR TECH SUPPORT HERE. To ask your tech support question, please go to
the forums or read our
welcome guide for new members. Thanks for your cooperation!
Showing Visitor Messages 1 to 2 of 2
-
Hey Red,
I don't know off the top of my head really. I'd look at a way to reference the object itself. I don't know if you have other objects on your slides or not. Is there not a Shapes() collection? I'm thinking maybe you could take a look at that and reference it that way (as an object). To look at the object model, while in the VBIDE just press F2 (it's common across all MS Office apps).
-
Hey long time no talk... I was needing a bit of help on this:
Sub ExportGraphics()
Dim x As Long
Dim y As Long
Dim i As Integer
Dim objText As Object
For x = 1 To ActivePresentation.Slides.Count
' Call ActiveWindow.Selection.ShapeRange.Export("C:\Graphics\" & x & ".jpg", ppShapeFormatJPG)
Call ActivePresentation.Slides.Range.Export("C:\Graphics\" & x & ".jpg", ppShapeFormatJPG)
Next
End Sub
I have one graphic on each slide and I want to have the vba loop thru and export each graphic to the folder.... I can get it to work on one slide if I select the graphic (and use the commented out line) but thats timely if i have a deck that is 25 slides or more...
can you help?