Macro forniscono un modo di automatizzare le attività ripetitive . Usando una macro , è possibile sostituire rapidamente il testo utilizzato durante una presentazione di PowerPoint con il nuovo testo . Invece di ripetere manualmente un'azione, come ad esempio cambiare una parola per una frase , impostare una macro e aggiungerlo alla barra di accesso rapido di PowerPoint . Utilizzo di macro ti aiuta a sviluppare contenuti coerenti con maggiore facilità . Cose che ti serviranno
PowerPoint 2007
Mostra più istruzioni
1

aprire la presentazione di PowerPoint . Fare clic sul pulsante "Microsoft Office " e fare clic sul pulsante " Opzioni di PowerPoint " . Quindi , fare clic sul collegamento "Popular" , e sotto " Opzioni principali per l'utilizzo di PowerPoint " selezionare " Mostra scheda Sviluppo sulla barra multifunzione . " Fare clic sul pulsante " OK" .

2 Fare clic sul menu "Sviluppatore " e quindi fare clic sul pulsante " Macro " . Immettere un nome di macro , ad esempio " SwitchText , " e specificare dove si desidera che la macro memorizzate , in genere questa presentazione . Facoltativamente, aggiungere una descrizione della funzione della macro esegue . Fare clic sul pulsante "Crea" e il Visual Basic per Applications finestra si apre .
3

Inserisci questo codice , per esempio, per passare la parola "Titolo" per la frase " Nuova presentazione titolo " tutta la presentazione .

Chiudere il Visual Basic, Applications finestra .

Sub SwitchText ( ) per

Dim PSLD come presentazione

Dim Pshp Come Shape < br >

Dim pTxtRng Come TextRange

Dim pTmpRng Come TextRange

Dim strWhatReplace As String , strReplaceText As String

strWhatReplace = "Titolo"

strReplaceText = "Nuova presentazione titolo "

Ogni PSLD In ActivePresentation.Slides

Ogni Pshp In pSld.Shapes

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

FindWhat : = strWhatReplace , _

Replacewhat : = strReplaceText , _

WholeWords : = True ) per < p > Do While Not pTmpRng Is Nothing

pTxtRng = pTxtRng.Characters _

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

pTmpRng = pTxtRng . sostituire ( _

FindWhat : = strWhatReplace , _

Replacewhat : = strReplaceText , _

WholeWords : = True ) per

loop
< p > Avanti Pshp

Avanti PSLD

End Sub
4

Chiudere il " Visual Basic for Applications " finestra .
5

Run la macro facendo clic sul pulsante "Macro" dal menu " Developer " . Fare clic sul pulsante "Esegui" . La parola "Titolo" viene sostituito da "Nuova presentazione titolo ".
6

modificare la macro facendo clic sul pulsante "Macro" dal menu " Developer " . Fare clic sul pulsante "Modifica" e apportare modifiche alla stringa di testo per fare un cambiamento diverso .
7

Aggiungi la macro per la " barra di accesso rapido " cliccando l'opzione " Personalizza barra di accesso rapido " e selezionando l'opzione " altri comandi ... " opzione . Seleziona "Macro " dal " Scegli comandi da ... " menu e selezionare la macro . Fare clic sul pulsante "Aggiungi " . Quindi, fare clic sul pulsante " OK" . Premere i tasti "CTRL /S " per salvare il file .