[[20080828140720]]　『チェックボックスをオンでほかのチェックボックス』（たこ）　ページの最後に飛ぶ

『チェックボックスをオンでほかのチェックボックスを表示させる』（たこ）

お世話さまでございます。いろいろ参考にさせていただいています。過去ログをみましたがいまいちよくわからなかったので質問させていただきます。

チェックボックスにチェックをいれると、ほかのチェックボックスを表示させ、
チェックをしなければ非表示の状態にしたいとおもいます。

ＶＢＥとかになるんでしょうか？？？

 > ＶＢＥとかになるんでしょうか？？？ 
 そうなると思います。
 (ROUGE)

フォームのチェックボックスを使用しています。
どなたかご教示いただければ幸いです。（たこ）

 VBE  =  Visual Basic Editor
 VBA  =  Visual Basic for Applications
　
（純丸）(o^-')b　※念のため

 ほかのチェックボックスの名前が「Check Box 2」だとした場合、下記のコードを標準モジュールに貼り付け、
元のチェックボックスにマクロ登録させたらできると思います。
(ROUGE)
'----
Sub test()
With ActiveSheet
    If .CheckBoxes(Application.Caller).Value = 1 Then
        .CheckBoxes("Check Box 2").Visible = True
    Else
        .CheckBoxes("Check Box 2").Visible = False
    End If
End With
End Sub

ROUGEさま　返信ありがとうございます。
　
ご教示の通りやってみましたが、
「WorkSheetクラスのCheckBoxesプロパティを取得できません」
とエラーがでました。
なにか基本的な間違いをしているのかもしれません。
ご教示ください。

 一行目に記載した仮定を読まれましたか？
非表示にしたいチェックボックスの名前が違うことによるエラーですよ。
たこさんの状況に合わせて修正が必要な箇所です。
　
非表示にしたいチェックボックスを選択した状態で、
　
Sub 確認()
MsgBox Selection.Name
End Sub
　
を実行し、名前を確認してください。
(ROUGE)

ROUGEさま　ありがとうございました。
チェックボックスの名前を思いっきり「チェックボックス」って書いてました。
だからだったんですね。
すいません。
まだまだ勉強です。
ありがとうございました。

コメント返信：

[ 一覧(最新更新順) ]

[[20080828140720]] 『チェックボックスをオンでほかのチェックボックス』（たこ） ページの最後に飛ぶ

[[20080828140720]]　『チェックボックスをオンでほかのチェックボックス』（たこ）　ページの最後に飛ぶ