Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Otvorte prezentáciu PowerPoint . Kliknite na tlačidlo " Microsoft Office " a kliknite na tlačidlo " Možnosti programu PowerPoint " . Potom kliknite na odkaz " Obľúbené " a pod " Hlavné možnosti pre prácu s aplikáciou PowerPoint , " vyberte " Zobraziť kartu Vývojár na páse kariet. " Kliknite na tlačidlo " OK " .
2
Kliknite na menu " Developer " a potom kliknite na tlačidlo " makrá " . Zadajte názov makra , napríklad " SwitchText " , a určite, kam chcete makro uložené , typicky túto prezentáciu . Voliteľne možno pridať popis funkcie makro výkonnejší . Kliknite na tlačidlo " Vytvoriť " a Visual Basic for Otvorí sa okno aplikácie .
3
Napíšte tento kód , napríklad pre prepnutie slovo " Názov " k výrazu " Nová prezentácia Title " v celej prezentácii .
Zatvorte Visual Basic okne aplikácie pre . klipart
Sub SwitchText ( )
Dim pSld ako Slide
Dim PSHP ako tvar
Dim pTxtRng Ako TextRange
Dim pTmpRng Ako TextRange
Dim strWhatReplace As String , strReplaceText As String
strWhatReplace = " Title "
strReplaceText = " Nová prezentácia Title "
Pre každý pSld V ActivePresentation.Slides
každý PSHP V pSld.Shapes
Set pTxtRng = pShp.TextFrame.TextRange
Set pTmpRng = pTxtRng.Replace ( _
FindWhat : = strWhatReplace , _
Replacewhat : = strReplaceText , _
WholeWords : = TRUE )
robiť , keď nie pTmpRng nie je nič
Set pTxtRng = pTxtRng.Characters _ klipart
( pTmpRng.Start + pTmpRng.Length , pTxtRng.Length ) klipart
Set pTmpRng = pTxtRng . nahradiť ( _
FindWhat : = strWhatReplace , _
Replacewhat : = strReplaceText , _
WholeWords : = TRUE )
Loop
Ďalšie PSHP
Ďalšie pSld
End Sub
4
Zatvorte " Visual Basic aplikácie pre " okná .
5
Run makro kliknutím na tlačidlo " makro " z menu " Developer " . Kliknite na tlačidlo " Spustiť " . Slovo " hlava " dostane nahrádzajú slovami " New Presentation hlavy . "
6
Upraviť makro kliknutím na tlačidlo " makro " z menu " Developer " . Kliknite na tlačidlo " Upraviť " a vykonajte zmeny textového reťazca , aby sa rôzne zmeny .
7
Pridať makro na " Panel s nástrojmi Rýchly prístup " , kliknutím na možnosť " Prispôsobiť panel s nástrojmi Rýchly prístup " a voľbou " Ďalšie príkazy ... " voľba. Vyberte " makrá " z " Zvoliť príkazy z ... " Ponuka a vyberte makro . Kliknite na tlačidlo " Pridať " . Potom kliknite na tlačidlo " OK " . Stlačte " CTRL /S " kľúče na uloženie súboru .
Copyright © počítačové znalosti Všetky práva vyhradené