PageBreak プロパティを設定できません。（AccessVBAでエクセルをコピーするときに、出た）エラーの解消法

解消策としては
・一旦［標準］ビューで処理し、最後に［改ページプレビュー］設定する。
・ws_sheet2をActiveにして実行する。
・’* 改ページの挿入の直前に DoEvents を挿入する。
・Application.ScreenUpdating = False で実行する。
いずれでも解消するようです。

私は、コピー元のエクセルファイルを、改ページプレビューにしていたので、
標準ビューに戻したら、解決しました。

以下余談、ちょっと気になったこと。

ws_sheet3.Range(“1:10”).Copy
ws_sheet2.Range(“1:10”).PasteSpecial Paste:=xlPasteAll
xlPasteAllなら
ws_sheet3.Range(“1:10”).Copy ws_sheet2.Range(“1:10”)
でもいいかな、という点と
‘* sheet2 をクリア
なら
ws_sheet2.Cells(1, 1).Resize(9, 4).ClearContents
のほうがいいかな、という点です。