Как динамически добавить элемент в userform Word vba 2010?

Есть пользовательская форма в word. Я хочу чтобы после нажатия клавиши добавлялись новые элементы в саму форму. Я написал код, который прекрасно работает в excel, но в word выдаёт ошибку mthod or daata member not found в месте .Controls. Помогите решить проблему.

 Dim N As Integer
    Dim TBoxA() As MSForms.TextBox, LblA() As MSForms.Label

Private Sub CommandButton1_Click()

ReDim Preserve TBoxA(N), LblA(N)
  
Set LblA(N) = Me.Controls.Add("Forms.Label.1", "LblA" & N)
With LblA(N)
     .Left = 15
     .Top = 30 + 20 * N
     .Caption = "ОКПД" & N
End With


Set TBoxA(N) = Me.Controls.Add("Forms.TextBox.1", "TBoxA" & N)
With TBoxA(N)
     .Left = 45
     .Top = 30 + 20 * N
End With
 
   N = N + 1
End Sub

Private Sub UserForm_Initialize()
N = 1
End Sub