DoEvents関数
DoEvents関数は、発生したイベントがOSによって処理されるように、プログラムで占有していた制御をOSに渡します。
DoEvents
DoEvents 関数は 0 を返します。
DoEvents 関数は、オペレーティング システムに制御を渡します。オペレーティング システムがキュー (処理の待ち行列) に入っているイベントの処理を終了し、SendKeys ステートメントのキューに入っているすべてのキー入力が送られるまで制御は戻りません。
DoEvents 関数は、ファイルの検索などで処理が開始された後で、ユーザーがキャンセルできるようにするときに役立ちます。
処理の実行が長い場合、処理プログラムで行う方が、タイマーを使ったり、ActiveX コンポーネントにタスクを渡すよりよい方法です。
後の場合、アプリケーションから独立させてタスクを続行できます。 そしてオペレーティング システムでは、マルチタスクと時間分割を利用します。
注意
イベント プロシージャから一時的な処理が発生するときは、最初に呼び出した処理から制御が戻ってくるまでは、プロシージャがプログラムの別の場所で実行されることがないように注意する必要があります。
別の場所で実行された場合、結果は予測できません。
また、制御をオペレーティング システムに渡している間、他のアプリケーションが、確認できない方法でプロシージャとやり取りを行う可能性があるときは、DoEvents 関数は使わないでください。
処理の実行が長い場合、処理プログラムで行う方が、タイマーを使ったり、ActiveX コンポーネントにタスクを渡すよりよい方法です。
後の場合、アプリケーションから独立させてタスクを続行できます。 そしてオペレーティング システムでは、マルチタスクと時間分割を利用します。
イベント プロシージャから一時的な処理が発生するときは、最初に呼び出した処理から制御が戻ってくるまでは、プロシージャがプログラムの別の場所で実行されることがないように注意する必要があります。
別の場所で実行された場合、結果は予測できません。
また、制御をオペレーティング システムに渡している間、他のアプリケーションが、確認できない方法でプロシージャとやり取りを行う可能性があるときは、DoEvents 関数は使わないでください。
使用例．
Dim i As Long
For i = 1 To 10000
Application.StatusBar = i
DoEvents
Next
Application.StatusBar = False
ステータスバーへの表示をする場合は、
このようにDoEventsを入れる事で、表示がスムーズに行われます。
For i = 1 To 10000
Application.StatusBar = i
DoEvents
Next
Application.StatusBar = False
ステータスバーへの表示をする場合は、
このようにDoEventsを入れる事で、表示がスムーズに行われます。
VBA関数の一覧と解説です、どんな関数があるかは一度は確認しておくとをお勧めいたします。どんな関数があるだけでも知っておけば、詳細の使い方は実際に使うときに調べても良いでしょう。文字列操作…34 分岐…3 型変換…14 データ判定…10 日付時刻…20 配列…6 ファイル操作…14 数学/財務…28 その他…18 MicrosoftDocsOfficeV…
同じテーマ「VBA関数」の記事
Int関数は、指定した数値の整数部分を返します。Int関数 Int(number) number 指定します。倍精度浮動小数点数型(Double)の数値または任意の有効な数式を指定します。Null値が含まれている場合は、Null値を返します。
Oct関数Oct関数は、引数に指定した値を8進数で表すバリアント型(内部処理形式StringのVariant)の値を返します。Oct関数 Oct(number) number 任意の数式または文字列式を指定します。この引数は必ず指定します。
Rnd関数Rnd関数は、単精度浮動小数点数型(Single)の乱数を返します。Rnd関数 Rnd[(number)] number は省略可能です。引数numberには、単精度浮動小数点数型(Single)の数値または任意の有効な数式を指定します。
Round関数Round関数は、指定された小数点位置で丸めた数値を返します。Round関数 Round(expression[,numdecimalplaces]) expression 必ず指定します。丸めを行う数式を指定します。
CreateObject関数CreateObject関数は、ActiveXオブジェクトへの参照を作成して返します。CreateObject関数を使う事で、参照設定することなくActiveXオブジェクトを使用できるようになります。CreateObject関数の構文 CreateObject(class,[servername]) class 必ず指定します。
DoEvents関数GetObject関数
ActiveXコンポーネントから提供されたオブジェクトの参照を返します。ファイルパス（フルパスと名前）からオブジェクトの参照を作成したり、既に起動中のオブジェクトを取得する際に使用します。GetObject関数の構文 GetObject([pathname],[class]) pathname 省略可能。
InputBox関数InputBox関数は、ダイアログボックスにメッセージとテキストボックスを表示し、文字列が入力されるか、またはボタンがクリックされると、テキストボックスの内容を返します。InputBox関数 InputBox(prompt[,title][,default][,xpos][,ypos] [,helpfile,
MsgBox関数MsgBox関数は、ダイアログボックスにメッセージを表示し、ボタンがクリックされるのを待って、どのボタンがクリックされたのかを示す値を返します。MsgBox関数 MsgBox(prompt[,buttons][,title][,helpfile, context]) 名前付き引数です。
RGB関数RGB関数は、引数（red,green,blue）の色のRGB値を表す長整数型(Long)の値を返します。RGB関数 RGB(red,green,blue) red 必ず指定します。この名前付き引数は、バリアント型(内部処理形式IntegerのVariant)のデータ形式で指定します。
Shell関数Shell関数は、実行可能プログラムを実行し、実行が完了するとプログラムのタスクIDを示すバリアント型の値を返します、プログラムの実行に問題が発生した場合は、0を返します。Shell関数 Shell(pathname[,windowstyle]) 使用例． Shell"notepad.exe"&ThisWorkbook.Pat…
新着記事NEW ・・・新着記事一覧を見る
ツイッターで出されたVBAのお題をやってみた｜エクセル雑感（1月13日）
イベントプロシージャーの共通化（Enter,Exit）｜ユーザーフォーム入門（1月13日）
Rangeオブジェクトの論理演算（差集合と排他的論理和）｜VBA技術解説（1月10日）
イベントプロシージャーの共通化｜ユーザーフォーム入門（1月7日）
コントロールの動的作成｜ユーザーフォーム入門（1月6日）
Evaluateメソッド（文字列の数式を実行します）｜VBA技術解説（1月5日）
エクスポート（PDF/XPS）｜VBA入門（1月2日）
分析関数（OVER句,WINDOW句）｜SQL入門（12月25日）
取得行数を限定するLIMIT句｜SQL入門（12月21日）
外部ライブラリ（ActiveXオブジェクト）｜VBA入門（12月21日）
アクセスランキング ・・・ ランキング一覧を見る
1.最終行の取得（End,Rows.Count）｜VBA入門
2.RangeとCellsの使い方｜VBA入門
3.セルのコピー&値の貼り付け（PasteSpecial）｜VBA入門
4.Range以外の指定方法（Cells,Rows,Columns）｜VBA入門
5.変数宣言のDimとデータ型｜VBA入門
6.繰り返し処理（For Next)｜VBA入門
7.マクロって何？VBAって何？｜VBA入門
8.セルに文字を入れるとは（Range,Value）｜VBA入門
9.空白セルを正しく判定する方法（IsEmpty,IsError,HasFormula）｜VBA技術解説
10.ひらがな⇔カタカナの変換｜エクセル基本操作
このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。