エクセル ダブルクリックでチェックマーク

質問

excel2013のオンラインテンプレートの
「旅行必携品チェックリスト」の一番左列の完了で
タブルクリックするとチェックマークが入るようになっています。
これは、普通のセルに設定するにはどのようにすればできるのでしょうか？

詳しい方がいらっしゃいましたら
ご教授頂けたら幸いです。

回答No.3

imogasi · ベストアンサー

#2です。質問者は簡単に「諦めます」になっちゃったのですが、
質問内容だけにだけ答えると、
まだ質問が開いていたので、参考になりそうなことを記してみます。
エクセルのシートのセルを「ダブルクリックすると、チェックマークが入るようにしたい」
ということなので
（A）A列のA1:A20のセルのどれかをダブルクリックすると、レ点が入る等にしてみます。
（B)再度そのセルをダブルクリックするとレ点が消える。
（シングルクリックがイベントにないのでダブルクリックする、になっている。）
ーー
・シートSheet1の画面で「開発」リボンをクリック
・「VisualBasic」をクリック
・VBE画面の、左のフレームのVBAProjectのSheet1(Sheet1)をクリック
・右上の（General) の▼をクリック
・右上の▼をクリックして
Worksheet_BeforeDoubleClickを選ぶと
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

End Sub
が出る。
Private SubとEnd Subの行の真ん中の空白行にコードを入れて
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Application.Intersect(Target, Range("A1:A20")) Is Nothing Then
If Target.Value = "" Then
Target.Value = ChrW(252) 'Wingdingsのレ点
Target.Font.Name = "Wingdings"
Target.Font.Size = 22
Else
Target.Value = ""
End If
Target.Offset(1, 0).Select
End If
End Sub
と作る。
すると
・Ｓｈｅｅｔ１で
・Ａ１：Ａ２０でのダブルクリックなら（If Not Application.Intersect(Target, Range("A1:A20")) Is Nothing Then　）
・セルをダブルクリックするとレ点が入る
・レ点のあるＡ１：Ａ２０のセルでダブルクリックすると、レ点が消える。
・レ点は、（絵文字的な）Wingdingsフォントの書体で入る（私個人的には
Wingdingsフォントが格好よいと思ったから。テンプレートでもこれを使っているようだ）
ーーー
上記ＶＢＡコードは大したことはないのですが、そこに至る背景知識が、相当要るとおもう。
特に「イベント」という仕組みなど。
＝＝＝＝＝＝
VBAを使うのではなくて、やる方法は
またすなわちワークシートにチェックボックスを設けることは
「エクセル2013 チェックボックス 」でGoogle照会して
http://kokodane.com/2013_waza_040.htm　など
オプションボタンは
「エクセル2013 オプションボタン 」でGoogle照会して
http://kokoro.kir.jp/excel/form-option.html　など
で勉強してください。
ついでの「グループ化」について勉強が必要でしょう。

お礼

お礼が遅れまして申し訳ございません。
詳細な説明をいただきありがとうございました。
今の私では直には全部理解できないですけど
少しずつ使いこなせたらと思います。

回答No.2

imogasi

>普通のセルに設定するにはどのようにすればできるのでしょうか
やりたいことの趣旨が説明不十分だろう。
下記を読んで補足してください。
ーー
質問で言うテンプレートだって、セルB列の第４行目以下のセルに、セルの値として
チェックマークという文字（突き詰めれば文字コード）を設定しているようですよ。VBE画面のSheet1のモジュールにはVBEでプログラムが組まれているようです。
チェックを抹消のプログラムもVBAで作られてあるようです。
ーー
質問の、上記のテンプレートはあくまで例示の話題のために、質問者が言ったもので（それにしては大げさな気がする）、実は普通の一般の別のシートのB列とかに、ダブルクリックしたらチェックマークを出したいということか。あいまい。
質問の趣旨は、テンプレートの改造（改変）かと思っちゃったが、どうなのか。
質問者はVBA特にその中のイベントプロシージュアーを作ったの経験があるのか。
VBAを避けては、そういうことはむつかしいだろうから、なければあきらめること。
ーー
こういうチェックが表示される部品類は「コントロール」と言い、それを置く台紙としてはユーザーフォームに置くのだが、シートも台紙的な役割が持てる（OleObject)。
WEB記事等は後者の方が少ないが、「ワークシート　チェックボックス　VBA」で照会すれば記事が出てくる。
１例
http://www.happy2-island.com/excelsmile/smile03/capter00716.shtml

お礼

＞VBAを避けては、そういうことはむつかしいだろうから、なければあきらめること。
諦めます。
情報処理の知識はとくにありません。
エクセルは複雑なグラフが簡単につくれるくらいですので、
ダブルクリックでセルにチェックマークを入力することも
手軽にできたら使いたいと思いました。
そうではないのですね。勉強になります。

いろいろ調べてご回答頂き、どうもありがとうございました。

回答No.1

Safe_Mode

ご参考に。
http://okwave.jp/qa/q5678741.html

お礼

早々のご回答、どうもありがとうございます。
参考にさせていただきます。