Question

我试图获取文本框的值并通过单击按钮将其保存到字符串数组中。我在name(0) = TextBox1.Text行上收到语法错误。一旦我弄清楚如何做它，我将把它变成一个动态数组（这也是我有一个num变量的原因，因为可以多次点击该按钮）。

我在这里做错了吗？

Private Sub CommandButton1_Click()
   Dim name(10) As String
   Dim num As Integer

   ' Debug.Print TextBox1.Text

   name(0) = TextBox1.Text
End Sub

Answer 1

'Name'是excel的内置名称。

尝试：

Private Sub CommandButton1_Click()
   Dim testArray(1 to 11) As String
   Dim num As Integer

   ' Debug.Print TextBox1.Text

   testArray(1) = TextBox1.Text
End Sub

编辑：更改了数组的名称。

从文本框填充VBA数组

1 个答案: