Excel VBAでシートの内容をコピーすると、コピー元シートがおかしくなる

Question

前提・実現したいこと

Excel VBAでシートの内容を同じブックの別シートにコピーすると、コピー元のシートの20～1000行目の枠線が消えることがある。
原因はわかりますでしょうか。
コピー元のシートの値・書式設定・列幅・行幅をそのまま使用したいです。

該当のソースコード

'コピー先を一度クリア
Worksheets(”コピー先”).Cells.Clear
'コピー
Worksheets(”コピー元”).Cells.Copy
'貼り付け
Worksheets(”コピー先”).Range("A1").PasteSpecial Paste:=xlPasteAll ・・・①

①を実行すると、コピー元のシートの20～1000行目あたりの枠線が消えることがあります。
マクロではなく、手作業で全選択しコピーして張り付けを行った場合でも消えることがあります。

特定のシートにコピーして張り付けると発生します。
新しいシートを作成して手作業で貼り付けると、コピー元は問題ありませんでした。

Answer 1

新しいシートを作成して手作業で貼り付けると、コピー元は問題ありませんでした。

ってことは
「コピー先のシートに問題がある」

たとえば
clearでは全部はクリアしきれない（列幅とかはたぶんそのままだし、図形とかオブジェクトとか、フィルタやウィンドウ固定、アウトラインなんかの設定とか、フィルタとかで非表示にされているところはクリアされないです。最後のセルにジャンプするとシートの大きさはそのままだし…）

なんかいろいろ残っちゃってるものでコピー先シートが大きくなってしまっていて
コピー元シートの表示が追い付いてない（スクロールするとかなんとかすると表示が戻る）とか？

あるいは
クリップボード経由させないで
Worksheets(”コピー元”).Cells.Copy　Worksheets(”コピー先”).Cells(1,1)
ってやってみるとか……。

Answer 2

正直、原因は全く分かりません。
稀に生じるExcel自体のバグではないでしょうか。

なので、迂回策をいくつか。

全コピーであれば、シートごとコピーではどうでしょうか？

書式のコピペで、書式（罫線）が貼り付けられないのでしょうか？
（罫線だけが移らず、表示形式・色・フォント等の他の書式はコピペされているのでしょうか？）