Excelでチェックボックスを使った列のコピー方法

質問

案件進捗表を作成しています。
進捗に応じて右へ右へとチェックボックスにチェックを入れていく形にしていて、
チェックボックスのとなりのセルに真偽の値を入れるように反映させています。
案件が増えるごとに、1,2,3行と・・とデータを増やしていきたいのですが、
1行目に作成した形式を下にコピーするとチェックボックスが全データ同じ動きをしてしまいます。
となりのセルに「TRUE」などを返すように反映させているチェックボックスはコピーできませんか？
教えてください。よろしくお願いします。

回答No.1

keithin · ベストアンサー

エクセルでは、「フォーム」のチェックボックスと「ActiveXコントロール（コントロールツールボックス）」のチェックボックスの、２種類のチェックボックスが利用できます。
ご相談ではいったいどっちを使って作成したのか、しっかり情報提供してください。

＃余談ですがご利用のエクセルのバージョンについても、必ず明記する事を憶えて下さい。

ただまぁ、どちらを使っても「下にコピーしただけで隣に結果が返る」ようにする方法は、残念ですがありません。

というワケで出来る方法：
１．今まで作成したチェックボックスはすべて消去する
２．「フォーム」のチェックボックスをシートに配置する
　　その際、必ず「セルの中に納まる」ようにセルの大きさも含めて調整する
３．コントロールの書式設定は「設定しない」でおく
４．右クリックして「マクロの登録」を開始する
５．新規作成を選択、現れた画面で

Sub チェック1_Click()
with activesheet.shapes(application.caller).topleftcell.offset(0, 1)
.value = not .value
end with
End Sub

のように記入作成する

６．ファイルメニューから終了してエクセルに戻る
７．マクロを登録したチェックボックス「が載っているセル」をコピーし、必要なセルに貼り付ける
８．チェックを入れたり外すと、右隣のセルに－１と０が交互に現れる

＃おまけ
－１と０のセルにセルの書式設定の表示形式のユーザー定義で
0;"TRUE";"FALSE"
と設定しておくと、TRUEとFALSEの表示になります。「見た目」が重要な時は適宜利用してください。

お礼

ありがとうございます。
情報不足ですみませんでした。
助かりました。