Finding and Displaying data results from search criteria

Hi

which columns on the list sheet do your 2 criteria match? There are multiple columns that could match the general headings of NAME and NRIC.

rylo

Hi Rylo,

Thank you for your response.

For the criteria "Name":
it can appear in colum D, F, H, J, L, N

For the criteria "NRIC",
it can appear in column E, I, K, M, O

I would also need the results to show their header, that is for e.g:

Name criteria = Wee Oon Phing - there are a total of 3 results

Then the returned data should be
1) Wee Oon Phing + {header} = Witness + Column A
2) Wee Oon Phing + {header} = Witness + Column A
3) Wee Oon Phing + {header} = Witness + Column A

Thank you.

Hi

Copy the headings from List!A3:O3 and put them in Search!A9:O9.

Put in your selection (either B4 or B5) then run

Sub aaa()
  NAMEarr = Array("Name of Director / Shareholder 1 ", "Name of Director / Shareholder 2", "Name of New Directorship", "Guarantor 1", "Guarantor 2", "Witness")
  NRICarr = Array("Director's NRIC", "NRIC of New Directorship", "NRIC of Guarantor 1", "NRIC of Guarantor 2", "Witness NRIC")
  With Sheets("List")
    Set datarng = .Range("A3:O" & .Cells(Rows.Count, 1).End(xlUp).Row)
  End With
  If Len(Cells(4, 2)) > 0 Then
    Range("D1:I1").Value = NAMEarr
    For i = 1 To 6
      Range("C1").Offset(i, i).Value = Cells(4, 2).Value
    Next i
    datarng.AdvancedFilter Action:=xlFilterCopy, criteriarange:=Range("D1:I7"), copytorange:=Range("A9:O9")
  Else
    Range("D1:H1").Value = NRICarr
    For i = 1 To 5
      Range("C1").Offset(i, i).Value = Cells(5, 2).Value
    Next i
    datarng.AdvancedFilter Action:=xlFilterCopy, criteriarange:=Range("D1:H6"), copytorange:=Range("A9:O9")
  End If
  
  Range("D1:I7").ClearContents
  
End Sub

HTH

rylo

this is PERFECT! thank you, Rylo!

@ winlam

Based on your last post it seems that you are satisfied with the solution(s) you've received but you haven't marked your thread as SOLVED. I'll do that for you now but please keep in mind for your future threads that Rule #9 requires you to do that yourself. If your problem has not been solved you can use Thread Tools (located above your first post) and choose "Mark this thread as unsolved".
Thanks.

Also, as a new member of the forum, you may not be aware that you can thank those who have helped you by clicking the small star icon located in the lower left corner of the post in which the help was given. By doing so you can add to the reputation(s) of those who helped.

Hi Hi,

i was serching for the SOLVED button the whole of yesterday! Couldn't find it... How do i mark as SOLVE? Please help.

Here you go:

New quick method:
Select Thread Tools-> Mark thread as Solved. To undo, select Thread Tools-> Mark thread as Unsolved.

Or you can use this way:

How to mark a thread Solved
Go to the first post
Click edit
Click Go Advanced
Just below the word Title you will see a dropdown with the word No prefix.
Change to Solved
Click Save

thank you so much!