RWayneH
asked on
Simple Procedure Edit
The following code, selects the next 500 lines and runs the code.
How do you chg this so it would work on whatever cells are pre-selected? Need to chg Ln3 and Ln11
Please advise and thanks.
Sub MakeSIF_FromNext500Rows()
'
Range(ActiveCell, ActiveCell.Offset(499, 0)).Copy
Sheets("Order Line Items").Select
Range("H2").Select
ActiveSheet.Paste
Application.Run "CU50BySalesOrder.xlsm!insert_mktg_prog"
Sheets("Order Line Items").Select
Call ClearResetSIFSheet
Sheets("MasterCopy").Select
ActiveCell.Offset(500, 0).Select
End Sub
How do you chg this so it would work on whatever cells are pre-selected? Need to chg Ln3 and Ln11
Please advise and thanks.
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER
Thanks for the help. I cannot believe I did not figure that out...
Open in new window
-Glenn