Excelでアンケートの集計8~質問事項の追加①

Pocket

質問事項を追加する場合の処理です。

入力用のユーザーフォームに下の図のように質問を追加します。
2609241
追加するオブジェクトは、ラベルとチェックボックスのみ。
チェックボックスについては、オブジェクト名を変更して下さい。

ユーザーフォームの入力内容を転記するシートも図のように追加します。
2609242
M列N列にただ追加するだけでなく、増やした分は「名前の定義」の範囲も変更して下さい。
「数式」タブから「名前の管理」をクリックし、「結果内容」の範囲を変更します。

コマンドボタンを押した際のVBAコードは、赤枠部分を追加して下さい。
2609243
コードの内容は同じです。
これで質問事項の追加は完了です。

昨日は久しぶりに東京へ。
池袋と五反田に行きましたが、しばらく見ないうちに随分と変わりますね。
池袋駅から立教大学まで地下でつながっているのには驚きました。
あとジュンク堂で、面白そうな本も見つけました。

本日も最後までお読みいただきありがとうございました。