• ベストアンサー

VBA　シートイベント

シートイベントについて教えて下さい。 A3〜A100まで計算式が入っています。 そのため、A3〜A100のセルにカーソルが動いた時に注意メッセージを表示しています。シートイベントで設定しています。 ファイル保存時、入力漏れチェックのプログラムも入れています。 入力漏れチェック実行時、自動的にA列に設定したシートイベントも実行され、メッセージボックスが表示されてしまいます。 入力漏れチェック時は、A列のシートイベントを実行不可にしたいです。 良い方法はありませんでしょうか。

質問者が選んだベストアンサー

  • ベストアンサー
  • kkkkkm
  • ベストアンサー率65% (1615/2454)
回答No.1

以下のようにしてみてください。 Application.EnableEvents = False 入力漏れチェックのコードでイベントを実行したくないところ Application.EnableEvents = True

himawari8181
質問者

お礼

ありがとうございます！！ 理解できました。 m(_ _)m

Powered by GRATICA
  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. Visual Basic

関連するQ&A

  • 【VBA】シートを跨いで合計する方法

    ご教示宜しくお願いします。 現在のシートから最後のシートまでの合計値が入っているセルを合計し、 メッセージボックスにて表示させたいです。メッセージボックスとする理由は、シートを増やしたくない為です。 状況は下記です。 各シートのA列最終行には予め「合計」の文言が有り、そのE列に予め「合計値」が計算されています。 宜しくお願い致します。

  • エクセルVBAで、

    あらかじめシート２のA列に食べ物の名前、B列にカロリーが記入してあり、 シート１のJ2にシート２に記入してある食べ物を入力すると、メッセージボックスで何カロリーあるのか表示されるプログラムが組みたいんですけど、 そう組んだらいいのかわからないので、教えてほしいです。

  • エクセルシートの保護

    エクセルのシートに保護をかけたいのですが、 シートの中に、チェックボックスがあります。 チェックボックスの「コントロールの書式設定」で 「ロック」のチェックをはずしても、 シートの保護をかけると、チェックボックスにも保護がかかってしまいます。 シートの保護をかける時、 「データー」のチェックをはずすと、 チェックボックスにもチェックが入れられるようになるのですが、 それでは、他のセルにも入力が可能になってしまいます。 つまり、シート全体に保護をかけたいし、 当然、チェックボックスの機能も使いたいのですが、 セルの書式設定にある保護と フォーム・コントロールの書式設定にある「ロック」「文字列のロック」を、 どのように組み合わせればよいのでしょうか？ そもそも、シート全体に保護をかけたいし、 チェックボックスの機能も使いたいのは、 可能なのでしょうか？

  • エクセル　マクロでsheet２に自動書き込み

    マクロで、グループボックス内でチェックボックスを作り、チェックされたらA列（A１～A１０まで）に表示するように作りました。入力ボタンを作り、Sheet２（A列～J列）へ移すようにしました。しかし、２つの項目しかチェックされていなかった場合、空白が目立ち記録を見るととても見づらいです。そこで、空白がある場合は前に詰めるような記述はあるのでしょうか？ （例）２つなら、Ｃ列とJ列に表示その他は、空白状態。→２つなら、A～B列に自動に詰める。 このようにしたいのですが、出来ますか？

  • エクセル2003　シート保護中のキー操作

    エクセル２００３を使用していますが、シートの保護時に、「ロックされたセル範囲の選択」のチェックをはずすと、キー操作でロックされていないセルの移動も制限されてしまいます。 現象を再現する設定としては、 １．新規ファイルにて、Ａ列・Ｂ列を選択し、書式設定で、保護タブのロックのチェックをはずす ２．ツールの「シートの保護」にて、「ロックされたセル範囲の選択」のチェックのみはずし、保護実行。 ３．Ａ１にカーソルを合わせ、タブキーや矢印キー、Enterを押すとＡ１、Ｂ１のみ移動して下のセルへは移動しない。 通常のようにＡ1→Ｂ1→Ａ2→Ｂ2→Ａ3・・・とキー操作で移動できるようには出来ますでしょうか？ なぜこのような現象が起こるのでしょうか？ 文字を入力していけば、入力した最終セルのひとつ下まではカーソルはいきますが、その下へは行きません。エクセルの設定でできなければ、ＶＢＡで同じ操作が出来ればと考えております。。 どなたか知っている方がいらっしゃれば、いただけませんでしょうか？

  • [エクセル2003]　VBA　シートの表示・非表示

    シート１にチェックボックス その他シート名＝1月～12月 とあり、チェックボックスにチェックを入れると今月の月のみのシートを表示させる方法（シート１はそのまま）。またチェックが外れると全月シート表示に切り替わる（シートの位置は変わらず）。 といった感じのことをやりたいのですが、書式のシート表示の設定は調べてわかったのですが、チェックボックスで切り替えがしたので分かる方よろしくお願いします。

  • VBAでシートからコンボボックスにデータを設定する方法

    VBAにてフォーム起動時にシート内に設定した 値をコンボボックスに取り込みたいのですが・・。 たとえばA列に連続で入力されているデータを 取り込むなど・・。 設定データ数は動的に変化します。

  • VBA シート上のチェックボックスの値の取得

    (作業環境　windowsXP Excel2007　作業対象のブックは.xls） シート上に１ブックにつき3000個ほどのチェックボックスがあります。 このブックが現在約1000個、すでに配布・回収されております。 これからチェックボックスの選択状況やセルに入力された値をマクロで収集するのです。 大半のチェックボックスにはすでに「リンクするセル」の設定がされており、そのセルの値を参照すればチェック状態の取得は容易なのですが、 最初にこのブックを作った方が一部のチェックボックス群（3000個中500個程度）にリンクの設定をするのを忘れていたのです。 このリンク設定のされていないチェックボックスの値の取得についてご質問です リンクセルの設定をするのであれば sub a() ActiveSheet.Shapes("Check Box 1").Select Selection.LinkedCell = "$A$1" ・ end sub でいいのでしょうが、これだとselectのはずみで チェックボックスがTrueになってしまします。 リンクせずに直接チェックボックスの値をブール型で取得しようと思い dim a as boolern a = Activesheet.checkboxes(1).value としましたが、ためしに別ブックのシート上に1つだけチェックボックスを作って実行すると、チェック状態にかかわらずTrueが返ります。 checkboxesの使い方がダメなんでしょうか？ 求める回答としては (1)上記のやり方でもできるが、間違っている部分がある (2)上記以外のやり方でもっと簡単な（早い）やりかたがある のどちらかのようなアドバイスをいただけると幸甚です。 よろしくおねがいします

  • チェックボックスに連動した他シートの参照

    以前も似たような質問をしたのですが、以下のようなことは可能でしょうか？ Ｓ１シートの該当のチェックボックスにチェックを入れるとその行のデータがＳ２シートに表示される。 下の例では、Ｂ、Ｄ列のデータがＳ２シートのＡ，Ｂ列に表示される。 [Ｓ１]｜　Ａ　｜　Ｂ　｜　Ｃ　｜　Ｄ　｜　Ｅ　｜ －　－　－　－－　－　－　－　－　－　－　－　－ 　１　｜　あ　｜　い　｜　う　｜　え　｜　□ ｜←チェックボックス１ －　－　－　－－　－　－　－　－　－　－　－　－ 　２　｜　お　｜　か　｜　き　｜　く　｜　□ ｜←チェックボックス２ －　－　－　－－　－　－　－　－　－　－　－　－ 　３　｜　け　｜　こ　｜　さ　｜　し　｜　□ ｜←チェックボックス３ －　－　－　－－　－　－　－　－　－　－　－　－ 　４　｜　す　｜　せ　｜　そ　｜　た　｜　□ ｜←チェックボックス４ －　－　－　－－　－　－　－　－　－　－　－　－ 【１】 ○チェックボックス１と３にチェック [Ｓ２]｜　Ａ　｜　Ｂ　｜　 －　－　－　－－　－　－ 　１　｜　い　｜　え　｜　 －　－　－　－－　－　－ 　２　｜　こ　｜　し　｜　 －　－　－　－－　－　－ 　３　｜　　　｜　　　｜　 －　－　－　－－　－　－ 　４　｜　　　｜　　　｜　 －　－　－　－－　－　－ 【２】 ○チェックボックス２と３と４にチェック [Ｓ２]｜　Ａ　｜　Ｂ　｜　 －　－　－　－　－　－ 　１　｜　か　｜　く　｜　 －　－　－　－　－　－ 　２　｜　こ　｜　し　｜　 －　－　－　－　－　－ 　３　｜　せ　｜　た　｜　 －　－　－　－　－　－ ○上記状態でチェックボックス３のチェックをはずす　 [Ｓ２]｜　Ａ　｜　Ｂ　｜　 －　－　－　－　－　－ 　１　｜　か　｜　く　｜　 －　－　－　－　－　－ 　２　｜　せ　｜　た　｜　 －　－　－　－　－　－

  • ＡｃｃｅｓｓのＶＢＡで「イベント」を捉える方法について

    フォームを作り、その上に２列×１５個のテキストボックスを配置しました。（２列１５行の「表」（ひょう）のような状態です。） 左列は入金関係、右列は出金関係金額を入力します。 一番下行のテキストボックス２つは各列の合計（入金合計・出金合計）を入れたいのです。 各列の、どれかのテキストボックスに値が入力されたら、即時にその列の合計を変えたいのです。 複数の（同種と仮定して）コントロールをグループ的にまとめて考えて、そのどれかにイベントが起こったことを捉える方法はあるのでしょうか。１４×２個のテキストボックスのChangeイベントを書けば良いとかを思い付くのですが鬱陶しいのと、ＶＢＡプログラムのレパートリーを広げたくて、どなたか（不可能という結論も含めて）、ご存知の方は教えてください。 ９８・Ａｃｃｅｓｓ９７・Ａｃｃｅｓｓ２０００です。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する