Need help in VBA code

Hello Everyone, 

I have written code for vlookup function and it works.

But one problem is that for  lookup_value and Column index number is always manually change.

what should i add code to make it more dynamic and get correct result ?

Please help..?

Here is a attached file..