parscon
02-14-2014, 11:39 AM
I have this VBA code that will copy all data on "DATA" Column A and paste them on column A on "Sheet1"
Now i want to remove the limitation 65536 , could you please help me .
With Sheets("DATA")
.Range(.Range("A1"), .Range("A65536").End(xlUp)).Copy
End With
Sheets("Sheet1").[A65536].End(xlUp)(1).PasteSpecial Paste:=xlValues
Also i need it for column B and .....
With Sheets("DATA")
.Range(.Range("B1"), .Range("B65536").End(xlUp)).Copy
End With
Sheets("Sheet1").[B65536].End(xlUp)(1).PasteSpecial Paste:=xlValues
Thank you very much .
Now i want to remove the limitation 65536 , could you please help me .
With Sheets("DATA")
.Range(.Range("A1"), .Range("A65536").End(xlUp)).Copy
End With
Sheets("Sheet1").[A65536].End(xlUp)(1).PasteSpecial Paste:=xlValues
Also i need it for column B and .....
With Sheets("DATA")
.Range(.Range("B1"), .Range("B65536").End(xlUp)).Copy
End With
Sheets("Sheet1").[B65536].End(xlUp)(1).PasteSpecial Paste:=xlValues
Thank you very much .