How to Find Cell, Copy contents in adjacent cells, then paste to new item

[wakaan808]

Essentially I have a list of items in column A that will occasionally need to be duplicated by adding an integer at the end. e.g.: Item, Item1, Item2,...
Within columns B:E there are formulas that reference columns I:L and the relative row they are contained in.

e.g: If Item is in row 30, B:L reads
B: =I30
C: =J30
D:=k30
E:=L30

Columns I:L reference a specific cell on a sheet named "Item"

e.g.:
I:=Item!A12
J:=Item!B12
K:=Item!C12
L:=Item!D12

When I run this macro, it should then create Item1 that will then read:

B: =I31
C: =J31
D:=k31
E:=L31

I:=Item1!A12
J:=Item1!B12
K:=Item1!C12
L:=Item1!D12

This would normally be a simply copy from reference cell 30 and offset paste below. However, duplicate items will be created above/below in alphabetical order which throws off the cell reference of row 30. Essentially I need to find or lookup the contents that contain the name "Item" within column A and paste those into the newly found name "Item1". While simultaneously changing the formula names with an increment.

The button called "New WD_CWC" is the macro I'm testing this with. It uses the Module called Mod_WD_CWC and the sub WD_CWC.

This section properly increments the items within column A every time the macro is run.

Please Login or Register  to view this content.

This section of the code is supposed to take care of the copy/paste aspect but the references are wrong, it doesn't increment, and it places the paste in a weird location the first time it is run.

Please Login or Register  to view this content.

I will also add I have an autosort sub contained within the sheet CABINETS every time an item is added within column A that might affect some things.