Excel VBA質問箱 IV

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

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


2649 / 13645 ツリー ←次へ | 前へ→

【66720】Publicで変数を切ればよいと思ったのですが すいか 10/9/30(木) 13:20 質問[未読]
【66721】Re:Publicで変数を切ればよいと思ったので... Jaka 10/9/30(木) 13:38 発言[未読]
【66723】Re:Publicで変数を切ればよいと思ったので... すいか 10/9/30(木) 14:32 お礼[未読]
【66722】Re:Publicで変数を切ればよいと思ったので... neptune 10/9/30(木) 14:30 発言[未読]
【66724】Re:Publicで変数を切ればよいと思ったので... すいか 10/9/30(木) 15:03 お礼[未読]

【66720】Publicで変数を切ればよいと思ったのです...
質問  すいか  - 10/9/30(木) 13:20 -

引用なし
パスワード
   出てくるボタンは、すべて Sheets("なになに").Select で指定シートに飛んでいきます。
シート1.にはボタンが2つ作られています。
シート1.で、どのボタンをクリックしたかで、シート3.でボタンを押したときに
飛んでいくシートをシート4.か5.に振り分けたいです。

シート1.で
Public selectB As String

Private Sub CommandButton1_Click()
  selectB = "A"
  Sheets("シート3.").Select
End Sub

Private Sub CommandButton2_Click()
  selectB = "B"
  Sheets("シート3.").Select
End Sub
と作りました。

シート3.で
Private Sub CommandButton1_Click()
  If selectB = "A" Then
    Sheets("シート4.").Select
  Else
    Sheets("シート5.").Select
  End If
End Sub
と作りました。

でも、selectBに"A"が保持されずシート5.に飛んでしまいます。

Publicで変数を切れば、どのシートのマクロからも参照できるのでは
ないのでしょうか。
ものすごく基本的な質問で申し訳ありませんが、ヘルプを見ても
あってるかんじがしてわかりません。
どうぞ宜しくお願い致します。

【66721】Re:Publicで変数を切ればよいと思ったの...
発言  Jaka  - 10/9/30(木) 13:38 -

引用なし
パスワード
   >Public selectB As String

これは標準モジュールに書きます。

【66722】Re:Publicで変数を切ればよいと思ったの...
発言  neptune  - 10/9/30(木) 14:30 -

引用なし
パスワード
   ▼すいか さん:
回答は既出なので何処を読めば良いかを書いときます。

Helpの目次から
visual basic プログラミングのヒント
 -適用範囲と参照可能範囲の概要
を読めば書いてます。

#非常に大事なので一番上から順番に最後まで読んで下さい。
最後のほうですが書いてます。

【66723】Re:Publicで変数を切ればよいと思ったの...
お礼  すいか  - 10/9/30(木) 14:32 -

引用なし
パスワード
   ▼Jaka さん:

本当だ!!
ありがとうございます。

ヘルプに「標準モジュールで」という記載がなさそうですが、
そういう細かいこと、いちいち暗記しておかなければ
ならないんでしょうか。。。

【66724】Re:Publicで変数を切ればよいと思ったの...
お礼  すいか  - 10/9/30(木) 15:03 -

引用なし
パスワード
   ▼neptune さん:

ありがとうございます。
じっくり読んでみます!

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