microsoft.public.word.vba.general

Hi

While each of the Office applications uses VBA, they all rely on their
own object model. Code created in one application won't, generally, run
in another.

I suggest you re-post to one of the PowerPoint newsgroups.

Hope this helps.

Shauna Kelly. Microsoft MVP.
http://www.shaunakelly.com/word


"VBAimf" wrote in message
news:931c2702-aa4b-4992-a3e2-5ae3c8721b79@q70g2000hsb.googlegroups.com...
> I'd like to create a Find and Replace Macro in Powerpoint that I can
> use each day on a different Powerpoint file.
>
> I'm very inexperienced at VBA. However, I was able to use the macro
> recorder in MS Word to record a find and replace macro, which I placed
> into its own template document, which covers over a hundred items.
> Talk about the timesaver of the century.
>
> I also have to edit Powerpoint documents. My edits include text in
> textboxes in the slide as well as note pages.
>
> 1. Since Powerpoint doesn't have a macro recorder, could I copy the
> text below that is used in MS Word into Powerpoint?
>
> 2. How would I save it to be available over time (since I edit
> documents everyday)?
>
>
> I recognize that this question is probably very basic for the talent I
> see here, but it saves me considerable time doing edits that a
> computer can handle in seconds. Thanks.
>
> Jay
> VBA is my friend (VBAimf)
>
>
>
> Sub Godtest()
> '
> ' God test Macro
> '
> '
> Selection.Find.ClearFormatting
> Selection.Find.Replacement.ClearFormatting
> With Selection.Find
> .Text = "god"
> .Replacement.Text = "God"
> .Forward = True
> .Wrap = wdFindContinue
> .Format = False
> .MatchCase = False
> .MatchWholeWord = False
> .MatchWildcards = False
> .MatchSoundsLike = False
> .MatchAllWordForms = False
> End With
> Selection.Find.Execute Replace:=wdReplaceAll
> End Sub