a double loop?

Hi,

I have a sheet and i want a macro to go down column A until it finds a name then go right until it finds the name of the column.

so on the sheet attached, it would go down a and find Test3 then go along till the column header was example 4 and return the figure 0.7323.

ive got it going down, and then going across but cant get it stop accordin to the column header:

Sub test()

Do

    If ActiveCell.Value = "test3" Then

Do
        ActiveCell.Offset(0, 1).Select
    
    Loop Until ActiveCell.Value = "example4"
        
    End If

    ActiveCell.Offset(1, 0).Select

    Loop Until IsEmpty(ActiveCell.Offset(0, 1))




End Sub