ただいま差し込み印刷機能を利用して宛名ラベルを作成しております。(accessでの作成が急きょexcelとなり慌てております。)
レイアウトは全て終わっているのですが、最後に印刷ラベルの上部にラベル番号(レコード番号?)「○○~○○」のような形で表示したいとと思っております。

21面のラベルなので1ページ目「1~21枚目、2ページ目「22~42枚目」と増えていく感じです。(希望は「枚目も入れたいです。」)
accessで利用できる数式もヘッダーでは文字と認識され、最悪ページ数だけでもと挿入付近にある「ページ番号」を設定しても全部が1/1と1ページ目の番号で印刷されてしまいました。

一応参考までに、ラベルに印字するのは「郵便番号」「住所」「会社名」でexcelから呼び出しているのは「郵便番号」「住所」「会社名」「ラベル番号」です。
どなたかご存知の方よろしくお願い致します。

このQ&Aに関連する最新のQ&A

A 回答 (2件)

Word2007への差し込み印刷なのですね。



ヘッダーにラベル番号をもとに、辞書のようなページ内にある
最初の単語から最後の単語を表示させたいのなら、StyleRef
のフィールドコードを使う方法があります。
http://office.microsoft.com/ja-jp/word-help/HP00 …

スタイル参照という機能ですので、ラベル内にラベル番号独自
としての文字スタイルなどを用意する必要があります。
この方法を使う場合には、ラベル番号を白色にするスタイルに
するなど工夫が必要です。

もっと簡単な方法としては差し込み印刷の場合だとセクション
で区切られたページになるので、これを利用する方法です。

{ =({ Section }-1)*21+1 }枚目~{ ={ Section }*21 }枚目

こちら↑をヘッダーに記載してください
作成ができたら[個々のドキュメントの編集]で新規文書への
差し込みをし正しくなっているか確認します。
新規文書への差し込みからは通常の印刷を行ってください。
http://hamay.blogspot.com/2008/03/blog-post_10.h …
[個々のドキュメントの編集」]からでなく、[文書の印刷]で
直接印刷する場合に確実に表示されるのかは実証していない
ので、私にはわかりません。
可能かもしれませんが保証しませんので実験できるのならば
実証してみてはいかが。

ちなみに、フィールドコードについてはこちら↓を参考に。
http://office.microsoft.com/ja-jp/word-help/HA01 …

添付画像はWord2002で作成して、フィールドコードの表示
状態にしてあるものです。
「<excel> 差し込み印刷ヘッダー設定」の回答画像2
    • good
    • 0
この回答へのお礼

詳しく教えていただき、ありがとうございました。
残念ながら、私の力では上手く出来ずにただの文字列として印刷されてしまいました。
ページ数だけでも、ということで最初にページ数だけ印刷したラベルシートを作成し、その上から詳細を印刷する2重印刷方式(笑)をすることにしました。

お礼日時:2011/04/21 16:00

ページ番号の挿入のみですが・・・



差込した文書は見た目ページ毎に分かれているように見えても、セクションで区切っただけの一つながりの文書ですので、ページも1ページしかないと判断されます。

Ctrl+H(置換)→オプション→ワイルドカードを使用するにチェック→検索する文字列:^m、置換後の文字列:^m 
(どちらも、ひらがなの「へ」のキーと小文字のmを半角で)

全部置換でセクション区切りが改ページになりますのでそれからページ番号を設定して下さい。

上記は2003までの操作です。(2007以降も問題ないかとは思いますが)
今後はバージョンの記載をお願いします。
    • good
    • 0
この回答へのお礼

バージョンの件は失礼致しました。
2007です。
ご回答頂いたように行ってみましたが、やはり1ページ目になってしまいました。

ありがとうございました。

お礼日時:2011/04/21 12:57

このQ&Aに関連する人気のQ&A

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

Qヘッダーフッターを使って名前を印刷できませんか?

初投稿です お手柔らかに お願いいたします
30人ぐらいに 毎月 Excelで 予定表を 作り 印刷して 配布しなければならなくなりました
配布ミスを 防ぐ為に 先頭に ○○さんと 記入したいのですが 
ヘッダーフッターを 使って名前を印刷できませんか?
ちなみに 今は 表を 人数分 ページに コピーペーストして作り 
 先頭に VLOOKUP関数を 入れて 別表を参照して 名前を入れて 予定表を 作っています
別の 方法でも良いので 何か良い方法は ありませんか
皆様の お知恵を拝借 したいと思いますので よろしくお願いいたします。

Aベストアンサー

予定表の表自体は皆さん同じ表ですか?

人数分の表を作らずに済む方法があります。
ヘッダーフッターには名前は入れずに、エクセルの右端辺りに入れてしまう事になりますが。

初めに、名前を表から離れた場所に作っておきます。
メニューバーのデータに入力規則があります。
入力値の種類をリストを選択します。
元の値に、名前の表のリスト範囲選択します。

名前を入れた箇所をクリックするとドロップダウンリストが出ます。
下向き三角でそれぞれの方を選んで印刷します。

印刷する時は、予定表他印刷した場所だけを範囲選択して印刷します。
そうしないと、名前のだけの表も同時に印刷されてしまいます。

その他、ワードで予定表だけ挿入し、名前だけ、フォームから入力することもできます。
メニューバーのフォームの中に、リストがあります。

参考URL:http://www.eurus.dti.ne.jp/~yoneyama/Excel/n-kis.htm,http://www.relief.jp/itnote/archives/001190.php

予定表の表自体は皆さん同じ表ですか?

人数分の表を作らずに済む方法があります。
ヘッダーフッターには名前は入れずに、エクセルの右端辺りに入れてしまう事になりますが。

初めに、名前を表から離れた場所に作っておきます。
メニューバーのデータに入力規則があります。
入力値の種類をリストを選択します。
元の値に、名前の表のリスト範囲選択します。

名前を入れた箇所をクリックするとドロップダウンリストが出ます。
下向き三角でそれぞれの方を選んで印刷します。

印刷する時は、予定...続きを読む

Qexcelからexcelへの差し込み印刷

お世話になります。

excelでwordへの差し込み印刷をよく利用するのですが、
同様に、
excelのデータをexcelに流し込んで印刷する方法はありますでしょうか。

excelの名簿のデータを
excelの表のフォーマットに流し込んで
1人づつ印刷したいのですが。

お分かりの方いらっしゃいました教えてください。
どうぞ宜しくお願い致します。

Aベストアンサー

イメージはわかるが、エクセルに差込印刷の機能はありません。
ワードなどと違ってA.X氏1人分書類シート作成、B印刷、Aのシートををy氏分のデータでシート内容(セル)を置き換え、印刷、の繰り返しをします。
ーー
例データ Sheet1 A1;D3
連番氏名住所品物
1山田 三郎東京都江東区かばん
2植田 健横浜市港北区帽子
A列はこのたび連番を振りました。
Sheet2   に送り状の書式を体裁よく作ります。
H1セル(どこでも良いが、下記のVLOOKUPの式は変わる)

送り状

住所X
氏名Y

品物Z

上記の品をお送り申し上げます。
ご査収ください

以上
Xの場所のセルに =VLOOKUP($H$1,Sheet1!$A$1:$D$3,2,FALSE)
Yの場所のセルに =VLOOKUP($H$1,Sheet1!$A$1:$D$3,3,FALSE)
Zの場所のセルに =VLOOKUP($H$1,Sheet1!$A$1:$D$3,4,FALSE)

---
結果

送り状

住所山田 三郎
氏名東京都江東区

品物かばん

上記の品をお送り申し上げます。
ご査収ください

以上
ここで
VBE画面で標準モジュールに
Sub test01()
For i = 1 To 2 '人数分
Range("H1") = i
Range("A1:G20").PrintOut '印刷範囲は各人同じとする
Next i
End Sub
を張り付け、実行する。
山田、植田分の紙が2枚印刷されました。
これは質問者はVBAの経験も無いでしょうと、最低限にしてあります。
VBAを勉強してください。
別ブックにある名簿を対象などは複雑になるので避けています。

イメージはわかるが、エクセルに差込印刷の機能はありません。
ワードなどと違ってA.X氏1人分書類シート作成、B印刷、Aのシートををy氏分のデータでシート内容(セル)を置き換え、印刷、の繰り返しをします。
ーー
例データ Sheet1 A1;D3
連番氏名住所品物
1山田 三郎東京都江東区かばん
2植田 健横浜市港北区帽子
A列はこのたび連番を振りました。
Sheet2   に送り状の書式を体裁よく作ります。
H1セル(どこでも良いが、下記のVLOOKUPの式は変わる)

送り状

住所X
氏名Y

品物Z

...続きを読む

Q差込み印刷について(連続した数字を入れる)

チケットを管理表を作成しております。
ワードにチケット管理表を12枚印刷できるように作りました。
1枚につき、2ヶ所チケット番号を印刷する場所があります。
番号は、00001~05000まで印刷させたいと思ってます。
連続した数字を差込み印刷できる方法はありますでしょうか?
急いでおります。宜しくお願いします。

Aベストアンサー

Wordのチケットに、Excelで作成した番号を差し込み印刷する方法がよいと思います。以下はその操作例です。

1) Excelの「Sheet1」のセルA1に「番号」と入力し、セルの書式を文字列にして、セルA2以下に00001~05000を入力します。
2) 「ファイル」→「名前を付けて保存」で分かりやすい名前を付けて保存します。

3) チケットのWord文書を開いて、「表示」→「ツールバー」→「差し込み印刷」で、ツールバーを表示します。
4) 「差し込み印刷」ツールバーの「メイン文書の設定」ボタンを押して「標準のWord文書」をオンにして「OK」を押します。

5) 「差し込み印刷」ツールバーの「データソースを開く」ボタンを押して、先に保存したExcelファイルを指定して「開く」を押し、表示される「表の選択」で「Sheet1」が選択されていることを確認して「OK」を押します。
6) チケットの番号を表示する先頭の位置にカーソルを移動しいて、「差し込み印刷」ツールバーの「差し込み印刷フィールドの挿入」ボタンを押して、「番号」をクリックして「挿入」を押し、「閉じる」をおします。<<番号>>のように表示されます。

7) 続いて、「Wordフィールドの挿入」を押して、「Next Record(次のレコード)をクリックします。<<Next Record>>が挿入されます。
8) <<番号>><<Next Record>>を選択して、「コピー」操作し、2番目の番号の位置に貼り付けします。

9) 続いて、3番目の番号の位置にカーソルを移動し、「F4」キー(「繰り返し」のショートカットキー)を押して貼り付けます。以下、すべての番号の位置に貼り付けます。
10) 「差し込み印刷」ツールバーの「差し込んだデータの表示」ボタンを押すと、Excelの番号が表示されます。レイアウトに問題があれば、編集します。

11) 「差し込み印刷」ツールバーの「プリンタに差し込み」ボタンを押して、「すべて」がオンになっていることを確認して「OK」を押すと「印刷」ダイアログが表示されますので、「OK」を押すと印刷が開始されます。

なお、「プリンタに差し込み」の代わりに「新規文書に差し込み」ボタンを押すと、すべてのレコードが差し込まれた文書が表示されますので、すべてのレコードを確認することができます。新規文書に差し込んだ場合は、普通の印刷手順で印刷を行います。

お試し下さい。

「Word(ワード)講座 応用編:文書中への差し込み印刷」
http://www.eurus.dti.ne.jp/~yoneyama/Word/ouyou/w-sosi2.html

Wordのチケットに、Excelで作成した番号を差し込み印刷する方法がよいと思います。以下はその操作例です。

1) Excelの「Sheet1」のセルA1に「番号」と入力し、セルの書式を文字列にして、セルA2以下に00001~05000を入力します。
2) 「ファイル」→「名前を付けて保存」で分かりやすい名前を付けて保存します。

3) チケットのWord文書を開いて、「表示」→「ツールバー」→「差し込み印刷」で、ツールバーを表示します。
4) 「差し込み印刷」ツールバーの「メイン文書の設定」ボタンを押して「標準のWord文書...続きを読む

QEXCELで特定のセルに表示された項目をヘッダーやフッターに出力するには

お世話になっております。
タイトルの通りの質問なのですが、
EXCELで特定のセルに表示された項目をヘッダーやフッターに出力するにはどうすればよいのでしょうか?

たとえば、A1のセルに「ABC」と入力されていたとします。
その「ABC」をヘッダーに自動的に出力できるようにしたいのです。
できればマクロは使いたくありません。

宜しくお願いします。

Aベストアンサー

「表示」メニューの「ヘッダーとフッター」では、セル参照を指定することはできません。
「行タイトル」や「列タイトル」しか使用できません。
「行タイトル」を使用するには「ファイル」メニューの「ページ設定」で「シート」タグを選択してください。
ここで「行タイトル」にA1でしたら1行目を選択すればOKです。
ただし、行丸ごとですので注意してください。

QWordで印刷時に通し番号を付けたい

用紙の右上に印刷枚数に会った通し番号をつけたい
一枚目に001、二枚目に002、三枚目に003と付けたい
お願いします。

Aベストアンサー

No.1さんの分の補足です。
このやり方ですと001などの設定はできないようです。
ヘッダー・フッターの画面を出したら定型句の挿入という項目があるのでドロップダウンリストから -Page- をクリックするとヘッダーの中央部分に表示されます。
それを001などのように上書きして右寄せします。
その際反転されて表示された頁番号まで上書きしてしまうと連続番号になりません。不要なら - - は削除しても影響はありません。

Qエクセルの表を複数枚印刷したときに連番をつけたい

エクセルの1枚の表を100枚印刷し、その表のシート内(AW3)に連番を打ちたいのですが、なにか簡単な方法はありますか?
今までは印刷を100枚して、ナンバーリング(ハンコ)で連番を打っていましたが、ちょっと面倒なんです。
マクロを使ったことのない初心者ですが、何かよい方法はありませんか?よろしくお願いいたします。

Aベストアンサー

#02です。
開始番号、終了番号を指定する場合はこんなマクロです。
ただし開始、終了ともに正の数でないと印刷は行いません。

Sub NumberPrint()
Dim idx As Integer
Dim frmPage, toPage
 frmPage = Application.InputBox("連番を挿入して印刷します" & Chr(13) _
     & "開始番号を入力してください", Type:=1)
 toPage = Application.InputBox("終了番号を入力してください", Type:=1)
 If frmPage > 0 And toPage >= frmPage Then
  For idx = frmPage To toPage
   Range("AW3").Value = idx
   ActiveSheet.PrintOut
  Next idx
 Else
  MsgBox "開始番号、終了番号が不適切です。印刷は行いません"
 End If
End Sub

#02です。
開始番号、終了番号を指定する場合はこんなマクロです。
ただし開始、終了ともに正の数でないと印刷は行いません。

Sub NumberPrint()
Dim idx As Integer
Dim frmPage, toPage
 frmPage = Application.InputBox("連番を挿入して印刷します" & Chr(13) _
     & "開始番号を入力してください", Type:=1)
 toPage = Application.InputBox("終了番号を入力してください", Type:=1)
 If frmPage > 0 And toPage >= frmPage Then
  For idx = frmPage To toPage
   Range("AW3...続きを読む

Q差し込み印刷の元データファイルの探し方

エクセルデータをワード文書に差し込み印刷します。
この作業を自分が行った場合はエクセル、ワードファイルの保存先はわかると思いますが、他人が作った差し込み印刷で元データのエクセルファイルの保存先を探す場合どのようにしたらいいですか?
具体的には、人事異動で前任者が作成した差し込み印刷を使う場合データの修正が出てきます。そこで元データを修正したいのですがエクセルファイルの保存先がわかりません。

OS WinXP Pro
エクセル、ワードとも2003

「作成した人に確認する」という回答はなしでお願いします。

Aベストアンサー

こんばんは。

>作成した差し込み印刷を使う場合データの修正が出てきます。

「差し込み印刷バー」の「差し込み印刷のあて先」の中の、「編集」をクリックすればよいと思います。
その後、「最新の情報に更新」とすればよいはずです。

ところで、マクロですが、こんな簡単もので済むと思います。

Sub Test1()
Dim strSource As String
strSource = ActiveDocument.MailMerge.DataSource.Name
If strSource <> "" Then
'差し込み印刷のデータソースがなければ、出ません。
  MsgBox strSource
End If
End Sub

Qwordの何も書かれていない2ページ目を削除したい

お世話になります。
他人が作ったword fileの、2ページ目部分が不要になったので、文字・セル等全て消したつもりですが、空白のまま2ページ目が残ってしまっています。どうすれば、ページ自体が無くなって、全部で1ページに出来るでしょうか。

Aベストアンサー

♯1のものです。
改行マーク・・と言われるからには編集記号はすべて表示されているのですよね。
可能性を列挙します。
1.実は改ページがされている。
2.ページ自体の余白がデフォルトよりも極端に小さい
3.最後の改ページマークの部分も表形式になっている。(罫線がないだけ)

他にもあるかも知れませんが、もし時間に余裕があるのなら、1度表形式をすべて解除して、もう1度、表を作りなおしてみてはいかがでしょうか。

改行幅ですとか、いろいろと細かい設定がされているとすると、直接いじらないとなかなかアドバイスしにくいので…。

自分も人からもらったファイルでこのような状況によく陥りますが、最終的にはいつも作りなおしています。
Wordって使えるんだか使えないんだかよく分からないですね。
Wordを使いながら「余計なコトすんじゃねぇ」とソフトに向かってよく怒鳴っています。

QWord 差込印刷でのページ番号について

Wordで差し込み印刷で、新規文書への差込を行いました。
新しく作成された文書にページ番号を通しで振りたいのですが、
セクション区切りが入ってしまい、ページ番号が、通しでふれません。

何か、簡単なやり方があれば教えてください。
宜しくお願いします。

Aベストアンサー

Word 2002 (SP3) の方法です。
ヘッダーとフッター画面にして、第2セクションの
ページ番号のあるところにカーソルを置きます。

ヘッダーとフッターツールバーの
[ページ番号の書式設定]ボタンをクリック。
連続番号で、[前のセクションから継続]を選んで OK ボタンを押す。

ツールバーの右の[次を表示]ボタンをクリックする。
次のセクションに移動したら、F4 キーを押す。

[次を表示]ボタンを押す、F4 キーを押すの、繰り返しです。

QWordで、1ページを丸ごと削除するには?

1ページしか必要ないのに、真っ白な2ページ目がその下に表示されてしまった場合、この余分な2ページ目を一括削除(消去)する為に、何かいい方法があるでしょうか?

Aベストアンサー

<表示されてしまった場合>
これはそれなりに理由があるわけで、改ページや改行によって、次のページにまで入力が及んでいる時にそうなります。
特に罫線で表を作成し、ページの下一杯まで罫線を引いたときなどには、よくなる現象です。

さて、メニューの「表示」で段落記号にチェックが入っていないと、改行や改ページなどの入力情報が見えず、白紙のページを全て選択→削除してもそのままということが良くあります。
1 改行マークが白紙のページの先頭に入っていれば、それをBackSpaceで消してやる。
2 罫線を使っている場合は、それでも効果がない場合がありますが、その時は行数を増やしてやる。
などの方法があります。


このQ&Aを見た人がよく見るQ&A

人気Q&Aランキング

おすすめ情報