Hi I need to make a macro that does the following:

1. Looks up on the active workshet in a table (A4:I25) if value in column "I" equals to "3", if yes copies value in column "B" from the same row into another table in the same worksheet (let's say B130:B140),.

2. Do the same, but if value in column "I" equals to "1" and copy column "B" to B142:B152

I am fairly new with vba and macros so I have many difficulties with this, could you help me out?