I think i may have missed something. Hopfully someone can help. I have a
worksheet with a list of names starting in col A5 The names have information
in columns B-J. I have a search window in A1. The problem is when i type in
the name, the name shows in the search window that it in the column, but the
name and info doesn't appear. I still have to scroll down to find it. Is
there a way to have that info either show at the top of the list or in the
search window? Thanks

Hi,

And by search window you mean AutoFilter? If so then set up a series of
=VLOOKUP($A1,$A5:$J100,COLUMN(),False)
enter this in B1 and then copy it to C1:J1)

--
If this helps, please click the Yes button

Cheers,
Shane Devenshire


"doss04" wrote:

I think i may have missed something. Hopfully someone can help. I have a
worksheet with a list of names starting in col A5 The names have information
in columns B-J. I have a search window in A1. The problem is when i type in
the name, the name shows in the search window that it in the column, but the
name and info doesn't appear. I still have to scroll down to find it. Is
there a way to have that info either show at the top of the list or in the
search window? Thanks

I'm not sure about AutoFilters havent used them yet. Is there anything i need
to do to the cells before pasting this formula. I just tried to copy and
paste in B1 but i get the symbol #N/A.

"Shane Devenshire" wrote:

Hi,

And by search window you mean AutoFilter? If so then set up a series of
=VLOOKUP($A1,$A5:$J100,COLUMN(),False)
enter this in B1 and then copy it to C1:J1)

--
If this helps, please click the Yes button

Cheers,
Shane Devenshire


"doss04" wrote:

I think i may have missed something. Hopfully someone can help. I have a
worksheet with a list of names starting in col A5 The names have information
in columns B-J. I have a search window in A1. The problem is when i type in
the name, the name shows in the search window that it in the column, but the
name and info doesn't appear. I still have to scroll down to find it. Is
there a way to have that info either show at the top of the list or in the
search window? Thanks

I dont think its an auto filter. I have a macro in place. the one below if
that helps.

Sub FindSelect()
Dim c As Range, s As Long
Range("A2:A65000").Select
Set c = Selection.Find(Range("A1").Value)
If Not (c Is Nothing) Then
c.Select
Else
Range("A1").Select
MsgBox "Last Name: " & Range("A1").Value & " not found!"
End If
End Sub

I hope this helps understand what i have.
"Shane Devenshire" wrote:

Hi,

And by search window you mean AutoFilter? If so then set up a series of
=VLOOKUP($A1,$A5:$J100,COLUMN(),False)
enter this in B1 and then copy it to C1:J1)

--
If this helps, please click the Yes button

Cheers,
Shane Devenshire


"doss04" wrote:

I think i may have missed something. Hopfully someone can help. I have a
worksheet with a list of names starting in col A5 The names have information
in columns B-J. I have a search window in A1. The problem is when i type in
the name, the name shows in the search window that it in the column, but the
name and info doesn't appear. I still have to scroll down to find it. Is
there a way to have that info either show at the top of the list or in the
search window? Thanks

Hi,

What exactly is displayed in cell A1, I assumed it was the value you were
searching form?

The VLOOKUP formula returns NA when the item is not found. So this suggests
that the item listed in cell A1 is not in the range A5:A100 or whatever. Or
maybe the hyppthetical range A5:A100 does not go down as far as your data,
you should adjust that range to match your real range A5:J100.

Also, with an exact match, if the item in A1 is not spelled exactly the same
way as it is in the range A5:A100, including spaces, it will not be an exact
match and you will get the NA error message.

--
If this helps, please click the Yes button


Cheers,
Shane Devenshire


"doss04" wrote:

I dont think its an auto filter. I have a macro in place. the one below if
that helps.

Sub FindSelect()
Dim c As Range, s As Long
Range("A2:A65000").Select
Set c = Selection.Find(Range("A1").Value)
If Not (c Is Nothing) Then
c.Select
Else
Range("A1").Select
MsgBox "Last Name: " & Range("A1").Value & " not found!"
End If
End Sub

I hope this helps understand what i have.
"Shane Devenshire" wrote:

Hi,

And by search window you mean AutoFilter? If so then set up a series of
=VLOOKUP($A1,$A5:$J100,COLUMN(),False)
enter this in B1 and then copy it to C1:J1)

--
If this helps, please click the Yes button

Cheers,
Shane Devenshire


"doss04" wrote:

I think i may have missed something. Hopfully someone can help. I have a
worksheet with a list of names starting in col A5 The names have information
in columns B-J. I have a search window in A1. The problem is when i type in
the name, the name shows in the search window that it in the column, but the
name and info doesn't appear. I still have to scroll down to find it. Is
there a way to have that info either show at the top of the list or in the
search window? Thanks

A single line change will put the Found cell at the top of the window:

Sub FindSelect()
Dim c As Range, s As Long
Range("A2:A65000").Select
Set c = Selection.Find(Range("A1").Value)
If Not (c Is Nothing) Then
c.Select
Application.Goto reference:=c, scroll:=True
Else
Range("A1").Select
MsgBox "Last Name: " & Range("A1").Value & " not found!"
End If
End Sub

--
Gary''s Student - gsnu200817

Thanks Gary. I couldn't get it to work. I"ll try and show you what i have.

A B C D E - J
1Search box all else is blank
2 merged cells with title of doc
3 merged cells with abbrv codes
4 column titles with pane freeze
5 Adams, John 6' 0" 165 00/00/78 code
6 Sander, David 5' 5" 120 00/00/86 code

So when i type in name in A1 and the name appears, (which works) when i hit
enter i would like the rest of the information to appear in the row. Is that
possible?

"Gary''s Student" wrote:

A single line change will put the Found cell at the top of the window:

Sub FindSelect()
Dim c As Range, s As Long
Range("A2:A65000").Select
Set c = Selection.Find(Range("A1").Value)
If Not (c Is Nothing) Then
c.Select
Application.Goto reference:=c, scroll:=True
Else
Range("A1").Select
MsgBox "Last Name: " & Range("A1").Value & " not found!"
End If
End Sub

--
Gary''s Student - gsnu200817