 |
 | 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 / May 2008VBA - Count slides in a PPT file that is not open
Through VBA, how would I go about getting the count of slides for a PPT file that isn't open? Essentially this: ActivePresentation.Slides.Count but for a file instead of the currently running slideshow. I just can't get the syntax correct, so if any one could stear me in the right direction, that would be great. Thanks! AFAIK you would need to open the file, count the slides and close it again set opres=Presentations.Open(filepath) Islides=opres.Slides.Count opres.Close  Signature------------------------------------------- Amazing PPT Hints, Tips and Tutorials http://www.PPTAlchemy.co.uk http://www.technologytrish.co.uk email john AT technologytrish.co.uk > Through VBA, how would I go about getting the count of slides for a > PPT file that isn't open? [quoted text clipped - 9 lines] > > Thanks! Thank you Austin. And thanks, John for the sample code. I'm almost getting it, but I get a "Runtime error '13' -- type mismatch" when I run it. I'm guessing I need to use a different object than Presentations, but I'm not sure what. It stops right on the "set opres=Presentations.Open(filepath)" line, but when I End the code the presentation being referenced is opened by the code, yet there is that error. I'm using PowerPoint 2003 if that makes a difference. Any suggestions. Thanks a bunch. On May 27, 2:35 pm, John Wilson <john AT technologytrish.co DOT uk> wrote: > AFAIK you would need to open the file, count the slides and close it again > [quoted text clipped - 23 lines] > > - Show quoted text - > Thank you Austin. > [quoted text clipped - 43 lines] > > > - Show quoted text - No, the Open method must take a Presentations object as its expression. The problem lies somewhere else. I suppose it could be in how you have dimensioned the opres variable, if you did dimension it. I think you need to post some actual code to get a correct diagnosis. Tom Lavedas =========== http://members.cox.net/tglbatch/wsh/ > No, the Open method must take a Presentations object as its > expression. The problem lies somewhere else. I suppose it could be [quoted text clipped - 7 lines] > > - Show quoted text - That is a good idea. I had taken it down to the simplest form to try to determine where the issue is, but I still run into the same problem. I've tried both a UNC path and a local path to the file and I get the same result. Here is the code: ==================== Public Sub Test() Dim opres As Presentations Set opres = Presentations.Open("\\Ph-tv\PH-TV\Installs.ppt") opres.Close End Sub ==================== When I run it, I first get an error that states "Compile error: Method or data member not found" for the "opres.Close" line. If I remark out the "opres.Close" line, then I get the "Runtime error '13': Type mismatch" error on the "Set opres = Presentations.Open("\ \Ph-tv\PH-TV\Installs.ppt")" line. Like I stated before, an additional session of PowerPoint does start and the file is opened, but the code stops running at that line. Thanks. > > No, the Open method must take a Presentations object as its > > expression. The problem lies somewhere else. I suppose it could be [quoted text clipped - 35 lines] > > Thanks. Take the 's' off the end of Presentations. The type that is returned is a single Presentation, not the Presentations collection type. Tom Lavedas =========== http://members.cox.net/tglbatch/wsh/ > > > No, the Open method must take a Presentations object as its > > > expression. The problem lies somewhere else. I suppose it could be [quoted text clipped - 43 lines] > > - Show quoted text - Tom, thanks a bunch, that did the trick! I was getting tripped up that the type is "Presentation", but then the function is "Presentations.Open". Again, thanks a ton. As far as I know there is no way to do so without open the file. Austin Myers Microsoft PowerPoint MVP Team Creator of PFCPro, PFCMedia and PFCExpress http://www.playsforcertain.com > Through VBA, how would I go about getting the count of slides for a > PPT file that isn't open? [quoted text clipped - 9 lines] > > Thanks! You can get the slide count without using PowerPoint. Search for DSOFile. It is a microsoft component which allows you to retrieve document properties. Sample code is included in the download. Regards, Shyam Pillai Image Importer Wizard http://skp.mvps.org/iiw.htm > Through VBA, how would I go about getting the count of slides for a > PPT file that isn't open? [quoted text clipped - 9 lines] > > Thanks! |
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.