求vba代码:在textbox1输入a列某行的值,在textbox2显示b列对应行的值
工作表不固定行数,在textbox1输入“ 2”时,textbox2显示“我”
a b
1 你
2 我
3 他
4 --
最简单的方法是在表单上做文章:
1 在textbox1有输入时,用代码将其数值写入一个单元格,如C1
Worksheets("Sheet1").cells(1,3).value=textbox1.value 【须据实更改】
2 在单元格D1录入公式:
=INDIRECT("B"&MATCH(C1,A:A,0))
3 然后,在textbox2显示D1的返回结果:
如:msgbox Worksheets("Sheet1").cells(1,4).value 【须据实更改】
这样做的好处是:
直接利用excel本身的自带函数,去实现所需功能;
而在VBA代码中仅是显示该返回值即可。
用if语句解决即可。
热门标签: