PowerPoint VBA宏给出运行时错误448：找不到命名参数

Question

我正在尝试创建PowerPoint 2010 VBA宏以向每个幻灯片添加一个文本框。 但是，使用MSOffice文档中的命令创建文本框甚至不起作用。

Set myDocument = ActivePresentation.Slides(1)
myDocument.Shapes.AddTextbox(Type:=msoTextOrientationHorizontal, _
Left:=100, Top:=100, Width:=200, Height:=50).TextFrame _
.TextRange.Text = "Test Box"

这返回

Run-time error '448':
Named argument not found

文档是否错误或我缺少什么？

Answer 1

将Type:=替换为Orientation:=