はじめに
Excel VBAで処理を自動化していると、「セルをコピー → 別のファイルに貼り付け → 元ファイルを閉じる」という流れを実装したい場面があります。
私もまさにその処理を組もうとしていたところ、「コピー元のファイルを閉じる」処理でエラーが発生しました。
調べてみたところ、原因はコピー操作の後に「切り取り（コピー）モード」が残ったままになっていたことでした。
今回はその切り取りモードの解除方法についてまとめます。
エラーの原因：コピー状態が解除されていない
VBAでコピー後にファイルを閉じようとしたときにエラーが発生する主な原因は、CutCopyModeが解除されていないことです。
Excelはコピー状態のままではファイルを閉じられないため、明示的にコピー状態を解除する必要があります。
解決方法：Application.CutCopyMode = True を使う
コピー状態を解除するには、以下の一文を加えるだけでOKです。
Application.CutCopyMode = True
または、コピー状態を完全に解除したい場合は、Falseでも構いません（どちらでも動作上の違いはありません）。
実際の処理例
以下は、「book1.xlsxというExcelファイルのA1セルの値を、VBAが書かれているブックのA1セルに貼り付けて、book1.xlsxを閉じる」という一連の処理です。
Workbooks("book1.xlsx").Activate
Range("A1").Copy
ThisWorkbook.Activate
Worksheets("Sheet1").Cells(1, 1).PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = True
Workbooks("book1.xlsx").Activate
Workbooks("book1.xlsx").Close
コードの説明
- 1行目：コピー元のファイル（
book1.xlsx）をアクティブにします - 2行目：A1セルをコピーします
- 3〜4行目：VBAがあるブックをアクティブにし、
Sheet1のA1セルに値を貼り付けます（値のみ） - 5行目：コピー状態を解除します（ここがポイント）
- 6〜7行目：元のファイルをアクティブに戻し、閉じる処理を実行します
注意点
Application.CutCopyMode = Falseでも動作は同じですが、明示的にTrueとして解除することも可能です- 貼り付けに
PasteSpecialを使う場合、貼り付ける直前にコピー状態を維持する必要があります CutCopyModeを解除しないままファイルを閉じようとすると、「操作を完了できません」や「ファイルを閉じられません」といったエラーになります
まとめ
VBAでコピー後にファイルを閉じる際は、Application.CutCopyModeでコピー状態を解除することが必須です。
一文加えるだけで、エラーを防ぎ、スムーズな自動処理が実現できます。
同じような処理を組もうとしている方の参考になれば幸いです。
副業から独立まで「稼げる」Webスキルを習得する（PR）
ここまで読んでいただきありがとうございます。 最後に宣伝をさせてください。
「副業を始めたいが、何から手をつければいいかわからない」「独学でスキルはついたが、収益化できていない」という悩みを持つ方には、マンツーマン指導のWebスクール**「メイカラ」**が適しています。
このスクールは、単に技術を教えるだけでなく、**「副業として具体的にどう稼ぐか」**という実務直結のノウハウ提供に特化している点が特徴です。
講師陣は、実際に「副業Webライターから1年で独立して月収100万円」を達成したプロや、現役で利益を出し続けているブロガーなど、確かな実績を持つプレイヤーのみで構成されています。そのため、机上の空論ではない、現場で通用する戦術を学ぶことができます。
副業に特化した強み
- 最短ルートの提示: 未経験からでも実績を出せるよう、マンツーマンで指導。
- AI活用の習得: 副業の時間対効果を最大化するための、正しいAI活用スキルも網羅。
- 案件獲得のチャンス: 運営がWebマーケティング会社であるため、実力次第で社内案件の紹介など、仕事に直結する可能性があります。
受講者の多くは、「在宅でできる仕事を探している」「副業を頑張りたい」という20代・30代・40代が中心です。
受講前には、講師による無料説明が行われます。無理な勧誘はなく、自分に合った副業スタイルやプランを相談できるため、まずは話を聞いてみることから始めてみてはいかがでしょうか。
