2011-03-08 115 views
0

我創建了幾個PowerPoint模板後發現我忘記添加可在Master View中找到的「Title」佔位符。相反,我已經添加了文本框佔位符,而且工作正常。但事實證明,有些人使用大綱模式,並在那裏呈現每張幻燈片的標題。如果標題的複選框未選中,則每個幻燈片在大綱模式下查看時都沒有標題。Powerpoint 2007 - 可以將佔位符更改爲標題佔位符?

所以,我在想如果可以將給定的佔位符更改爲標題佔位符?

+0

不,不可能將現有形狀轉換爲佔位符。你可以做的最好的就是'yourslide.Shapes.AddPlaceholder(...'並將你的形狀'.TextRange'複製到這個新的佔位符中。 – 2011-03-08 17:45:08

+0

它們是佔位符,但不是標題佔位符。在Master View中,可以選擇是不是你想通過一個複選框標題,這就是我基本上談論的 – 2011-03-09 12:20:48

+0

我很清楚你要問什麼,答案是一樣的 - 這是不可能的。 – 2011-03-09 16:20:01

回答

0

也許使用VBA。粘貼在Visual Basic中。選擇目標占位符/文本框(任何文本)。 然後,運行它。

Sub convertToTitle() 
    Dim osld As Slide 
    Dim SlideIndex As Long 
    Dim oshp As Shape 
    Dim oTxR As TextRange 
    SlideIndex = ActiveWindow.View.Slide.SlideIndex 
    Set osld = ActivePresentation.Slides(SlideIndex) 
    Set oshp = ActiveWindow.Selection.ShapeRange(1) 
    Set osld = oshp.Parent 
    Set oTxR = oshp.TextFrame.TextRange 
    With ActivePresentation 
     ActivePresentation.Slides(SlideIndex).CustomLayout = ActivePresentation.Designs(1).SlideMaster.CustomLayouts(2) 
     'use layout = 2 because it has both Title & Content 
     'but you can use any layout as long as it has Title in it 
     osld.Shapes.Placeholders.Item(1).TextFrame.TextRange = oTxR.Characters 
     oshp.Delete 
    End With 
End Sub 

瞧,它更改爲標題佔位符。但是你必須爲每張幻燈片運行它。