PowerPoint VBA 宏给出 运行 时间错误 448:未找到命名参数

PowerPoint VBA Macro Gives Run Time Error 448: Named argument not found

我正在尝试创建一个 PowerPoint 2010 VBA 宏来为每张幻灯片添加一个文本框。 但是,使用 MSOffice documentation to create a text box 中的命令甚至不起作用。

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

这个returns

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

文档有误还是我遗漏了什么?

Type:=替换为Orientation:=