Search for Value then copy a value to the right

[k03074]

Hello,

I need to make a Macro in VBA to search for a string value +++ in a worksheet if found then find a value cell to the right then copy that value below.

So when looking at the example below: in Column A there is a string value +++ (in red) once that is found then I need to see what value is in blue (2,264) then I need to copy that value to the cell of ?????? marks.

I would use a record macro for this project but the locations of these +++ would change cells location in the file.

Thanks in advance.
Gerald

A1015	NCS		F8AB5420471AA	AR004366	5,014
A1113	AP04A	74	C8TA1131A	AR002402	5,767
A1118	AP04A	74	XL3E6A373AA	AR001379	2,264
A1118	AP10A	PD	XL3E6A373AA	AR000315	2,264
A1118	M6L4B		XL3E6A373AA	AR004371	2,264
+++
A1118					????????
A1140	AP10A	OW	7C341131AA	AR001735	3,185
A1153	AP05A	GY	4L3415044H29AB	AR001028	5,008
A1153	AP06A	BT	4L3415044H29AB	AR000861	5,008
A1153	AP10A	B1	4L3415044H29AB	AR002585	5,008
+++
A1153

<TBODY>
</TBODY>