在不同的表单上填充文本框

时间:2016-03-20 20:07:21

标签: excel vba excel-vba

我在userform1上有一个列表框和一个文本框。

我正在使用此代码:

Me.TextBox10.Value = Application.WorksheetFunction.VLookup(Me.ListBox1.Value, Sheets("sheet1").Range("A1:AM100"), 6, False)

这完全适用于userform1,但是,我现在也创建了userform2,但文本框并没有填充。为什么这段代码不能填充文本框?

提前致谢。

1 个答案:

答案 0 :(得分:0)

我设法让这个微小的变化:

userform2.TextBox10.Value = Application.WorksheetFunction.VLookup(Me.ListBox1.Value, Sheets("sheet1").Range("A1:AM100"), 6, False)