Find Value, Select all rows and result in ListBox

chiabgigi

New Member
Joined
Aug 30, 2009
Messages
48
In discussions I found this code. Is it possible to change it so that the value of a text box is the parameter to search for and that all items are redirected to a listbox? Example in column C there are pages of a catalog. There are 10 lines on page 7. In the textbox, type 7 and lines A to J should appear

Mr.
Rick Rothstein
Oct/28/2014 wrote:

VBA Code:
Sub SelectEntireRow()
  Dim FindMe As String, Rng As Range
  FindMe = InputBox("What did you want to find?")
  If Len(FindMe) Then
    On Error GoTo RangeNotSelected
    Set Rng = Application.InputBox("Select the range to look in...", Type:=8)
    If TypeOf Rng Is Range Then
      Rng.Replace FindMe, "#N/A", xlWhole
      With Rng.SpecialCells(xlConstants, xlErrors)
        .EntireRow.Select
        .Value = FindMe
      End With
    End If
  End If
RangeNotSelected:
End Sub
 

DanteAmor

Well-known Member
Joined
Dec 3, 2018
Messages
12,594
Office Version
  1. 2007
Platform
  1. Windows
I'm glad to help you. Thanks for the feedback.
 

Some videos you may like

Excel Facts

Is there a shortcut key for strikethrough?
Ctrl+S is used for Save. Ctrl+5 is used for Strikethrough. Why Ctrl+5? When you use hashmarks to count |||| is 4, strike through to mean 5.

Watch MrExcel Video

Forum statistics

Threads
1,122,355
Messages
5,595,678
Members
414,009
Latest member
SNesbyCarr

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top