Each...Nextですべてのエクセルファイルを1つずつ処理していきます。この時、Closeメソッドでファイルを閉じるだけでは確認メッセージが表示されるので、Application.DisplayAlertsにFalseを設定して、メッセージ表示を非表示にします。IfNext解説VBAが記述されているエクセルファイル自体が途中で閉じられると、そこで処理が終了してしまいます。そのため、8行目のIf文で対象ファイルを判定し、VBAが記述されているエクセル以外を1つずつ閉じています。Falseとしています。Trueとしメッセージが表示されるように戻しています。これは、他の警告メッセージまで表示されなくなると困るからです。POINT「せっかく処理をしたのに、保存しないで閉じる?」と思うかもしれませんが、エラーが発生しファイルが中途半端な状態になった時、エラー処理ではファイルを保存しないで閉じます。「えくとしょ」を作ってる人フリーランスのシステムエンジニア。VBAやVB.NETなどVB系の言語で、業務システムの開発をしています。職業訓練校で、エクセルVBAの講師などもしています。「えくとしょ」を作ってる人フリーランスのシステムエンジニア。VBAやVB.NETなどVB系の言語で、業務システムの開発をしています。職業訓練校で、エクセルVBAの講師などもしています。自動化ツール・便利プログラム集タイトルとURLをコピーしました。