0

我只是想从形状中获取文本并将其显示在其他地方(文本框,MsgBox ...)

我知道这是不正确的,但希望你能从中掌握这个概念。

msgbox ("Do you want to overwrite " & slide1.slot1.value &, 36, "?")

slot1 = shapename

有任何想法吗?

4

1 回答 1

6

假设您正在当前活动演示文稿的幻灯片 1 上查找名为 Slot1 的形状中的文本:

Msgbox ActivePresentation.Slides(1).Shapes("Slot1").TextFrame.TextRange.Text
于 2013-01-21T16:59:35.363 回答