使用命令按钮和文本框搜索工作表

问题描述 投票:-1回答:1

我希望你们能帮助我。

我的经理让我在excel中创建一个工作簿,用于搜索单击按钮的功能。我出于某种原因没有做任何事情,并希望看看她所问的是否真的可能?

我的想法是我有1个输入文本的文本框,例如11012587,然后点击搜索按钮,它将搜索隐藏的工作表以获取此参考。然后另一个文本框将显示与该隐藏表相同的指令。

我没有做任何工作,我不得不承认我在这方面有点像菜鸟,所以我尝试的代码可能完全错了。

期待你的回复:)

谢谢一堆!

excel vba
1个回答
0
投票

你可以尝试:

Option Explicit

Sub test()

    Dim strSearchValue As String
    Dim rngPosition As Range

    With ThisWorkbook.Worksheets("Sheet1").UsedRange '<- Change sheet name

        strSearchValue = "Test" '<- Change search text

        Set rngPosition = .Find(strSearchValue, LookIn:=xlValues, LookAt:=xlWhole)

        If Not rngPosition Is Nothing Then '<- If search text found

            MsgBox rngPosition.Address '<- Messagew box with the address

        End If

    End With

End Sub
© www.soinside.com 2019 - 2024. All rights reserved.