• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 669
  • Last Modified:

In VBA for PowerPoint 2010, how do I use the built-in "Find" dialog's "Find Next" function?

Hello all.

This is about VBA for PowerPoint 2010. The goal is to use PPT's built-in "Find Next" function that is accessed through the "Find" dialog, instead of having to write code to loop through slides, shapes and text ranges, which seems ridiculously redundant!

I found that the control id for the "Find" dialog is 141, and the control id for the "Find Next" button is 570 (correct me if I'm wrong or off track).

I can display the "Find" dialog like so:

But when I try to use the "Find Next" button the same way I get a "Object variable of With block variable not set" error:

Actually I don't even want to display the dialog; I just want to use its functions behind the scene...

So, first I need to know how to paste a string in the "Find what" combobox (or something to that effect). By the way, I tried pasting after the dialog is called, but the paste is done on the slide instead of in the combobox...

Then I need to know, using VBA, how to activate the "Find Next" button (or something to that effect). Preferably this would involve a more civilized method than "send keys"...

Can anyone help?
1 Solution
You could probably open and paste in text like this and "click" the button.

CommandBars.ExecuteMso ("FindDialog")
SendKeys ("^v")
CommandBars.ExecuteMso ("FindNext")

But why??

There will be all sorts of problems with losing focus on the search dialog and proesumably you have to click something to initiate "Find Next" so why not the find next button.
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

Free Tool: Subnet Calculator

The subnet calculator helps you design networks by taking an IP address and network mask and returning information such as network, broadcast address, and host range.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now