[[20090710143744]]　『クリックすると✓されるようにしたいのです』（優）　ページの最後に飛ぶ

『クリックすると✓されるようにしたいのですが・・・教えてください。』（優）

 表示→ツールバー→コントロールツールボックス→チェックボックス
 もしくは、
 表示→ツールバー→フォーム→チェックボックス
 を使ったらどうでしょうか？
 BJ

ありがとうございます！
感謝いたします！

二つほど質問がございますがよろしいでしょうか？？

✓の入る四角→□は大きくなりますか？

あと一斉コピーはできますか？

無知ですみません・・・

 >✓の入る四角→□は大きくなりますか？
 ならないと思います。大きさは固定みたいです。
 >あと一斉コピーはできますか？
 一斉コピーとは？
 1個1個作るのが面倒だという事なのでしょうが、
 一応は出来ます。
 その後の、使用方法によっては修正するのが面倒になるかもしれませんけど。
 （マクロの使用を考慮した場合。）
 BJ

 >✓の入る四角→□は大きくなりますか？

 みせかけだけなら、ズームで倍率を上げ、
 フォントサイズを小さくして行列の幅も小さく調整すればできなくはないですね。
 ちょっと面倒ですが。
 (tora)

 □はセルの罫線で

  Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Application.Intersect(Target, Me.Range("A1:D10")) Is Nothing Then Exit Sub
  Application.EnableEvents = False
  Select Case Target.Value
    Case ""
      Target.Value = ChrW(&H2713)
      Target.Offset(1).Select
    Case ChrW(&H2713)
      Target.ClearContents
      Target.Offset(1).Select
  End Select
  Application.EnableEvents = True
  End Sub

 なんていうのはどうでしょうか？
 ほとんど見栄えの趣味の世界ですけど。

 （ｍｏｍｏ）

[[20080908154905]]

 ↑チェックボックスを自作したものです。

 但し、Excel2002で確認しました。Excel2000だと駄目みたい

 BJさん

 >クリックすると✓されるようにしたいのですが・
 よくこれでチェックボックスが連想できましたねえ・・、すごい。

 ichinose

 ＞よくこれでチェックボックスが連想できましたねえ・・、すごい。
 同感です ^^

 メモ帳に貼り付けたら、確かにチェックマークでした。
 （とおりすがり）

 ＞よくこれでチェックボックスが連想できましたねえ・・、すごい。
 文字化けだろうと、コピーしてメモ帳に貼り付けて確認しました。
 BJ

皆様ありがとうございました！
ちょっと事情で返信が遅れてしまいました。

勉強になりました。
またよろしくお願いいたします。

コメント返信：

[ 一覧(最新更新順) ]

[[20090710143744]] 『クリックすると✓されるようにしたいのです』（優） ページの最後に飛ぶ

[[20090710143744]]　『クリックすると✓されるようにしたいのです』（優）　ページの最後に飛ぶ