こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

ExcelVBA "flag"が実行時エラーになる

お世話になります。

EXCEL VBAでボタンを押すと下記のmsgboxで"データを集計しますか?"というメッセージを出すロジックを作成しました。

私の環境(Win XP SP3 Excel2003、Excel2010も同居)では問題なく動作していますが、隣の人のPCの環境(同じくWin XP SP3 Excel2003)で動かすと、下記の"flag"の箇所で実行時エラーになってしまいます。

ここがエラーで黄色くなります

If MsgBox("データを集計しますか?", 292) = vbNo Then flag = True
If flag = True Then Exit Sub

両PCともにWindowsUpdateの最新パッチがあたっています。
念のためOffice2003を再インストールしましたがダメでした。

なぜでしょうか?
どなたか原因が分かる方がいらっしゃいましたらご教授願います。

投稿日時 - 2012-11-27 13:51:34

QNo.7818337

暇なときに回答ください

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

原因はわかりませんが・・

If MsgBox("データを集計しますか?", 292) = vbNo Then Exit Sub

だと問題あるんでしたか?
あとで(途中で)このflagを使っているとか。

投稿日時 - 2012-11-27 14:49:19

お礼

tsubuyakiさん、早速のご連絡ありがとうございます!

ご教授いただきました方法で問題ありませんでした(^^

ありがとうございました!

投稿日時 - 2012-11-27 15:30:49

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(2)

ANo.1

Dim flag As String
、みたいに、タイプが可笑しい、、、

投稿日時 - 2012-11-27 14:47:18

お礼

JazzCorpさん、早速のご連絡ありがとうございます!

flagがdimで変数宣言がされていませんでした。
これが原因かもしれません。
(なぜ私の環境でOKだったのかは分かりませんが)

本当に初歩的なことで申し訳ございませんでした!

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

投稿日時 - 2012-11-27 15:36:51

あなたにオススメの質問