Problem - I have around more than 8202 characters in once cell say Range(\"A1\").
Now I would like to copy the content of cell(A1) to cell(A2) usin
Change your code to
Sheets("XYZ").Range("A2") = Sheets("XYZ").Range("A1").Value
and it will work.
Not really sure why though, as .Value is the default property of a range.
.Value