次のような名簿があるとします。
A列 B列
通し番号 名前
1 阿部
2 佐々木
空白 空白
4 木村
5 田辺
空白 空白
空白 空白
8 三浦
通し番号が入力されていない場合は、名前も表示されない様になっています。
セルC1に通し番号を順々に表示(マクロで指定)
セルC2にその番号の名前を参照表示←個人票として印刷
番号があれば(名前が表示されれば)印刷
としたいです。
個人票を連続印刷したいのですが、空白を飛ばして、
番号が入っている人だけを印刷、というマクロがどうしても組めません。
一つ一つ、番号が入っていれば名前を印刷のようなマクロを延々と
組むことは出来るのですが、名簿が長大なのでそれは避けたいです。
よろしくお願いします。
No.1ベストアンサー
- 回答日時:
現状のコードを提示していただければ回答が簡単なのですが
もし、For~Next文で繰り返しの処理をなされているのであれば
途中に
For i=XX To XXX
If Range("A" & i).Value="" Then Next
現状のコード
Next
とかいれて
もし、A列が空白ならば、以下のコードを実行せずに次に移る
様なコードを記述します。
No.2
- 回答日時:
>個人票を連続印刷したい
しばしば,理屈では上手く行きますが実際にはうまく印刷できない場合が出てきます。簡単に言うと,印刷を出せる前にマクロが次のデータに書き換えてしまうような状況です。
(まぁ,状況がわかれば待てを入れて回避したりとかもありますが)
という訳で確実な方法として
シート1:リスト
シート2:印刷のひな形
sub macro1()
dim h as range
for each h in worksheets("Sheet1").range("A2:A" & worksheets("Sheet1").range("A65536").end(xlup).row)
if h <> "" then
worksheets("Sheet2").copy after:=worksheets(worksheets.count)
activesheet.range("C1") = h
activesheet.range("C2") = h.offset(0, 1)
end if
next
end sub
とかなんとかの具合でひな形の複製にデータを埋めて必要数作成後,作業グループにして一気に印刷に出してみてください。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルでキーリストからデータを取り出して1枚1枚印刷するには? 11 2022/06/27 09:52
- Excel(エクセル) セルによって印刷するシートを変える方法 EXCEL-VBA 2 2022/08/01 20:48
- 年賀状作成・はがき作成 Wordによる宛名印刷 2 2023/01/04 15:36
- Visual Basic(VBA) セルに抜けた番号の代わりに空白を挿入する 4 2023/04/10 20:29
- Excel(エクセル) Excelでnullになるような式のセルをマクロで空白行と認識させるにはどうすればいいですか? 3 2023/03/13 13:42
- その他(音楽・ダンス・舞台芸能) チケットに座席番号のみを印刷する方法 4 2023/02/10 11:21
- C言語・C++・C# C言語 プログラミング 4 2022/05/22 11:53
- Excel(エクセル) エクセルの表でダブりを解消する方法を、教えてください。 5 2023/04/12 12:11
- その他(Microsoft Office) Excelのマクロについて教えてください。 1 2022/03/25 10:03
- Excel(エクセル) エクセルで”入力シート”の文字書式の変更を”出力シート”で同じ文字書式で印刷したいです。VBA希望 4 2023/04/24 11:07
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Wordの差し込み印刷で空白行が...
-
LINEのこの空白ってどんな意味...
-
Excel計算式が入ってるセルを空...
-
INDEXとMATCH関数で#N/Aが出る...
-
latexで、行の先頭に空白を入れ...
-
Word ○(まる)で表示される空白
-
アクセスのクエリで空白を0と...
-
bashでの空白と空文字の判断
-
リンク貼り付けで空白セルが0表...
-
#VALUE!の対処
-
エクセルでフッターに空白を入れる
-
Wordの文字数カウント機能のス...
-
PowerPointの表内のカンマ
-
【VBA】PDF出力に任意のファイ...
-
EXCELでタイトル行と一番下の行...
-
エクセルでセル内改行の1行目...
-
Excelで50個のセルに同じ文字を...
-
エクセルでオートサムを使った...
-
エクセルでハイパーリンクのコピー
-
16桁以上の「0」に変換されてし...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
LINEのこの空白ってどんな意味...
-
Wordの差し込み印刷で空白行が...
-
INDEXとMATCH関数で#N/Aが出る...
-
Word ○(まる)で表示される空白
-
Excel計算式が入ってるセルを空...
-
bashでの空白と空文字の判断
-
エクセルでフッターに空白を入れる
-
「 - 」と「 _ 」 の違い
-
VBA ""が認識されないのはなぜ...
-
アクセスのクエリで空白を0と...
-
マクロ 空白セルまで繰り返す
-
エクセルで1つでも×か空白があ...
-
空白行があると #DIV/0なる?...
-
IF関数について
-
Excel関数で90%から110%の間を◎...
-
メモ帳のスクロールバーを変更...
-
latexで、行の先頭に空白を入れ...
-
仕事で使う数式を自分で作成で...
-
Wordの文字数カウント機能のス...
-
リンク貼り付けで空白セルが0表...
おすすめ情報