Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
4989 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【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です
--------------------------------------------------------------
Form１　　　　　　　　　　　　　　　　　　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をチェックした時
　ラベルの内容をワークシートから参照してに下みたいな感じにしたいん
　ですけど・・・　教えてください＞＜


--------------------------------------------------------------
Form１　　　　　　　　　　　　　　　　　　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毎に書くのが簡単かと思います。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
4989 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free