Du kan inte välja fler än 25 ämnen
Ämnen måste starta med en bokstav eller siffra, kan innehålla bindestreck ('-') och vara max 35 tecken långa.
1234567891011121314 |
- Sub TestMacro()
- '
- ' TestMacro Macro
- ' This is a test macro
- '
-
- '
- With ActivePresentation.Slides(1).Shapes(1)
- .Title.TextFrame.TextRange.Text = "This is a macro slideshow"
- End With
- With ActivePresentation.Slides(1).Shapes(2)
- .Title.TextFrame.TextRange.Text = "subtitle"
- EndWith
- End Sub
|