Copying Defined Ranges

[APPPRO]

I have a large series of Defined Column Ranges and I am trying to Copy some to another Workbook.

Set CopyRange = .Range("Job_Number, Job_Status, Job_Month, Job_Year, Job_Date, Assignment_Number, Inv_Number, Inv_Status, Inv_Month, Inv_Year, Due_Date, ShopsDB_Agent, Shop_Date, Location, Shop_Fee, Bonus_Fee, Billed_Hours, Billed_Food, Billed_Product, Billed_Additional, Billed_Total, Paid_Date, Paid_Fee, Paid_Bonus, Paid_Hourly, Paid_food, Paid_Product, Paid_Additional, Paid_Total, BTF")

This gives me an error message of defined variable at the 'Due_Date' Range. BUT when I simply break it down into to 2 CopyRanges - as below - it works great.


Set CopyRange = .Range("Job_Number, Job_Status, Job_Month, Job_Year, Job_Date, Assignment_Number, Inv_Number, Inv_Status, Inv_Month, Inv_Year")
Set CopyRange2 = .Range("Due_Date, ShopsDB_Agent, Shop_Date, Location, Shop_Fee, Bonus_Fee, Billed_Hours, Billed_Food, Billed_Product, Billed_Additional, Billed_Total, Paid_Date, Paid_Fee, Paid_Bonus, Paid_Hourly, Paid_food, Paid_Product, Paid_Additional, Paid_Total, BTF")


Why does this happen???

andy