Add new row by looping column (Scripting Dictionary)

[SamKhem]

Dear Senior member

I would like request you to guide coding vba with scripting dictionary to run loop in one column to create another row such
Loop column G is reference and F is amount to generate new column with add row in column L and M.

Thank in advance for your assist.
Best regards,

OLD						NEW
REFERENCE	AMOUNT					REFERENCE	AMOUNT
PL2308200035	-188.28					HD2308200035	188.28
						PL2308200035	-188.28
						REFERENCE	AMOUNT
AC2319900001	-100					AC2319900001	-100
PL2319900001	-0.02					HD2319900001	100
						PL2319900001	-0.02
						HD2319900001	0.02
						REFERENCE	AMOUNT
AC2319900009	120000					AC2319900009	120000
ACI2319900009	1787.8					HD2319900009	-120000
ACI2319900009	114.12					ACI2319900009	1787.8
						HD2319900009	-1787.8
						ACI2319900009	114.12
						HD2319900009	-114.12
						REFERENCE	AMOUNT
AC2319100027	-0.07					AC2319100027	-0.07
AC2319100027	0.07					PL2319100027	0.07
AC2319100027	100					AC2319100027	100
PL2319100027	0.07					HD2319100027	-100
						AC2319100027	0.07
						HD2319100027	-0.07
						REFERENCE	AMOUNT
AC2319100028	-0.76					AC2319100028	-0.76
PL2319100028	0.76					PL2319100028	0.76
AC2319100028	1000					HD2319100028	-1000
AC2319100028	0.83					AC2319100028	1000
PLF2319100028	0.05					HD2319100028	-0.83
						AC2319100028	0.83
						HD2319100028	-0.83
						PLF2319100028	0.05
						REFERENCE	AMOUNT
AC2319100029	10,000.00					HD2319100029	(10,000.00)
AC2319100029	23.64					AC2319100029	10,000.00
AC2319100029	(21.01)					HD2319100029	(23.64)
PL2319100029	21.01					AC2319100029	23.64
ACI2319100029	1.51					AC2319100029	(21.01)
PLF2319100029	0.01					PL2319100029	21.01
						HD2319100029	(1.51)
						ACI2319100029	1.51
						HD2319100029	(0.01)
						PLF2319100029	0.01

 

[Cubist]

Ok getting closer. Do the references always start with AC, ACI, PL, PLF followed by exactly 10-digit numbers?

 

[SamKhem]

Ok getting closer. Do the references always start with AC, ACI, PL, PLF followed by exactly 10-digit numbers?

Yes for sure.

 

[Cubist]

I'm signing off for tonight. I'll look closer tomorrow. Someone might give you a solution before then.

 

[SamKhem]

I'm signing off for tonight. I'll look closer tomorrow. Someone might give you a solution before then.

Could you hint me first try?

 

[SamKhem]

Could you help to check revised this

Condition AC.xlsx
	A	B	C	D	E	F	G	H
4	OLD						NEW
5	REFERENCE	AMOUNT					REFERENCE	AMOUNT
6	AC2308200035	-188.28					AC2308200035	188.28
7	AC2319900001	-100					AC2308200035	-188.28
8	AC2319900001	-0.02
9	AC2319900009	120000					REFERENCE	AMOUNT
10	AC2319900009	1787.8					AC2319900001	-100
11	AC2319900009	114.12					AC2319900001	100
12	AC2319100027	-0.07					AC2319900001	-0.02
13	AC2319100027	0.07					AC2319900001	0.02
14	AC2319100027	100
15	PL2319100027	0.07					REFERENCE	AMOUNT
16							AC2319900009	120000
17							AC2319900009	-120000
18							AC2319900009	1787.8
19							AC2319900009	-1787.8
20							AC2319900009	114.12
21							AC2319900009	-114.12
22
23							REFERENCE	AMOUNT
24							PL2319100027	-0.07
25							PL2319100027	0.07
26							AC2319100027	100
27							AC2319100027	-100
28							AC2319100027	0.07
29							AC2319100027	-0.07
Sheet1