EXCEL VBA フォームにメッセージ出力

質問

お世話になります。

1つ質問させていただきます。

フォームから日付を入力させてデータ集計するマクロがあります。

データ集計中はフォームの真ん中あたりに"データ集計中"と表示させて、データ集計が完了したら同じ場所に今度は"集計完了"と表示させるようなことは可能でしょうか？
プログレスバーなど凝った(?)モノではなく上記の様にメッセージ出力だけで結構です。

どなたかご教授いただけませんでしょうか？
よろしくお願い致します。

環境
Windows XP SP3
Excel2003

回答No.1

bon459 · ベストアンサー

フォームにラベルコントロールを1つ（仮にLabel_Statusとします。）用意しておいて、

UserForm_Initializeイベントで以下のように設定

Me.Label_Status.Caption = ""

集計処理の頭で以下のように設定

Me.Label_Status.Caption = "データ集計中"

集計処理の最後に以下のように設定

Me.Label_Status.Caption = "集計完了"

こんな感じでイメージどおりになりますか？
ラベルの書式はフォームのデザイン時のプロパティ設定で行えばよいと思います。

お礼

bon459さん、ご連絡ありがとうございました！

ご教授いただきました方法で実現できました！！
大変勉強になりました。

この度は本当にありがとうございました。