Excelgoodies logo +1 650 491 3131

VBA Code Bank – Open Powerpoint in Excel using VBA

 

Microsoft Excel and Powerpoint are perfect partners for Dynamic Tables and Dashboards.

 

PowerPoint 2010 and PowerPoint 2013 introduced improvements to a lot of features, but sadly PowerPoint Tables was not one of them (and I can say the same for Word Tables). In both apps, pretty much the only thing you can do with tables is add rows and columns, type in the information and, either apply a pre-existing style or laboriously create your own style which you can’t even save as a template.

So what is the alternative? In PowerPoint, there is a little talked about feature under the Insert, Tables section of the toolbar called Insert Spreadsheet.

Unlike PowerPoint and Word, Excel Tables has a slew of very cool features. Hence, knowing how to make Excel communicate with Powerpoint will help you create amazing and interactive visuals.

Through this article, we will help you with code to open Powerpoint in Excel using VBA.

‘Create an Instance of PowerPoint On Error Resume Next

‘Is PowerPoint already opened?
Set PowerPointApp =
GetObject(class:=”PowerPoint.Application”)

‘Clear the error between errors
Err.Clear

‘If PowerPoint is not already open then open PowerPoint
If PowerPointApp Is Nothing Then Set PowerPointApp = CreateObject(class:=”PowerPoint.Application”)


‘Handle if the PowerPoint Application is not found If Err.Number = 429 Then
MsgBox “PowerPoint could not be found, aborting.”
Exit Sub
End If

Error GoTo 0

;

Find out comprehensive Excel VBA Programming course here, to connect Excel to various third-party applications and also, to automate any given Excel Reports.

Learn how to write VB Macros in Microsoft Excel with our specialized course on Excel Automation here.


Happy Excelling
Team Excelgoodies

VBA & Python