Excel VBA質問箱 IV

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

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


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

【53227】フォームの作成 リボン 07/12/21(金) 18:13 質問[未読]
【53228】Re:フォームの作成 neptune 07/12/21(金) 21:00 発言[未読]
【53229】Re:フォームの作成 リボン 07/12/21(金) 21:42 発言[未読]
【53230】Re:フォームの作成 neptune 07/12/21(金) 22:22 回答[未読]

【53227】フォームの作成
質問  リボン  - 07/12/21(金) 18:13 -

引用なし
パスワード
   エクセル2003です
ウインドウズXPです
--------------------------------------------------------------
Form1                  Worksheets

□CheckBox1 □CheckBox2 □CheckBox3    A  B  C

Label1 Label6              1 あ さ CheckBox1
Label2 Label7              2 い し CheckBox1
Label3 Label8              3 う す CheckBox2
Label4 Label9              4 え せ CheckBox2
Label5 Label10              5 お そ CheckBox1
                     6 か た CheckBox1
                     7 き ち CheckBox2
                     8 く つ CheckBox2
                     9 け て CheckBox1
                     10 こ と CheckBox3
--------------------------------------------------------------
 こんな感じになっているんですが、例えばCheckBox1をチェックした時
 ラベルの内容をワークシートから参照してに下みたいな感じにしたいん
 ですけど・・・ 教えてください><


--------------------------------------------------------------
Form1                  Worksheets

■CheckBox1 □CheckBox2 □CheckBox3    A  B  C

Label1 あ Label6 さ          1 あ さ CheckBox1
Label2 い Label7 し          2 い し CheckBox1
Label3 お Label8 そ          3 う す CheckBox2
Label4 か Label9 た          4 え せ CheckBox2
Label5 け Label10 て          5 お そ CheckBox1
                     6 か た CheckBox1
                     7 き ち CheckBox2
                     8 く つ CheckBox2
                     9 け て CheckBox1
                     10 こ と CheckBox3
--------------------------------------------------------------

【53228】Re:フォームの作成
発言  neptune  - 07/12/21(金) 21:00 -

引用なし
パスワード
   ▼リボン さん:
こんにちは

> こんな感じになっているんですが、例えばCheckBox1をチェックした時
> ラベルの内容をワークシートから参照してに下みたいな感じにしたいん
> ですけど・・・ 教えてください><
コントロールの配置なんかはわかりましたけど、何が解らないか
書いてないので、解りませんよ。
 いろんな要素が絡んできますからねぇ。

【53229】Re:フォームの作成
発言  リボン  - 07/12/21(金) 21:42 -

引用なし
パスワード
   neptune さん こんばんは
そうですよね・・ごめんなさい
えーとですねチェックボックスにチェックがついたときにラベルにシートの内容がでるようにしたいんです!!

【53230】Re:フォームの作成
回答  neptune  - 07/12/21(金) 22:22 -

引用なし
パスワード
   ▼リボン さん:
こんにちは

>えーとですねチェックボックスにチェックがついたときにラベルにシートの内容がでるようにしたいんです!!
これでも、
・チェックボックスのチェックの判断
・↑をどのタイミングでするか
・セルのデータの取得の仕方
・ラベルへの表示の仕方
等などの要素があるんですよね。。。。

いつもはズバリは書かないようにしてるんですが、他に書き様が無いので。。。
殆どそのまんまです。

こんな感じで。
Private Sub CheckBox1_Click()
  If Me.CheckBox1.Value = True Then Me.Label1.Caption = Worksheets("Sheet1").Range("A1").Text
End Sub

こういうのをCheckBox毎に書くのが簡単かと思います。

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