How to automate PowerPoint using VB
Microsoft has an article that explains how to automate PowerPoint using VB
For some odd reason they've entitled it How to automate Powerpoint using VB
Here's a quick example:
Sub AutomatePowerPoint() ' This requires that you set a reference to PowerPoint in Tools, References ' You could later change these to As Object to avoid that necessity Dim oPPTApp As PowerPoint.Application Dim oPPTPres As PowerPoint.Presentation Dim sPresentationFile as String sPresentationFile = "C:\MyFiles\Somefile.PPT" ' Get a reference to PowerPoint app Set oPPTApp = New PowerPoint.Application ' set it visible or you may get errors - there are ways around this but they're ' beyond the scope of this FAQ oPPTApp.Visible = True ' minimize if you want to hide it: ' oPPTApp.WindowState = ppWindowMinimized ' Open our source PPT file, get a reference to it Set oPPTPres = oPPTApp.Presentations.Open(sPresentationFile) With oPPTPres ' Do stuff ... ' Show the number of slides in the file, for example msgbox .Slides.Count End With ' Cleanup ' Close the presentation oPPTPres.Close ' Quit PPT oPPTApp.Quit ' Release variables Set oPPTPres = Nothing Set oPPTApp = Nothing End Sub