Makroer gi en måte å automatisere repeterende oppgaver . Ved hjelp av en makro , kan du raskt erstatte teksten brukes gjennom en PowerPoint-presentasjon med ny tekst . I stedet for manuelt å gjenta en handling , for eksempel endre et ord til en setning , sette opp en makro og legge den til PowerPoint verktøylinjen for hurtigtilgang. Ved hjelp av makroer hjelper deg med å utvikle konsistent innholdet lettere . Du trenger
PowerPoint 2007
Vis flere instruksjoner
en

åpne powerpoint- presentasjon . Klikk på " Microsoft Office"- knappen, og klikk på " Alternativer for PowerPoint "-knappen . Deretter klikker du på "Popular " linken, og under " alternativer for å arbeide med PowerPoint ", velg " Vis kategorien Utvikler på båndet . " Klikk på " OK "-knappen .
2

Klikk på " Developer "-menyen og klikk deretter på " Makroer "-knappen . Skriv inn en makro navn , for eksempel " SwitchText ", og angi hvor du vil at makroen lagres, vanligvis denne presentasjonen . Eventuelt legge til en beskrivelse av funksjonen makroen utfører . Klikk på " Create" -knappen og Visual Basic for Applications åpnes.
3

Skriv inn denne koden , for eksempel å bytte ordet "Tittel" til uttrykket " Ny presentasjon Tittel " gjennom hele presentasjonen .

Lukk Visual Basic for Applications vinduet.

Sub SwitchText ( )

Dim pSld Som Slide

Dim pShp Som Shape

Dim pTxtRng Som TextRange

Dim pTmpRng Som TextRange

Dim strWhatReplace As String , strReplaceText As String

strWhatReplace = "Tittel"

strReplaceText = " Ny presentasjon Title"

Hver pSld I ActivePresentation.Slides

Hver pShp I pSld.Shapes

Set pTxtRng = pShp.TextFrame.TextRange
< p> Set pTmpRng = pTxtRng.Replace (_

FindWhat : = strWhatReplace , _

Replacewhat : = strReplaceText , _

WholeWords : = sann)
< p > Vil Mens Ikke pTmpRng Er Ingenting

Set pTxtRng = pTxtRng.Characters _

( pTmpRng.Start + pTmpRng.Length , pTxtRng.Length )

Set pTmpRng = pTxtRng . Erstatt (_

FindWhat : = strWhatReplace , _

Replacewhat : = strReplaceText , _

WholeWords : = sann)

Loop
< p > Neste pShp

Neste pSld

End Sub
4

Lukk " Visual Basic for Applications "-vinduet.
5

Run makroen ved å klikke på "Macro "-knappen fra " Developer "-menyen . Klikk på " Kjør"-knappen . Ordet "Tittel" blir erstattet av " Ny presentasjon Tittel . "
6

Rediger makroen ved å klikke på "Macro "-knappen fra " Developer "-menyen . Klikk på " Rediger"-knappen og gjøre endringer i teksten strengen til å gjøre en annen endring.
7

Legg makroen til " Hurtigverktøylinje " ved å klikke på " Tilpass verktøylinje for hurtigtilgang " og velge " Flere kommandoer ... " alternativet. Velg " Makroer " fra " Velg kommandoer fra ... " menyen og velg makroen . Klikk på "Legg til "-knappen . Deretter klikker du på " OK "-knappen . Trykk "Ctrl /S " for å lagre filen .