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

On 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.

Happy Excelling

Team Excelgoodies

2 thoughts on “VBA Code Bank – Open Powerpoint in Excel using VBA

Leave a Reply

Your email address will not be published. Required fields are marked *