Where do I place this syntax? <not a programmer

Thanks

Fred

"Jacob Skaria" wrote:

The below will find the number in Range("D2") of the active sheet in
("Cindy_PERSONAL.XLS").Sheets("Sheet1") and return the header from Row1 of
the matching column....Try and feedback


Dim ws As Worksheet
Set ws = Workbooks("Cindy_PERSONAL.XLS").Sheets("Sheet1")
lngCol = ws.Cells.Find(What:=Range("D2"), _
SearchDirection:=xlPrevious, SearchOrder:=xlByColumns).Column
MsgBox ws.Cells(1, lngCol)

If this post helps click Yes
---------------
Jacob Skaria


"fgwiii" wrote:

I am trying to find a solution to match all at one time. If you have a
suggestion on a better way to set this up, I will gladly consider it.

Thank you,

Fred

"Jacob Skaria" wrote:

"=IF(ISNA(MATCH(D2,[Cindy_PERSONAL.XLS]Sheet1!$F$2:$F$40,0)),FALSE,
[Cindy_PERSONAL.XLS]Sheet1!$F$1)"

Hope you are looking into each column at a time..and not a search on all
columns; in which case you can use .Find to retreive the column number and
then fetch the header..

If this post helps click Yes
---------------
Jacob Skaria


"fgwiii" wrote:

Hello,

I am currently using the syntax below to achieve a result of "TRUE" or FALSE
on the designation spreadsheet.
ActiveCell.Formula =
"=ISNUMBER(MATCH(D2,[Cindy_PERSONAL.XLS]Sheet1!$F$2:$F$40,0))"

D E F G
Cindy Ren Fred Jon
27109 27598 27028 11208
27206 27600 27076 11210
27210 27649 27386 12210

What I would like to do is be able to return the name of the user (First
cell in each column) if any of the values in their respective columns match
the designation spreadsheet.

Thank you,