putting a function into VB code

I have looked at other boards but I cannot seem to figure out how to put a function into VB code and have it work correctly

I am trying to put this formula into VB:
=INDEX('Data'!$G:$G,MATCH($C$6,'Data'!$C:$C,0)+4)

Following some other pages I have tried to use this:

test = Application.WorksheetFunction.Index(Sheets("Data").Range("C:C"), Application.WorksheetFunction.Match(1, Sheets("Data").Range("G:G"), 0), 4)

Thanks in advanced for your help