Finding Values Contained in an Array in a Sheet

Is this even possible? I have a user enter whatever they want to find in Column A of a random worksheet they are working in. I have written code to store this as an array

Dim ElmArr() as String

Set ElmArr() = Range("A1" & Selection.End(xlDown))

The add-in opens the file(s) that the user wants to pull data from. The ElmArr is what the code is to search for; once it's found it pull data from the same row but a different column and stores that in another array. How can this be done?

I'm trying to avoid posting my code due to proprietary reasons. I'm also trying to avoid using vlookup and match.

All I want it to do is take the array I've created, open the specified file, search for those numbers in the array, create a new array with the numbers associated with what it's found:

user created array to search file = G, J

file:

A |B |C
-----------
G |5 |2
G |5 |8
H |4 |3
H |4 |9
I |8 |4
I |8 |5
J |9 |1
J |9 |6


The code searches for the values specified, in this case G and J. There will be double of the entries because one will have a max and min value associated with it. I need to to find G and take the max value between the two G's in column C. Same thing with value J. So the answer I should get back is 8, 6. Once this is done and stored in another array I'll paste it to another sheet with it's corresponding user created array. Does this explanation clarify things for you?

Curious if anyone in the EF land can help me?
Thanks, Sam

hi Sam, sort of that within one workbook basing on your story above

Thank you! I kept hitting a wall by using find within a for loop and then offsetting the cell once it found it...it was going nowhere fast. It works beautifully...if the array is contained in A1. I tried to adapt the code to the column of A and it kept giving me a type mismatch.

sample, please check attachment

Considering how much I use xlDown you'd think I'd realize xlUp and rowcount would be a good idea. Brilliant, thank you!

So this didn't occur to me until I started really getting into the rest of my userform, but I realized that this just pulls the second entry for the same letter. So no matter which on of the G's or I's or J's etc... are bigger if just pulls the second entry for it. Is there a way to modify this so that it pulls the max value between the two entries?

Bump... anyone maybe?

Option Explicit
Sub test()

Dim lrow  As Long, arr2search, resultarr, i As Long, j As Long, c As Range, firstAddress As String, tempvalue As String

lrow = Cells(Rows.Count, 1).End(xlUp).Row
If lrow = 1 And Range("a1") = "" Then Exit Sub

arr2search = Range("a1:b" & lrow)

ReDim resultarr(1 To lrow, 1 To 2)

For i = 1 To lrow
    If Trim(arr2search(i, 1)) <> "" Then
        tempvalue = Trim(arr2search(i, 1))
        j = j + 1
        resultarr(j, 1) = tempvalue
        With Sheets("Data").UsedRange
            Set c = .Find(tempvalue, , xlValues, xlWhole)
                If Not c Is Nothing Then
                    firstAddress = c.Address
                    Do
                        If c.Offset(, 2).Value > resultarr(j, 2) Then resultarr(j, 2) = c.Offset(, 2).Value
                    Set c = .FindNext(c)
                    Loop While Not c Is Nothing And c.Address <> firstAddress
                End If
        End With
    End If
Next

Sheets.Add.Range("a1").Resize(j, 2) = resultarr

End Sub

I kept trying something similiar to that last night....I was just adding the .offset to the other side of value. Thank you!

I'm going to attempt to make this more complicated...what if it contains both positive and negatives values and you need the biggest number regardless of sign?