Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
10902 / 13657 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【19360】教えてください ちょこちょこ 04/10/29(金) 11:08 質問[未読]
【19361】Re:教えてください IROC 04/10/29(金) 11:10 回答[未読]
【19371】Re:教えてください ちょこちょこ 04/10/29(金) 15:04 お礼[未読]
【19360】教えてください
質問  ちょこちょこ  - 04/10/29(金) 11:08 -
引用なし
パスワード
   私の考えられる最大限はここまででした。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Columns.Count = 3 And Target.Rows.Count = 1 Then
　　UserForm1.Show modal
End If
End Sub

セルのA〜Cを結合してあり（一行ずつ 下の段までずっと）、その結合してあるセルを選択すると、ユーザーフォームが表示されるように設定しました。

問題はここからで、
ユーザーフォームが必要ない人用に、ワークシート内にコマンドボタンのＯＮ・ＯＦＦを用意して、ＯＦＦを選択するとユーザーフォームは表示されずに通常入力で、ＯＮを選択するとユーザーフォームが表示されるようにしたいのですが そんなことは可能でしょうか？　 どうぞご指導をよろしくお願いします。
説明不足の点がありましたらすぐに追加説明をします。
【19361】Re:教えてください
回答  IROC  - 04/10/29(金) 11:10 -
引用なし
パスワード
   >コマンドボタンのＯＮ・ＯＦＦを用意して
コマンドボタンではなく、チェックボックスやトグルボタンにすれば
if文で ON/OFF を判定して処理を分ければできると思います。
【19371】Re:教えてください
お礼  ちょこちょこ  - 04/10/29(金) 15:04 -
引用なし
パスワード
   ありがとうございます。
出来上がりました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
10902 / 13657 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free