Is it possible to get 2 Column DropDownList for selection but populate in seperate columns

you can use a small loop to find it in this case I will be the column where it found the header. and it is only searching the first 50 columns, you can set that to what ever number works for you.

Dim found As Boolean
found = False
i = 1
Do Until i > 50 Or found = True
    If Range(Cells(1, i).Address).Value = "SERACH FOR THIS" Then
        found = True
    Else
        i = i + 1
    End If
Loop