EXCEL VBA 组合框值查询
如图。工作表中有A、B两列数据和一个Active组合框。希望实现的功能是在E列的组合框中选择一个货物名称,然后在D11单元格出现A列代码与B列名称的合并字符串。比如:在列...
如图。工作表中有A、B两列数据和一个Active 组合框。
希望实现的功能是在E列的组合框中选择一个货物名称,然后在D11单元格出现A列代码与B列名称的合并字符串。
比如:在列表框中选择“夹克衫”,在D11单元格中自动出现“服装-上衣 夹克衫”
已将B列的数据赋值给组合框了。 展开
希望实现的功能是在E列的组合框中选择一个货物名称,然后在D11单元格出现A列代码与B列名称的合并字符串。
比如:在列表框中选择“夹克衫”,在D11单元格中自动出现“服装-上衣 夹克衫”
已将B列的数据赋值给组合框了。 展开
展开全部
Private Sub ComboBox1_Change()
If Not Range("B:B").Find(ComboBox1.Text) Is Nothing Then '判断是否找到
Range("D11").Value = Range("B:B").Find(ComboBox1.Text).Offset(0, -1).Text '找到就赋值找的的单元格左边一个单元格的值给D11
Else
Range("D11").Value = "" '没有找的就清空D11
End If
End Sub
If Not Range("B:B").Find(ComboBox1.Text) Is Nothing Then '判断是否找到
Range("D11").Value = Range("B:B").Find(ComboBox1.Text).Offset(0, -1).Text '找到就赋值找的的单元格左边一个单元格的值给D11
Else
Range("D11").Value = "" '没有找的就清空D11
End If
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询