2008年10月13日

"処理中です"と表示したい


(作成例)
まずは、"処理中"という名前のシートを作ります。
作ったら、5行3列あたりに"処理中です"と入力して下さい。

次に、実行するマクロの先頭に下記の2行を追加して下さい。

Sheets("処理中").Select
Application.ScreenUpdating = False

最後に、実行するマクロの最後に下記の2行を追加して下さい。
(マクロ実行後に表示したいシートが"Sheet1"の場合)

Sheets("Sheet1").Select
Application.ScreenUpdating = True

これでマクロを実行すると、"処理中です"と表示され、
終了すると"Sheet1"が表示されます。

尚、今回の様にマクロ実行中の画面を固定する事で、
マクロの実行速度が向上します。
posted by ぷろぐらまー at 15:11| Comment(0) | TrackBack(0) | 日記 | このブログの読者になる | 更新情報をチェックする
Google
 

広告


この広告は60日以上更新がないブログに表示がされております。

以下のいずれかの方法で非表示にすることが可能です。

・記事の投稿、編集をおこなう
・マイブログの【設定】 > 【広告設定】 より、「60日間更新が無い場合」 の 「広告を表示しない」にチェックを入れて保存する。