Powerpoint VBA 运行时错误“-2147024809 （80070057）”： 指定的参数具有不正确的数据类型

问：

发布这个回答你自己的问题是因为我看到许多帖子都有相同的错误消息，每个帖子都是独一无二的。

  Sub makeCurve()
  Const numpts = 7
    Dim pts(1 To numpts, 1 To 2 )
    For i = 1 to numpts
      pts(i, 1) = 10 + i * 72 / 2
      pts(i, 2) = 10 + i * 72 / 2
    Next
    Set myDocument = ActivePresentation.Slides(1)
    With myDocument.Shapes.AddCurve(pts).Line
      .ForeColor.RGB = RGB(0, 0, 0)
      .Weight = 1.5
    End With
  End Sub

尝试运行子时将给出以下内容：

Run-time error '-2147024809 (80070057)':

The specified parameter has an incorrect data type

如何解决错误？