Here at BrightCarbon we’re always looking for new ways to improve our own PowerPoint productivity and then share that knowledge with the presentation community (that includes you, by the way!). One of the ways we do this is by using VBA code to automate and extend the functionality of PowerPoint. We publish free PowerPoint VBA code snippets here in our blog for you to use and also offer a PowerPoint automation service. This article explains how to grab the code from our articles and use it in your PowerPoint project, so that you can take your productivity to the next level!

What is VBA?

Visual Basic for Applications (VBA) is a programming environment for Microsoft Office applications. It’s included with your installation of Office by default (unless your system administrator has deactivated it). PowerPoint VBA provides you with a way to do one of two things using macros and add-ins: 

  1. Automate PowerPoint: If you ever find yourself repeating the same task over and over again, VBA could be your new best friend. Let’s say you have 100 slides and you need to unhide all hidden objects across all those slides. That could take you many eye-straining minutes, but with a PowerPoint VBA it takes around a second.
  1. Extend PowerPoint: Sometimes PowerPoint doesn’t have the feature you need to complete your task. As an example, if you end up deleting default layouts from a template, there’s no easy way in PowerPoint to get them back. This article includes PowerPoint VBA code to do just that!

How to open the VBE (Visual Basic Editor)

Getting to meet your VBA friend is very simple. With PowerPoint open and at least one presentation file open, press Alt+F11* on your keyboard. This will open the VBE (Visual Basic Editor): 

PowerPoint VBE No Modules

*If for some reason Alt+F11 isn’t mapped on your keyboard you can right click anywhere on the ribbon, select Customize the Ribbon… and in the window that appears, tick the Developer Tab check box over on the right hand side before clicking OK to close the window. Now you can click the Visual Basic button within this tab: 

 PowerPoint Developer Tab Visual Basic

Adding PowerPoint VBA code 

To add some VBA code, you need a container to put it in so go ahead and click Insert from the menu and then select Module: 

PowerPoint VBE Insert Module 

You now have a module ready to paste the VBA code into from one of our blog articles: 

PowerPoint VBE Module Inserted 

Copy the VBA code from the required blog article by double-clicking on it and then paste it into the Module1 window above. Here’s a very simple example of some code to display a message dialogue:

' PowerPoint VBA Macro to display Hello World message.
' Copyright (c) 2019 BrightCarbon Ltd. All Rights Reserved.
' Source code is provided under Creative Commons Attribution License
' This means you must give credit for our original creation in the following form:
' "Includes code created by BrightCarbon Ltd. ("
' Commons Deed @
' License Legal @
' Purpose : Displays a dialog box with a Hello World text message.
' Author : Jamie Garroch
' Date : 06MAY2019
' Website :

Sub HelloWorld()
 MsgBox "Hello World!", vbInformation + vbOKOnly, "This is my first VBA Macro"
End Sub

You should now see something like this: 

PowerPoint VBA

Because this code is just a single Sub procedure called HelloWorld, it’s referred to as a macro. 

Running the PowerPoint VBA macro 

Now you have the macro in your presentation you can use Alt+Tab to return to the more familiar PowerPoint window. From here, the macro can be run by pressing Alt+F8 on your keyboard (or by clicking the Macros button in the Developer tab) which opens a window containing a list of available macros: 

PowerPoint VBA

Security Soup

The first time you add VBA code to a file, Microsoft assumes that it is safe because you added it. As soon as you save, close and reopen the file, Microsoft doesn’t know that it’s your code so it will disable it by default. You can tell the Office app to allow your code to run either by signing it with a digital certificate (beyond the scope of this article) or by lowering the security setting for the app. You can do this in PowerPoint by clicking File / Options / Trust Center / Trust Center Settings / Macro Settings and selecting this option shown below:

VBA Macro Settings

Saving your file 

With the macro(s) in your presentation file you can now use it in that file or with any other PowerPoint file you have open. Bear in mind that to use your macros, the file that contains them must be open. You can add as many modules and macros as you like in a PowerPoint file so you could create your own library of macros in a single file that you then access from all other decks. When you have multiple PowerPoint files open, make sure you select the file that contains your macros in the Macro window by clicking the Macro in drop down:


Once you’ve added VBA code to your presentation, PowerPoint will ask you to save it as a pptm file (the ‘m’ stands for macro) instead of the more familiar pptx formatYou can go ahead and do this to either keep an archive copy of your code-enabled project or to create your personal macro library. 

If you want to distribute your presentation, it’s advisable to save it using the familiar pptx format so that your recipients don’t see lots of verbose security messages when opening pptm files! 

You can make your file saveable as a standard presentation again by rightclicking on each code module in the project explorer pane, clicking Remove ModuleX and either click Yes (if you want to keep a backup of the modules independently of your presentation) or No when asked if you want to save the module before removing it: 

Now your presentation doesn’t include any code and you can save it as a pptx file. 

So, there you have it. You now know how to open the VBE, insert a PowerPoint VBA code module, paste code into it, run the macro and save the file in either pptm or pptx formats. All you need is a cool macro to make your daily life even easier. Keep checking in with our blog for more useful macros – like this one on restoring default slide master layouts!

Got something extra you’d like PowerPoint to do?

Check out our PowerPoint automation service which provides you with a custom solution to your specific needs.

Leave a comment
Written by

Jamie Garroch

Principal technical consultant

View Jamie Garroch's profile

Related articles

Jun 2024

You can do some really cool things in Microsoft Office with just a few lines of Visual Basic for Applications (VBA) - from creating your own custom formula in Excel to correcting branded content in PowerPoint to merging address data for a mail campaign in Word. And sometimes you need to share that VBA solution with colleagues and clients, via the Internet. A change that Microsoft rolled out at the end of March 2022 tweaks the process required by Windows users to gain access to this active content.

  1. Image of Joao Marques Joao Marques says:

    very simple, very explicit, very good help for a beginner vba programmer in powerpoint. Thanks

  2. Image of Dave C Dave C says:

    great resource, thanks. I’ve used VBA for years in MSaccess, and this is a good refresher for me.

  3. Image of charles Lathrop charles Lathrop says:

    I am trying to make a ppt file that loops until stopped. then I save it as a video. the ppt ran and looped continuously. Once recorded as video it stopped looping. do you have code to make ppt work when in video format

    • Image of Jamie Garroch Jamie Garroch says:

      Hi Charles. As soon as you export a PowerPoint deck as a video all the PowerPoint functionality is removed as the file is magically transformed into an MP4 file, without VBA (sob sob). The only way to make the video loop is to use the looping feature of your video player.


      Yeah, your best off recording a screen capture of the presentation running, then cutting it so it loops perfectly.

    • Image of Afridi Afridi says:

      You can convert the video into gif file so that it will loop

  4. Image of Simon L Simon L says:

    Hi Jamie, thanks for the clear into, I am very new to this so that really helps. I am trying to develop a VBA macro that looks for the left hand mouse key being pressed and held down for more than two seconds whilst over a shape in slideshow mode. Once this is satisfied (i.e. two second press) for it then to hyperlink or take the user to a specified slide or even the next slide worst case.

    I realise there is an automated/ built in feature (Action) that does this type of thing for a mouse click or mouse over but I really need a “long press” to activate if possible.

    Any help appreciated.

    • Image of Jamie Garroch Jamie Garroch says:

      Hi Simon and thanks for a great question. What you’re looking to do is pretty complex because VBA doesn’t natively support mouse actions in the PowerPoint slide show window. But, it is possible to use a Windows API (hence no Mac compatibility) called GetAsyncKeyState to gain access to mouse button click events. I had a look at this and quickly ran into a brick wall because an action link to a macro in slide show mode (Insert / Action / Mouse Click / Run macro) fires on the mouse up event, not mouse down. That means any corresponding VBA timer code can’t run until after the user releases the button and hence too late to detect if it was held down for two seconds. Maybe something could be done with the mouse over event to simulate what you need to achieve? Another approach could be to use the mouse down event on an invisible userform although that is also getting very involved with multiple Windows APIs. Depending on what you’re trying to do, you could also start the timer on click one, change the colour of the clicked shape and show countdown text before reverting to the original colour. If the user clicks a second time before the time expires, then the hyperlink is fired.

  5. Image of Parthiban D Parthiban D says:

    Valuable app

  6. Image of Tom Tom says:

    Hello I have a question:

    Private Sub CommandButton2_Click()
    ActivePresentation.FollowHyperlink _
    Address:=””, _
    NewWindow:=False, AddHistory:=False
    ActivePresentation.SlideShowWindow.View.GotoSlide (2)

    End Sub

    Now it opens Chrome. but how can i make it that it opens te address en afther that shut down chrome.

  7. Image of Josh Josh says:

    Thank you very much! It’s exactly what I needed.

  8. Image of Marya Marya says:


    I have tried using your randomizing macro with a powerpoint – I must be doing something wrong, because it isn’t putting the slides in random order. Please advise! I copied the macro exactly (using cut & paste), and thought I was following all the directions here for how to use it in the powerpoint. But, no random presentation of the slides. Boo hoo!

    • Image of Jamie Garroch Jamie Garroch says:

      Hi Marya. Let’s check that VBA is installed and enabled on your machine. Can you add the following macro to the VBE project (just below the existing one) and try to run it from the PowerPoint window using Alt+F8?

      Sub CheckVBA()
      MsgBox “it’s working”
      End Sub

      Make sure the quotes are the straight type.

  9. Image of Mary Spickler Mary Spickler says:

    Hi Jamie,

    I am trying to format my title page so that the number displayed is equal to the linked slide and updates automatically wherever the slide is moved. For example “about us” is on slide #5 and linked, so it goes to slide 5 when you click on the word. I need the number (in a separate text box) to update automatically to the slide number location that the link goes to.

    • Image of Jamie Garroch Jamie Garroch says:

      Hi Mary and thanks for the question. It looks like you’re interested in some kind of automated agenda slide builder. That’s a fair bit of code to create and quite complex as it needs to handle events from PowerPoint to detect when slides have moved. It could be possible to write a simpler macro which you run manually each time you want to update that title page. You’d need start by finding a way to identify which objects are your numerical indicators. For example, if you named your objects in the selection pane (Alt+F10) “Agenda Link”, then is simple macro could be a starting place for you:
      Sub UpdateAgendaNumbers()
      Dim oSld As Slide
      Dim oShp As Shape
      Dim LinkedSlideIndex As Long
      On Error Resume Next
      For Each oSld In ActivePresentation.Slides
      For Each oShp In oSld.Shapes
      If oShp.Name = “Agenda Link” Then
      If oShp.ActionSettings(ppMouseClick).Action = ppActionHyperlink Then
      If oShp.HasTextFrame Then
      LinkedSlideIndex = Split(oShp.ActionSettings(ppMouseClick).Hyperlink.SubAddress, “,”)(1)
      oShp.TextFrame.TextRange.Text = LinkedSlideIndex
      End If
      End If
      End If
      End Sub

  10. Image of Joshua Hintz Joshua Hintz says:

    Great wealth of information. Have never used macros before but was looking to use them to help with this situation. At work we use Work Orders (created in Power Point) and are looking to include a sequential number to them (print 50-100 copies of one slide with the numbers) and if possible would like the number to continue from the last printed number…been trying to find some code to help but not having much luck possible partly due to being new to macros

    • Image of Jamie Garroch Jamie Garroch says:

      That’s definitely something we could help design for you Joshua. If you’d like to discuss further, please click the Contact button at the top of this page.

  11. Image of Dave Brandes Dave Brandes says:

    I tried this changing the font color of text within the textbox. I used this to change the font color on a mouse over:

    Public Sub GraphicHover(ByRef oGraphic As Shape)

    oGraphic.TextFrame.TextRange.Font.Color.RGB = RGB(0, 130, 202)

    End Sub

    and it works just fine. But, when I move the mouse off the text box, onto the invisible rectangle with this code attached to the mouseover event, it doesn’t change the text color back to it’s original color and remains the color I changed it to mentioned above. I know the mouseover event is being triggered because I checked “Highlight when mouse over” and I am seeing the highlight on the invisible rectangle:

    Public Sub ResetGraphicHover(ByRef oCover As Shape)
    Dim oSld As Slide
    Dim oShp As Shape
    Set oSld = oCover.Parent
    For Each oShp In oSld.Shapes
    With oShp.TextFrame.TextRange.Font.Color
    If .RGB = RGB(0, 130, 202) Then .RGB = RGB(121, 135, 156)
    End With
    End Sub

    Any clue where my ResetGraphicHover is failing?

    • Image of Jamie Garroch Jamie Garroch says:

      Hi Dave. I took your code and it works for me. You could add a debug line after the For Each… line in the rest macro to check that (a) it’s firing and (b) which shapes are being looked at on your slide. To do that, add this:

      Debug.Print oShp.Name

      After you run the slide show, check the output in the VBE Immediate pane (Ctrl+G to toggle it).

  12. Image of Tammy Butler Tammy Butler says:

    Hi I am creating an interactive game (matching cards or concentration) in PowerPoint. If the 2 cards match, I need a pop-up text box to appear. If the 2 cards do not match, I need a sound to play.

    I understand I need programming to make this happen. Please help or give alternative ways to achieve this. Thanks.

  13. Image of Sorie Fasuluku Sorie Fasuluku says:

    Hi Producer
    I will like to get comments on macros you can make available to me. Beautiful.
    I am using this approach frequently to make offline projects.
    S. Fas

  14. Image of Nataša Nataša says:

    Thank you!

  15. Image of Jan Jan says:

    Thank you! Is there any option to replace a font in the entire presentation for a specific character. Let’s say, I would like to change font only for dots in the deck but I would like to keep the rest in the original font. Any idea please?
    Thank you so much!

    • Image of Jamie Garroch Jamie Garroch says:

      Hi Jan. You might be able to use the Replace Fonts feature found in the Home tab of PowerPoint under the Replace menu at the far end of the ribbon. If you need to use VBA then set up a nested loop to iterate all shapes within all slides and then use the oShp.TextFrame2.TextRange.Font object to change the font.

  16. Image of Paramananthen Sivakolunthu Paramananthen Sivakolunthu says:

    Exellent explenation. so beutiful.
    I am creating an interactive e learing quiz.
    Thanking you.

  17. Image of Linda Baker Linda Baker says:

    Hello! I have a client who’s interested in using tagging to help create searchable content within slides. For example, they have four different categories for slide content across multiple presentations (Overview, Market, Product, Country). I’d like to assign a different shape to represent each of the four categories, where a blue square might represent Overview slide content. Then, when someone uses the keyword “Overview” to search for overview content (on Teams or SharePoint), these slides are easily identified. Is this something that’s possible with VBA code?

    • Image of Jamie Garroch Jamie Garroch says:

      Hi Linda. That’s a very good question! Given the need is to search via SharePoint, VBA probably won’t help here as the PowerPoint file needs to be opened for VBA to examine its content. I have a sneaking suspicion that if you add keywords in the Tags field under File / Info that SharePoint may use this. But, that’s at the file level rather than the slide level. We have a PowerPoint add-in called ShowMaker that might be of interest as it allows you to add category metadata to slides and then the presenter can use that to filter the deck and export the required content. You can find an overview of it here: and we could set up a demo if you’re interested (please use the Contact button at the top of this page if that’s the case).

  18. Image of Stu Stu says:

    I’ve just created an elearning package in PowerPoint using VBA , I didn’t realise it could sum up text boxes within PowerPoint to mark the qualification at the end. Also used AWS text to speech over the top of the learning . Looks great

    • Image of Jamie Garroch Jamie Garroch says:

      Sounds like a fun and successful project Stu! Thanks for sharing 🙂

  19. Image of Dave Dave says:

    I have a bit of a tricky one but hoping it is possible to do with VBA. We offer training services to multiple clients that can be customized but the majority of training is consistent from one client to the next (main changes are the slide masters/formatting and addition/removal of certain sections).

    What we want to do is create one master (or multiple) training document(s), and then use VBA’s to link it to the client specific PowerPoint. We want to link the master rather than using the “reuse slide” command so that if we update one file the other will automatically update as well.

    Not sure if it matters, but our company uses sharepoint as storage

    • Image of Jamie Garroch Jamie Garroch says:

      Hi Dave and thanks for a great question. VBA is an excellent solution for automating a manual process. In general, if a person can perform a task manually via a sequence of pre-defined steps then VBA can do it automatically, faster, and with less chance of mistakes for something done many times. We’d be happy set up a call to discuss your needs further and see what could be automated with VBA. If that’s of interest, please use the contact button at the top of the page and mention my name in the form.

  20. Image of Reef Reef says:

    PP does not seem to have the record macro feature. To write vba code in PP by someone who only worked with vba in excel, would require some prior knowledge. Is there a summary of the most common objects, methods etc to refer to?

  21. Image of Asheesh Asheesh says:

    I had made a game in power point using VBA codes. At last it generate a report every time a candidate conduct the game . My requirement is to generate result in same excel sheet after conducting the game.
    Row 1 player 1 result
    Row 2 player 2 result
    I need your help

    • Image of Jamie Garroch Jamie Garroch says:

      Hi Asheesh. It’s possible to use VBA to get PowerPoint to “talk” to Excel (and other Office apps) but it’s a bit complicated to mention in a comment here. We’d be happy to help if you’d like a quote or if you want to try yourself you could start with this: Set oXL = CreateObject(“Excel.Application”) and have a look at some online examples. I’d also recommend the book “Mastering VBA for Microsoft Office 365” available from Amazon.

  22. Image of Bruce Wu Bruce Wu says:

    If there are two colors of font in the textFrame, how to change the font of one color through VBA?

    • Image of Jamie Garroch Jamie Garroch says:

      Hi Bruce. You could either iterate through the Characters collection of the TextRange2 object or the Runs collection which returns all of the TextRanges with the same style. Example: ActiveWindow.Selection.ShapeRange(1).TextFrame2.TextRange.Runs(1).Font.Fill.ForeColor.RGB

  23. Image of Jann Jann says:

    Hi – can you help, please?

    How can I change the font color and size of the message box? What code will work and where will I put it? Creating an interactive game in powerpoint. Thank you!

    Sub Correct()
    Points.Caption = (Points.Caption) + 10
    Output = MsgBox(“Your answer is correct, well done!”, vbOKOnly, “Correct Answer”)
    End Sub

    Sub Incorrect()
    Points.Caption = (Points.Caption) – 5
    Output = MsgBox(“Your answer is incorrect.”, vbOKOnly, “Wrong Answer”)
    End Sub

    Sub Reset()
    SlideLayout.Points.Caption = 0
    End Sub

  24. Image of TEENA JOY P J TEENA JOY P J says:

    Good one!

  25. Image of Mr. Mahmoud Ibrahim Mr. Mahmoud Ibrahim says:

    Thanks for your explanation.

  26. Image of Anurag Anurag says:

    Hi Jamie, Is there any way to keep my macro save in a file so I can utilize on any other PPTs equivalent as.normal.dotm for Word, .xlam(add-in) for Excel.

    • Image of Jamie Garroch Jamie Garroch says:

      Hi Anurag. Thanks for the question and Happy New Year! The best way to do this would be to export your project as a ppam and activate it as an add-in via the PowerPoint add-ins UI. Save your ppam in %AppData%\Microsoft\AddIns and then in the Windows PowerPoint Developer tab, click PowerPoint Add-Ins and add your ppam from there. If you’re not code-signing your VBA project, you may need to adjust Trust Centre settings. You could optionally build an EXE/MSI installer package for Windows and PKG for macOS, although that is a more complex topic.

Join the BrightCarbon mailing list for monthly invites and resources

Tell me more!

We have worked with BrightCarbon for over 5 years, across a number of healthcare divisions, where they have been a very important part of our bid programme, supporting numerous awards of new contracts.

Sarah Appleton Brown Practice Plus Group