Поиск по рабочему листу с командной кнопкой и текстовыми полями - PullRequest
0 голосов
/ 17 апреля 2019

Я надеюсь, что вы, ребята, можете мне помочь.

Мой менеджер попросил меня создать в Excel рабочую книгу с функцией поиска по нажатию кнопки.Ничто из того, что я делаю, не работает по какой-то причине и хотелось бы узнать, возможно ли то, что она спросила, на самом деле?

идея в том, что у меня есть 1 текстовое поле, в которое вводится текст, например 11012587, затем нажимается кнопка поискаи он будет искать скрытый лист для этой ссылки.тогда в другом текстовом поле будут отображены инструкции, относящиеся к этой ссылке из того же скрытого листа.

Ничто из того, что я делаю, не работает, и я должен признать, что я немного новичок в этом, поэтому мои коды, которые я пробовал, могли быбыть полностью неправым.

с нетерпением жду ваших ответов:)

спасибо большое!

1 Ответ

0 голосов
/ 17 апреля 2019

Вы можете попробовать:

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
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...