Makroer give en måde at automatisere gentagne opgaver . Ved hjælp af en makro , kan du hurtigt erstatte teksten bruges i hele en PowerPoint-præsentation med ny tekst . I stedet for manuelt at gentage en handling , såsom at ændre et ord til en sætning , der er nedsat en makro og føje den til PowerPoint værktøjslinjen Hurtig adgang. Brug makroer hjælper dig med at udvikle konsekvente indhold lettere . Ting du skal
PowerPoint 2007
Vis Flere Instruktioner
1
Åbn din PowerPoint-præsentation. Klik på " Microsoft Office"-knappen , og klik på " PowerPoint-indstillinger "-knappen. Klik derefter på "Popular " linket , og under "Top muligheder for at arbejde med PowerPoint ", vælge " Vis fanen Udvikler på båndet. " Klik på " OK" knappen.
2
Klik på "Udvikler " i menuen og klik derefter på " makroer" knappen. Indtast en makro navn, såsom " SwitchText ", og angive, hvor du vil have den makro gemt , typisk denne præsentation. Eventuelt tilføje en beskrivelse af funktionen makroen udfører . Klik på " Opret" knappen og Visual Basic for Applications åbnes.
3
Indtast denne kode , for eksempel, at skifte ordet "Titel" til udtrykket " Ny præsentation titel" hele præsentationen .
Luk Visual Basic for Applications -vinduet.
Sub SwitchText ()
Dim pSld Som Slide
Dim pShp Som Shape < br >
Dim pTxtRng Som TextRange
Dim pTmpRng Som TextRange
Dim strWhatReplace As String , strReplaceText As String
strWhatReplace = "Titel"
strReplaceText = " Ny præsentation Title "
For Each pSld I ActivePresentation.Slides
For Each pShp I pSld.Shapes
Set pTxtRng = pShp.TextFrame.TextRange
< p> Set pTmpRng = pTxtRng.Replace (_
FindWhat : = strWhatReplace , _
Replacewhat : = strReplaceText , _
WholeWords : = sand)
< p > Må While Not pTmpRng Er Ingenting
Set pTxtRng = pTxtRng.Characters _
( pTmpRng.Start + pTmpRng.Length , pTxtRng.Length )
Set pTmpRng = pTxtRng . Erstat (_
FindWhat : = strWhatReplace , _
Replacewhat : = strReplaceText , _
WholeWords : = sand)
Loop
< p > Næste pShp
Næste pSld
End Sub
4
Luk "Visual Basic for Applications " vinduet.
5
Run makroen ved at klikke på "Macro " knappen fra "Udvikler "-menuen. Klik på " Kør" knappen. Ordet " Title" bliver erstattet af " Ny præsentation afsnit. "
6
redigere makroen ved at klikke på "Macro " knappen fra "Udvikler "-menuen. Klik på "Rediger "-knappen og foretage ændringer til den tekststreng at gøre en anden ændring.
7
Tilsæt makro til " Værktøjslinjen Hurtig adgang " ved at klikke på " Tilpas værktøjslinjen Hurtig adgang ", og vælge " Flere kommandoer ... " valgmulighed . Vælg " makroer" fra " Vælg kommandoer fra ... " menuen og vælge din makro . Klik på knappen "Tilføj" . Klik derefter på "OK" knappen. Tryk på "Ctrl /S " tasterne for at gemme filen .