【Excel】【VBA】メッセージボックスを使用して複数のワークシートを選択し、別ファイルにコピーできるファイルダイアログボックスの実装例

Excel【VBA】

 以前作成した「【Excel】【VBA】メッセージボックスを使用してワークシートを選択できるファイルダイアログボックスの実装例」の改造版

 以前のサンプルは1シートを選択する形だったが、1ブックに複数シートがあり、その中から複数のシートを選択できるようにした。さらに選択したシートを別ブックにコピーさせる機能も追加。

「自作フォームは作成しないせず、メッセージボックスだけの勘弁なサンプルコードでシート選択を実現させる」が目的のため、今回も自作フォームは作らず、メッセージボックスだけで実現してみた。

やることが多くなったので、、、

① 一部の処理を関数化。

② シート選択状態を管理するため、簡単な構造体を定義

③ (対象シート数が不定なので)構造体の配列数は、動的配列で生成。

コメント

タイトルとURLをコピーしました