ワードを使っての差込み印刷はしたことありますが、
今回はエクセルのみで差込み印刷をしたいと思います。
何か方法はありますか?
エクセルで作った表を、ワードに貼り付けて差込み印刷を
しようと思ったのですが、編集画面がエクセルになってしまい
ダメでした。
チケット表の管理をしていて、000001~05000の番号を封筒に
印刷したいと思ってます。
イメージはこんな感じです。
一枚の封筒の縦に番号を10ずつ印刷させます。
000001
000002
000003
000004
000005
000006
000007
000008
000009
000010
2枚目は000011からになります。2枚目以降、数字が自動的に
カウントするようにもできますでしょうか?
急いでます。よろしくお願いします!
No.2ベストアンサー
- 回答日時:
フリーソフトなどもあるようですが、やはり、Wordの差し込み印刷を使うのが簡単だと思います。
Exclの表の作成
1) Sheetをすべて選択して、セルの書式設定を文字列にします。
2) A1に{1)を入力し、J1までオートフィルします。
3) A2に000001、A3に000010を入力し、それぞれを右にオートフィルします。
4) A2からJ3までを選択して、下に必要行までオートフィルします。
5) 適当な名前を付けて、保存します。
Wordの差し込み印刷
1) 封筒をレイアウトします。
2) 「表示」→「ツールバー」→「差し込み印刷」を選択します。
「差し込み印刷」ツールバーの操作
1) 「メイン文書の設定」ボタンを押し、「標準のWord文書」をオンにして→「OK」を押します。
2) 「データソースを開く」ボタンを押し、先に保存したBookの名前を選択して「開く」→「表の選択」でデータが入力されているSheetを選択して「OK」を押します。
3) 「差し込みフィールドの挿入」ボタンを押し、(1)を指定して「挿入」を(10)まですべて挿入して「閉じる」を押します。
4) <<(1)>>から<<(10)>>までを編集~レイアウトします。
5) 「差し込んだデータの表示」ボタンを押すと、データが表示されます。
6) 「プリンタに差し込み」ボタンを押すと、印刷するレコードの選択画面が表示されますので、「すべて」を選択して、「OK」を押すと「印刷」ダイアログが開きます。「OK」を押すと印刷が開始されます。
「差し込み印刷 MSWORDとExcelを利用した差込印刷の作成」
http://katori.adam.ne.jp/studyetc/excel/sasikomi …
http://katori.adam.ne.jp/studyetc/excel/sasikomi …
No.6
- 回答日時:
質問の、000001~05000は、桁数が合わないのですが・・・
ただ単に封筒に10個ずつ印刷するだけなら、
まずA1に1、A2に=A1+1を入力して、書式を00000にして、A2を05000を表示するまで下にコピーして、印刷する番号を作る。
後はファイル->ページ設定で
用紙サイズを印刷する封筒に合わせて、印刷プレビュー見ながら余白の量で位置と表示桁数を合わせればできるんじゃないでしょうか。
No.5
- 回答日時:
過去に私も何度も回答しました。
「imogasi 請求書」でWEB照会して、
http://okwave.jp/qa2798008.html
あたりの#2をじっくり考えて見てください。
少ないVBAの知識でやれます。全くVBAを使わないというのは、自動印刷するためには、不可能です。
体裁を整える、文字色・サイズやセルの書式設定・体裁などは手作業で1回設定すれば済みます。
先週も同じタイプの質問に回答した。
No.4
- 回答日時:
例えば、
表示=>ツールバー=>フォーム
ボタンをクリック、シート上に適当な大きさでボタンを作成
ボタン右クリックで、新規記録で、シートを1枚印刷、
ツール=>マクロ=>記録の終了
ボタンを右クリックして編集で、VBエディターを開くと
Sub ボタン1_Click()
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub
と記述されていると思います。
次からは、ボタンをクリックすると印刷されます。
VBエディターで、
ActiveWindow.SelectedSheets・・・
Range("A1").Value=Range("A1").Value+1
'↑の1行
End Sub
と1行挿入します。
ボタン押すと、印刷して、A1の値が1つ増えます。
もし、繰り返し処理したければ、
B1に最後の数字いれて
Do While Range("A1").Value < Range("B1").Value
*繰り返したい内容
Loop
とDo While~Loopの間繰り返し、印刷して、A1がひとつ増えて、
A1の値がB1の値になるまで、繰り返し印刷されると思います。
VBAのコマンドの意味を理解して組み立ててみてください。
No.3
- 回答日時:
>ワードの差し込み印刷のような感じで作りたいのですが・・・
例えば、Sheet1にA,B,C列と順に氏名、住所など配置してあり
縦方向にデータが入れてあるとして、
印刷の為の別シートを作成
仮にA1セルに、印刷したい行数(2行目なら2)と入れておく
それぞれ、印刷したい場所のセルに
=INDEX(Sheet1!A:A,A1,1)
と入れると、Sheet1のA列の2行目(A1で指定した数字)の内容が表示
されると思います。
A1に、3と入れると、3行目のデータが表示されます。
印刷したい画面の準備が出来たら、
VBAで、印刷したらA1の値が一つ上がる。
ような、VBAを組むのはいかがですか。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルでページ番号をつける...
-
背景にした画像のサイズを任意...
-
エクセルでA4用紙に6枚のカード...
-
A4用紙 均等に横八分割したい...
-
Excelでセル参照したとき、書式...
-
勤続年数の平均を求めたい時の関数
-
エクセルの色も=イコールでき...
-
表のセル内の右側に余白?
-
デスクトップの画面を元に戻し...
-
WORDの表を一部削除したい
-
HP製PCのBIOS設定画面の起動方法
-
エクセルのセルの数値10000→1に...
-
一つのシートの中に複数のペー...
-
【エクセル】行挿入で数式もい...
-
エクセルでのマイナス計算がう...
-
エクセルで作成した縦に長い表...
-
TVとPCをHDMIでつなげたらPCの...
-
オートフィルタのリストを順番...
-
セルにカーソルを合わせると文...
-
【エクセル2002】 週番号から...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルでページ番号をつける...
-
背景にした画像のサイズを任意...
-
三つ折のしるしをワードで印刷...
-
スプレッドシートに貼り付けた...
-
エクセルでA4用紙に6枚のカード...
-
テキストを半透明にしたい
-
エクセルで正確な5センチを書き...
-
MS-OFFICE(EXCEL・WORD)の印...
-
ワードで報告書 A4を横にして...
-
A4用紙 均等に横八分割したい...
-
ワードのテキストボックスを印...
-
困っています。
-
「ユーザー指定の範囲」の印刷方法
-
エクセル コメントも印刷したい
-
ワード2010 ページ同士の入れ...
-
Excel ヘッダにセルが隠れます
-
エクセルのみで差込み印刷はで...
-
どうすれば、表示出来るのですか?
-
Wordページの印刷について
-
PDFファイルにページ数を表示さ...
おすすめ情報