PDA

View Full Version : [SOLVED] 65536 Row Problem



parscon
04-04-2012, 10:33 AM
I have a Problem , Currently I have about 800000 Row

now i use this VBA code to copy data from column G to Column A

but just copy 65536 data . how can i copy all of them that mean all data on column G to Column A ?



With Sheets("Sheet1")
.Range(.Range("G1"), .Range("G65536").End(xlUp)).Copy
End With
Sheets("Sheet1").[A65536].End(xlUp)(1).PasteSpecial Paste:=xlValues

p45cal
04-04-2012, 10:39 AM
try:
With Sheets("Sheet1")
.Range(.Range("G1"), .Cells(.Rows.Count, "G").End(xlUp)).Copy
.Cells(.Rows.Count, "A").End(xlUp)(1).PasteSpecial Paste:=xlValues
End With

parscon
04-04-2012, 11:05 AM
it is done , Thank you So much .