10.13 ワークブック内で計算したとき ワークブック内にあるいずれかのワークシートの、どこかのセルで計算が行われたときに何かをしたいことはありませんか？例えば、計算結果が規定値をオーバーしていないかをチェックするとか…。 そんなときは、ワークシートのイベントWorkbook/SheetCalculateイベントへマクロを書いておけばOKです。 使用例 Workbook/SheetCalculateの使用例です。例では、どのワークシートにもセルA20に計算式が仕込んであるとします。そのようなときに、このセルの値（計算結果）が10000を越えたら警告メッセージを表示するようにしています。 ちなみに、引数のShが、ワークシートなど計算が発生した何者かを表すオブジェクトです。 Private Sub Workbook_SheetCalculate(ByVal Sh As Object)     On Error GoTo ExitProc:     Dim lngType As Long     Dim i As Long     'Excel 5.0ダイアログだと     'ここでエラーが出るんですけど…（汗）     'そのために、On Error…入れてます     lngType = Sh.Type     '他に、xlChart、xlExcel4MacroSheetなども判断できます     '計算が行われた何者かがワークシートのときは処理します     If lngType = xlWorksheet Then                'セルA20の計算結果が100を越えたら警告メッセージを出します        If CDbl(Sh.Range("A20").Value) > 10000 Then          MsgBox "越えました（汗）"        End If     End If ExitProc: End Sub 　※このエクセルマクロはワークブックのイベントへ書くマクロです

[PR]管理人が書いたVBAプログラミング本 ■最速攻略 Excel VBA サンプル大全集 ■苦手なコードもこれで安心!Excel VBA超入門講座 ■Excel VBAゲーム大作戦 はじめて編※ 実践編※ ◆ここが知りたかった! Access VBA 500の技※ （アマゾンへジャンプします。※は共著作品） エクセルマクロTips Applicationオブジェクト・イベント編 8.Applicationオブジェクト   8.1 画面の更新のON・OFF   8.2 警告メッセージのON・OFF   8.3 ファイル選択ダイアログを使う    ・複数のファイルを選択する場合の例も   8.4 ファイル保存ダイアログを使う   8.5 コピーや切り取りを解除する   8.6 エクセルウィンドウを最大化、最小化   8.7 エクセルウィンドウのサイズ変更    ・ウィンドウの縦位置、横位置、高さ、幅   8.8 数式バー、ステータスバー    ・ON、OFFの方法 9.ワークシートのイベント   9.1 ワークシートが選択されたとき   9.2 セルがダブルクリックされたとき   9.3 セルが右クリックされたとき   9.4 計算したとき   9.5 セルに入力後   9.6 別なワークシートが選択されたとき   9.7 セルが選択されたとき 10.ワークブックのイベント   10.1 ワークブックが選択されたとき   10.2 アドインのインストール時   10.3 アドインのアンインストール時   10.4 ワークブックを閉じる前   10.5 印刷する前   10.6 保存する前   10.7 別なワークブックが選択されたとき   10.8 新しいワークシートを追加したとき   10.9 ワークブックを開くとき   10.10 ワークシートが選択されたとき   10.11 ワークシートがダブルクリックされたとき   10.12 ワークシートが右クリックされたとき   10.13 ワークブック内で計算したとき   10.14 ワークシートが変更されたとき   10.15 別なワークシートが選択されたとき   10.16 セルが選択されたとき   10.17 ウィンドウがアクティブになったとき   10.18 別なウィンドウがアクティブになったとき   10.19 ウィンドウの大きさが変わったとき ■ブック・シート操作編 ■セル・行・列操作編 ■Applicationオブジェクト・イベント編 ■応用技・その他編 Happy! Happy! Islandその他のコンテンツ ■VBAプログラミング、その他 　Access VBAプログラミング＆Tips 　Excel VBA(エクセルマクロ)プログラミング＆Tips 　VBScript＆JScriptプログラミング＆Tips for WSH 　プログラミング基礎・入門 　HTMLの書き方 ■ダウンロードコーナー 　AccessとExcelのフリーソフト ■コミュニティー 　VBA質問掲示板 ■その他 　オレの話を聞けぇ♪（仮称／コラム） 　管理人プロフィール 　管理人へメール ■別館(海外向けサイト) 　SAMURAI Game Center - Freeware games for Microsoft ACCESS and EXCEL! VBAプログラミング＆Tips集の "Happy! Happy! Island"トップページへ [リンク]IT関連情報サイトなど gihyo.jp 技術評論社提供のIT関連コンテンツサイト [リンク]一番クリックした国が優勝 ClickClickClick.com クリッカー＆認証人募集！日本を1位にしよう！もちろん、おいらも参加中！各種情報の入手はClickJapanオフィシャルサイトで。 [PR]証券会社・投資運用関連サイト カブドットコム証券 逆指値・W指値等の自動売買でリスク管理追求型の投資が可能！引け後のIRやニュースを見てからでも間に合う夜間取引も魅力！ マネックス証券 オンライントレード・自動売買の最先端！「逆指値・ツイン指値」でリスクコントロール！デイトレードなら片道手数料無料！ Ｅ＊トレード証券 オンライン専業証券�ｂPの口座数！業界最低水準の手数料体系と充実のサービスラインナップ！ 楽天証券のマーケットスピード ネット証券最強のトレーディングツール「マーケットスピード」でプロ水準の投資環境がご自宅のパソコンに！ オンライン証券徹底比較 価格．ｃｏｍで証券徹底比較！手数料、取引商品、信用取引金利、逆指値などの注文方法や提供情報などを徹底比較！

Copyright(C) 1999-2006 結城圭介。 All rights reserved