VBA code (paste data based on some conditions)

Hi All,

I have an excel file (see attached) which is basically a bank statement. I would like to write a vba code such that data is pasted from columns (B to D) to columns (F to H) based on the following conditions:

1. If the amount in column B is equal to zero, then: 1) Value in Column F is equal to the value in column D AND 2) the value in column G is equal "The company" AND 3) the value is column H is equal to column C

1. If the amount in column B is greater than zero, then: 1) Value in Column F is equal to text "The company" AND 2) the value in column G is equal to column D AND 3) the value is column H is equal to column B.

The key here is that either the value of column C or column B in each row is always equal to zero (so the value of column B is 0 or greater than zero), so the logic above should work I just don't know how to write a vba code for this.

Can someone help me to write a vba code please?

Many thanks

Is the result in the image below as you expected ?
EXCEL_2020-07-06_06-07-24.png

If yes, do you really need to do it with vba ?
Because the result above is just using a formula in the rows of column F to H.

column F formula : =IF(B2=0,D2,"The Company")
column G formula : =IF(B2=0,"The Company",D2)
column H formula : =IF(B2=0,C2,B2)