Excel VBA質問箱 IV

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

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


9682 / 13646 ツリー ←次へ | 前へ→

【26046】セルにチェックボックスを関連付けるには? EXCEL太郎 05/6/22(水) 15:06 質問[未読]
【26047】Re:セルにチェックボックスを関連付けるに... IROC 05/6/22(水) 15:50 回答[未読]
【26051】Re:セルにチェックボックスを関連付けるに... だるま 05/6/22(水) 16:21 回答[未読]
【26053】Re:セルにチェックボックスを関連付けるに... EXCEL太郎 05/6/22(水) 16:36 お礼[未読]

【26046】セルにチェックボックスを関連付けるには...
質問  EXCEL太郎  - 05/6/22(水) 15:06 -

引用なし
パスワード
   はじめまして。
こういう事が可能かどうか知りたいのですが。
1行1行に対して、カラムAにチェックボックスを割り当てて(関連付けて)、
チェックが入った場合に、その行の色を変えたいと思っています。
新しく行が増えた場合にも新たにチェックボックスを作成し、
割り当てたいと考えています。

果たして可能でしょうか?

いろいろと試してみたのですが、関連付ける部分がいまいち
わからず、皆さんのお知恵を拝借したいのですが。

突然ではありますが、どなたか知っている方、
教えてください。

よろしくお願いいたします。

【26047】Re:セルにチェックボックスを関連付ける...
回答  IROC  - 05/6/22(水) 15:50 -

引用なし
パスワード
   フォームのチェックボックスと条件付き書式でできそうに思えます。

【26051】Re:セルにチェックボックスを関連付ける...
回答  だるま WEB  - 05/6/22(水) 16:21 -

引用なし
パスワード
   >1行1行に対して、カラムAにチェックボックスを割り当てて(関連付けて)、
>チェックが入った場合に、その行の色を変えたいと思っています。
>新しく行が増えた場合にも新たにチェックボックスを作成し、
>割り当てたいと考えています。

チェックボックスという形にこだわりますか。
もし形はどうでもいいというのであれば、右クリックで処理する手もあります。
これなら行が増えても減っても自動で追従します。^d^


===== ThisWorkbookモジュール =====
Private Sub Workbook_SheetBeforeRightClick _
  (ByVal Sh As Object, ByVal Target As Range, _
  Cancel As Boolean)
  
  Dim myCell As Range
  Dim myRange As Range
  
  With Target
  
    '二列以上選択していたら
    If .Columns.Count >= 2 Then Exit Sub
    'A列以外だったら
    If .Column <> 1 Then Exit Sub
    
    '処理対象範囲をシートの使用範囲との交わり部分とする
    Set myRange = Intersect(.Cells, _
      Target.Worksheet.UsedRange.EntireRow.Columns(1))
    If myRange Is Nothing Then Exit Sub
    
    For Each myCell In myRange
      With myCell
        If .Value = "レ" Then
          .Value = "-"
          .EntireRow.Interior.ColorIndex _
            = xlAutomatic
        Else
          .Value = "レ"
          .EntireRow.Interior.ColorIndex = 3
        End If
      End With
    Next
    
  End With
  
  Cancel = True
  
End Sub

【26053】Re:セルにチェックボックスを関連付ける...
お礼  EXCEL太郎  - 05/6/22(水) 16:36 -

引用なし
パスワード
   さっそくの返答ありがとうございました。
なるほど、右クリックなら簡単そうですね。

ただ、今回は、機械にあまり詳しくない方々が使用する
事が前提としているので、極力見た目だけで
判断ができるようにしておきたいのです。
(僕的には、右クリックでも十分な気がしますが・・・)

やっぱり単純に割り当てるのは難しいのでしょうか。。。

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