使用变量中的数据更新 Excel 用户表单中的多个文本框

Question

我正在寻找一种方法来使用来自变量数组的数据更新 Excel 用户表单中的多个文本框。文本框命名为 TextBox1、TextBox2 等。我想在 DO 循环中更新这些文本框，而不是逐行更新每个文本框。

变量数组将包含用户表单中 n 个文本框的 n 个值。

我对用户表单很陌生；感谢任何帮助。

谢谢。

Answer 1

尝试自定义它以满足您的需求：

' Declare variables
Dim arrValues As Variant
Dim counter As Integer

' Initialize array
arrValues = Array("a", "b", "c")

' Loop through array items
For counter = 0 To UBound(arrValues)

    ' Refer to textboxes names from controls collections and assign array values
    Me.Controls("TextBox" & counter + 1).Text = arrValues(counter)

Next counter

使用变量中的数据更新 Excel 用户表单中的多个文本框

Update multiple text boxes in an Excel userform with data from variables

excel

vba

userform