一覧表の一行置きに項目名を挿入するには

質問

エクセルで３学年の生徒のパスワードとユーザ名の一覧表を作りました。一人一人に、クラス・氏名・パスワード・ユーザ名の項目の入った個人票を渡したいのです。
　ワードで差し込み印刷にすると紙の無駄が出るので、エクセルで作ったその一覧表の一行置きに、クラス・氏名・パスワード・ユーザ名の項目の入った行を挿入し、印刷して、はさみで切って渡そうと思います。
　そのやり方をご教示いただけませんでしょうか。

クラス　　氏名　パスワード　ユーザ名　←これを一行置きに入れる。
３年１組　○○○　×××　　△△△

回答No.1

nicotinism · ベストアンサー

３年１組　○○○　×××　　△△△
３年１組　□□□　×××　　△△△
・・・・・・・・・・・・・・・・・・
となっていたら
列を挿入して２からの連番（増分２）を入れます
２ ３年１組　○○○　×××　　△△△
４ ３年１組　□□□　×××　　△△△
・・・・・・・・・・・・・・・・・・
その後、下の列に
A列は空けといて、クラス　　氏名　パスワード　ユーザ名
をクラスの人数分コピペします
空けたA列に１からの連番（増分２）を入れて
A列でソートすれば
１ クラス　　氏名　パスワード　ユーザ名
２ ３年１組　○○○　×××　　△△△
３ クラス　　氏名　パスワード　ユーザ名
４ ３年１組　□□□　×××　　△△△
となります。

お礼

ありがとうございました。簡単ですね。私にはとても思いつきませんでした。

回答No.2

taka_s777

せっかく作った一覧表ですから、今後も使い回しができるように、印刷用シートを別に作ってはどうでしょうか。

例)Sheet1(一覧表)のA列1行目に項目名(クラス、氏名、パスワード、ユーザ名)
A列2行目から３年１組、B列2行目から○○○…とあるとします。
Sheet2(印刷用シート)とします。

手順1・・・Sheet2セルA1に「=Sheet1!A$1」と入力してセルD1までフィルドラッグ。
手順2・・・Sheet2セルA2に「=INDEX(Sheet1!A:A,(ROW()/2+1))」と入力してセルD2までフィルドラッグ。
手順3・・・Sheet2セルA1からセルD2まで選択し、任意の行までフィルドラッグ。

お礼

ありがとうございました。印刷用シートを別に作るのは良いアイディアですね。関数も教えて下さってありがとうございました。