Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/cocoa/3.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Excel 从帧内的文本框提取数据值?_Excel_Userform_Vba - Fatal编程技术网

Excel 从帧内的文本框提取数据值?

Excel 从帧内的文本框提取数据值?,excel,userform,vba,Excel,Userform,Vba,在Excel中,我试图从框架内动态创建的文本框中提取数据。如下面代码所示,已创建了文本框,其中的名称分别为gogo1、gogo2和gogo3。我希望在按下“确定”按钮时,将输入这些文本框的信息粘贴到sheet1。但是,我似乎无法提取输入这些文本框的任何数据,并且在单击“确定”按钮后,sheet1仍然为空 Private Sub showCOL_Click() Dim number As Integer Dim gogo(1 To 3) As String For number = 1 To 3

在Excel中,我试图从框架内动态创建的文本框中提取数据。如下面代码所示,已创建了文本框,其中的名称分别为
gogo1
gogo2
gogo3
。我希望在按下“确定”按钮时,将输入这些文本框的信息粘贴到
sheet1
。但是,我似乎无法提取输入这些文本框的任何数据,并且在单击“确定”按钮后,
sheet1
仍然为空

Private Sub showCOL_Click()
Dim number As Integer
Dim gogo(1 To 3) As String

For number = 1 To 3

  Set first = UserForm2.Frame1.Controls.Add("forms.textbox.1")

With first
.Name = "gogo" & number
.Width = 30
.Height = 20
.Left = 36
.Top = 20 * number

End With

Next number


End Sub`


Private Sub ColnProceed_Click()

If UserForm2.Frame1.Name = "gogo2" Then
MsgBox gogo2.Value


End If

看起来您正在设置三个文本框,但随后在单击处理函数中检查包含它们的框架的名称。我相信您想检查文本框的名称是否为“gogo2”,而不是对它们进行分组的框架

目前,如果您只想测试第二个文本框中的值,请使用:

MsgBox (Me.Controls("gogo2").Value)

通常,要读取文本框的值,可以使用
TextBox1.Text
或类似工具。