Excel VBA質問箱 IV

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

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


64463 / 76732 ←次へ | 前へ→

【16850】Re:オブジェクトを変数で扱う方法
回答  ichinose  - 04/8/11(水) 20:41 -

引用なし
パスワード
   ▼両津 さん:
こんばんは。

>はじめまして。いきなり質問させていただきます。
>commandbutton1,commandbutton2,commandbutton3があったとします。
下のコードを見ただけでははっきりとこのコマンドボタンがどこに
貼り付けられたコマンドボタンか判断が付きませんでした。
(ユーザーフォームに貼り付けたボタンか、シートに貼り付けたそれか・・)
これによって、記述が違ってきてしまいます。
次回からは、この辺の説明をお願いします。

ユーザーフォームのものだと思って・・・。


>
Dim xxx As Integer
For idx = 1 To 3
 Controls("commandbutton" & idx).Visible = False
 Next idx

Randomize
xxx = Int(Rnd() * 3)+1 'ここもちょっと違ってた!!
Controls("commandbutton" & xxx).Visible = True

シートに貼り付けてあるコマンドボタンの場合は、

ControlsをOleobjectsに変えてください。
但し、ControlsもOleobjectsもこのコードを記述するモジュールによっては
親オブジェクトの指定が必要ですよ。

1 hits

【16848】オブジェクトを変数で扱う方法 両津 04/8/11(水) 19:47 質問
【16850】Re:オブジェクトを変数で扱う方法 ichinose 04/8/11(水) 20:41 回答
【16855】Re:オブジェクトを変数で扱う方法 両津 04/8/12(木) 1:45 お礼
【19224】Re:オブジェクトを変数で扱う方法 みふぃー 04/10/25(月) 23:03 お礼

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