2016-03-20 148 views
0

我在userform1上有一個列表框和一個文本框。填充不同形式的文本框

我使用這個代碼:

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

這工作完全UserForm1上,不過,我現在還創建userform2但文本框不填充。爲什麼這個代碼不能用來填充文本框?

在此先感謝。

+1

數據太少,所以我想拋出一個猜測:您在userform2實際文本框和列表框的名字在你的代碼被正確引用 – user3598756

+0

是什麼讓你認爲它不適用於UserForm2?你如何初始化/填充UserForm1,以及如何使用UserForm2來解決這些問題?請在這裏發佈所有相關的VBA代碼。否則,我們無法幫助你。欲瞭解更多信息,請閱讀此:http://stackoverflow.com/help/how-to-ask和這個http://stackoverflow.com/help/mcve – Ralph

+1

瘋狂的猜測,也許你havnt命名爲textbox10 userform2中的文本框? – jonathana

回答

0

我設法得到它與此略有變化的工作:

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