>>578
当方の環境下では
Cells(1, 2) = Cells(1, 1)
だと 半角256文字以上で#VALUE! になるね

Cells(1, 2).Value = Cells(1, 1).Value
だと大丈夫みたい なぜかしらんけど

つか.Valueを付けるのが本来の使い方なんだけどね