Question

VBA EXCEL通过textbox查询表格中的数据，是否查找到均在label中显示。

本人初学VB。现在在学习的过程中碰到难点。
EXCEL通过textbox查询表格中的数据，是否查找到均在label中显示。
这设计了VBA简单编程。请会的朋友门留下邮箱吧~

Answer 1

查找按钮的代码：

Private Sub CommandButton1_Click()

If Not Sheets(1).Cells.Find(Me.TextBox1.Value) Is Nothing Then

   Me.Label1.Caption = "你查找值：" & Me.TextBox1.Value & "在" & Sheets(1).Cells.Find(Me.TextBox1.Value).Address & "单元格"

Else

   Me.Label1.Caption = "未找到你想要的数据"

End If

End Sub

追问

(1)输入名字和输入姓都是一样的结果.应该只能匹配所有字符.而不单单是第一个字符.
(2)查找成功以后，怎样输出某些指定单元格的值。

追答

追问

你查找“赵”。你试试。也能找到。
留下QQ吧~~~

追答

Private Sub CommandButton1_Click()
If Not Sheets(1).Cells.Find(Me.TextBox1.Value, lookat:=xlWhole) Is Nothing Then

Me.Label1.Caption = " 你查找值：" & Me.TextBox1.Value & " 在" & Sheets(1).Cells.Find(Me.TextBox1.Value).Address & "单元格"

Else

Me.Label1.Caption = "未找到你想要的数据"

End If

End Sub

三零八五四九零八三。
用完全匹配参数就可以解决模糊查找

Answer 2

这个问题不好解决，但可以为你找条路子。在网上下载”兰色幻想vba从入门到进阶80集“，绝对对你有帮助。我也正在学。

追问

我现在立马就要用呀~~~

Answer 3

你想实现什么功能 ？