hi there again, arekkusu03. cant think of any formula, but here's a VBA code that might help:
Sub Test()
Rowx = 3
Do While Worksheets("Output").Cells(Rowx, 1) <> ""
Namex = Worksheets("Output").Cells(Rowx, 1)
Worksheets("Data").Select
Cells.Find(What:=Namex, After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate
NRow = Selection.Row
For Ncol = 3 To 52
If Worksheets("Data").Cells(NRow, Ncol) = "T" Or Worksheets("Data").Cells(NRow, Ncol) = "R" _
Or Worksheets("Data").Cells(NRow, Ncol) = "TR" Or Worksheets("Data").Cells(NRow, Ncol) = "X" Then
Worksheets("Output").Cells(Rowx, "B") = Worksheets("Data").Cells(11, Ncol)
End If
Next Ncol
Rowx = Rowx + 1
Loop
End Sub
Bookmarks