Thanks for replying, doesn't the selections in red cover that.
Also I have added an option, to the right click event for the table, to run the macro.
It does all do what I need but keeps coming back with - Code execution has been interrupted. after pressing continue it completes correctly, in VBA it errors after the first paste line, hitting F5 to continue works ok too. I have removed all worksheet events to see if they were causing it, but still fails.
- the name of the sheet the Worksheet_Change event would be used on
Sheets("Customer")
- the column or range of cells the Worksheet_Change event would be restricted to
With Sheets("Customer").Range("H4:H5000")
- the location (ie: starting column) where Sheets("Customer").Range("I" & t & ":L" & t) would be copied to
Sheets("Customer").Range("I" & t & ":L" & t).Copy
Range("I" & ttt).PasteSpecial Paste:=xlPasteValues
- the location (ie: starting column) where Sheets("Customer").Range("Y" & t & ":AH" & t) would be copied to
Sheets("Customer").Range("Y" & ttt).Select
Range("Y" & ttt).PasteSpecial Paste:=xlPasteValues
|