Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


52961 / 76732 ←次へ | 前へ→

【28596】Re:引数の使い方
発言  Jaka  - 05/9/9(金) 17:09 -

引用なし
パスワード
   Public P1 As Long, P2 As Long
'どの標準モジュールに書いてもかまいませんが、全モジュール通して1個だけ。

Private Sub main()
aaaaa
bbbbb
ccccc
End Sub

'下の Private Sub は、上と同モジュールに書いてください。
'他モジュールに書きたいのなら、Private を取ってください。
Private Sub aaaaa()
  P1 = 1
  P2 = 10
End Sub

Private Sub bbbbb()
  P1 = P1 + P1
  P2 = P2 + P2
End Sub

Private Sub ccccc()
  MsgBox P1
  MsgBox P2
End Sub

'--------------------------
Sub 最後に単体で実行してみる() '他モジュールでもかまいません。
  MsgBox P1        'しつこく保持しているのが解る?
  MsgBox P2
End Sub

グローバル変数は、意外としつこく保持しているみたいですが、
いつ何時、内容が失われるか解りません。
前にテストした時に5時間後ぐらいに「最後に単体で実行してみる」を実行してみたら、まだ保持していた。
その間、エクセルやそのブックは閉じませんでしたが、インターネット、同エクセル内の他ブックにてVBA回答用のテストなどをしていたにもかかわらず。
エクセルVarによっても違うでしょうが、過信は出来ません。by97
変数が内容を保持しているとおもって、時間がたってから変数の内容を当てにして、単体で実行するコードを書くのは、止めた方が良いです。(意味が通じるかなぁ?)

1度覗いてみてください。
http://www.vbalab.net/vbaqa/c-board.cgi?cmd=ntr;tree=7011;id=excel

1 hits

【28571】引数の使い方 さくらんぼ 05/9/9(金) 13:02 質問
【28572】Re:引数の使い方 ちくたく 05/9/9(金) 13:08 回答
【28573】Re:引数の使い方 さくらんぼ 05/9/9(金) 13:32 質問
【28591】Re:引数の使い方 ちくたく 05/9/9(金) 16:25 発言
【28574】Re:引数の使い方 Jaka 05/9/9(金) 13:38 回答
【28590】Re:引数の使い方 さくらんぼ 05/9/9(金) 16:11 質問
【28596】Re:引数の使い方 Jaka 05/9/9(金) 17:09 発言
【28667】Re:引数の使い方 さくらんぼ 05/9/12(月) 16:07 質問
【28673】Re:引数の使い方 Jaka 05/9/12(月) 16:50 発言
【28674】Re:引数の使い方 小僧 05/9/12(月) 16:52 発言
【28680】Re:引数の使い方 でれすけ 05/9/12(月) 20:43 発言
【28764】Re:引数の使い方 さくらんぼ 05/9/14(水) 10:07 お礼
【28808】Re:引数の使い方 ichinose 05/9/15(木) 9:03 発言
【28809】Re:引数の使い方 さくらんぼ 05/9/15(木) 9:18 お礼
【28670】Re:引数の使い方 小僧 05/9/12(月) 16:41 発言
【28594】Re:引数の使い方 でれすけ 05/9/9(金) 17:04 回答
【28665】Re:引数の使い方 さくらんぼ 05/9/12(月) 15:46 お礼

52961 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free