Sheets.Copy Range

[cameron.scrimgeour]

Using the following code to copy 2 worksheets to a new workbook..

Sheets(Array("Sheet1", "Sheet2")).Copy
ActiveWorkbook.SaveAs Filename:="NewBook"
ActiveWorkbook.Close

There are fields in Sheet 1 with more than 255 characters in them. So when the sheet is copied, it cuts anything over the 255 characters out.

I have read that if I copy the cell range in Sheet1, this will stop the problem.

What would the code by to copy cells A1 - A28 from Sheet1?

 

[darbid]

What would the code by to copy cells A1 - A28 from Sheet1?

I cannot tell you the answer but I am pretty sure that if you open the worksheet and record a macro while doing the copy you are going to get a pretty good start on how to do it.