Macro Needed to extract data from one sheet to another

I will try and explain what I am looking for, as you can see from the Sample workbook I have 2 tabs Sheet1 & price.

I would like a macro that would look at Sheet1 A column, it would match the numbers in this column again the B column on the price sheet. If it found a match, it would then take the data from the G column on the price sheet and list it in the B column on sheet1

I hope I have explained this ok? I have highlighted what I need on the Sample sheet to make it easier to understand.

Many thanks in advance for your help