vba 给TextBox1一个值 TextBox2立即出现另一个值(值的来源是工作表中,如TextBox1等于A1 则TextBox等于a2)

 我来答
unsamesky
2013-05-26 · TA获得超过2735个赞
知道小有建树答主
回答量:859
采纳率:100%
帮助的人:433万
展开全部

一般利用Textbox的Change事件,如下:

Private Sub TextBox1_Change()

    If TextBox1.Value = Sheets("工作表名称").Cells(1,"A") Then TextBox2.Value = Sheets("工作表名称").Cells(2,"A")

End Sub

Sheets("工作表名称")这里的工作表名称就是值的来源工作表显示的名称,一般新建的工作表显示为Sheet1,sheet2,sheet3...

cells(1,"A")表示第一行,第“A"列的单元格,也就是A1单元格,以此类推...

 

就知道楼主是想在A列里面查找匹配数据,然后在TextBox2里面显示出来。借上面同志的附件,给你改一个快得!!

cxf2007440862
2013-05-25 · 超过17用户采纳过TA的回答
知道答主
回答量:39
采纳率:0%
帮助的人:41.1万
展开全部
更多追问追答
追问
这个怎么循环,
如:
TextBox1等于A1 则TextBox2等于b1
TextBox1等于A2 则TextBox2等于b2
TextBox1等于A3则TextBox2等于b3,以此类推
追答

你下载该附件,在TextBox1里面输入A列任何一个值后点击回车键,则会在TextBox2里面显示B列对应的值

本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式