Help with code

[Brep17]

Hey All,
I need help with some coding

Say I have cells A1 through A10 listed with names that coordinate with cells B1 through B10 with their addresses.

I need to have an input box appear and ask for a persons name to be entered, once the name is entered and the user clicks ok, the excel sheet needs to only show the name of the people that the user inputed along with their address.

If anyone could help, it would be awesome!

[shg]

You could instead put an x (or anything) in an unused column, and then autofilter on that column.

[Brep17]

Above was just a simplified example of my situation. In reality I have 2500 lines of data and filtering would be rediculous. I could just Control C and put my info in to find what I want. I need this to be clean looking

[shg]

In reality I have 2500 lines of data and filtering would be rediculous.

Oh? Why is that?

In the alternative, you could enter the name in a cell and use a lookup formula to retrieve the address.

[Brep17]

Oh? Why is that?

In the alternative, you could enter the name in a cell and use a lookup formula to retrieve the address.

Ha that is a smart way to go. Not the way I wanted, but could work for this.

Thanks for the responses....I might just drop it into an access database

[austin221871]

This is kind of a cheap way of doing it but it could work I just don't know your situation , or the other guys post is smart lol

Sub hide()
Dim a As Variant
Dim lr As Long

Worksheets("Sheet2").Range("A1").Clear

Worksheets("Sheet2").Activate

a = InputBox("Enter your full name.")

lr = Sheets("sheet1").UsedRange.Rows.Count

For i = 0 To lr
    If Sheets("Sheet1").Range("A1").Offset(i).Value = a Then
        Sheets("Sheet1").Range("A1:B1").Offset(i).Copy Sheets("Sheet2").Range("A1")
        Exit Sub
    End If
Next i

End Sub

[FDibbins]

Please take a moment to read the forum rules and then amend your thread title to something descriptive of your problem. Once you have done this please send me a PM and I will remove this request.

To change a Title on your post, click EDIT POST then Go Advanced and change your title, if 2 days have passed ask a moderator to do it for you.