PowerPoint：在每張幻燈片上重複文字

Question

我正在爲日常課堂演示文稿創建PowerPoint模板。在模板中，我希望在第一張幻燈片上突出顯示大量文本，並在較小尺寸的底部重複下一張幻燈片的底部。文本將每天都在改變。

到目前爲止，我有過的想法：

• 使用文本字段。據我所知，PowerPoint沒有任何可以動態設置的文本字段。
• 使用頁腳 - 這個工程，我可以修改主人以獲得我想要的外觀，但我真的很想從第一頁獲取文本的價值，以便編輯將被自動應用並且保存設置頁腳的第一步。
• 使用VBA - 我會願意給這個鏡頭，但我從來沒有使用過VBA，學習曲線似乎很陡峭，所以很高興知道這個想法在VBA中是否可行。

可以這樣做嗎？你會如何處理它？

下面是我希望能夠做的一個例子。理想的解決方案將適用於Mac（2013）和Windows（2016）版本的PowerPoint。

Answer 1

您可以用Excel文件連接您的演示文稿。並且運行ppt中的代碼將會拉出excel文件中的文本並立即更新標題。

使用帶有一些臨時文本的文本框創建演示文稿。將下面的代碼放在ppt中。另存爲pptm。

Sub AddMotionPath() 

    Dim Temp As String 

Excel.Application.Workbooks.Open ("D:\Users\Desktop\Book1.xlsx") ' update the path of the excel file 
Workbooks("Book1.xlsx").Activate 'activate the file 

For p = 1 To 4 
Temp = Workbooks("Book1.xlsx").Worksheets("Sheet1").Range("B" & p + 1).Value ' Column B has the titles 
ActivePresentation.Slides(p).Shapes(1).TextFrame.TextRange.Text = Temp ' this updates the titles from excel to ppt slide 
Next 
Excel.Application.Workbooks("Book1.xlsx").Close False 'closes the excel file 

End Sub 

讓我知道這對你的作品。您可以更新Excel文件並在ppt中運行宏。幻燈片中的文字將自動更新。