【最大10000ポイント】当たる!!質問投稿キャンペーン!

エクセルシート1に差し込むデータを作成し、エクセルシート2に納品書を作成し、その納品書にデータを差し込んで印刷したいのです。
何か良い方法を教えて下さい。どうぞよろしくお願い致します。

「エクセルからエクセルへの差込印刷の方法を」の質問画像

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

A 回答 (3件)

データを正規化したい気もしますが、とりあえず


K列を作業列として K2セルに
=J2*100+COUNTIF(J$2:J2,J2)
フィルハンドルダブルクリック
MATCH関数でK列を検索し、INDEX関数で目的の値を
引っ張ってくればよいと思います
「エクセルからエクセルへの差込印刷の方法を」の回答画像2
    • good
    • 0
この回答へのお礼

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

お礼日時:2016/02/23 13:18
    • good
    • 0
この回答へのお礼

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

お礼日時:2016/02/23 13:19

> エクセルシート1に差し込むデータを作成し、エクセルシート2に納品書を作成し、その納品書にデータを差し込んで印刷したいのです。



下記URLの過去ログをご覧になってお試し下さい。

「excelからexcelへの差し込み印刷」
https://oshiete.goo.ne.jp/qa/3597313.html

ご参考:
「エクセルだけで、VBAを使わず、複雑な差し込み印刷をする。」
http://freett.com/comet333/excel-061.html


もし、Excelの検索/行列関数をあまり使っておられなければ、素直に、Wordの差し込み印刷機能をお使い下さい。

「ワード文書にエクセルの数値データを差し込むには」
https://inouetetsurou.wordpress.com/2013/05/10/% …
    • good
    • 0
この回答へのお礼

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

お礼日時:2016/02/23 13:17

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

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

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

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

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

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エクセルの名簿一覧表からすでにエクセルで作られている一人づつのシートに差込印刷

エクセルでできている名簿リストから、すでにエクセルでできている個人別のシートに差込印刷したいのです。一人ずつセル参照で作ることはできるのですが、全部で300人分くらいあるのでワードの差込印刷のように一度にできる方法が知りたいのです。本日中にやらねばならないので手作業では、間に合いそうにありませんしVBAの勉強をしている余裕もありません。

Aベストアンサー

VBAでもない解答をします。ただファイル-印刷の操作を
300回すること。最終部のようにすれば、VBAで自動化も出来ます。
(1)Sheet2のA1:E3に住所録が
氏名郵便番号住所1住所2
山田 和郎111-1111東京都小平市新町2-1-2光マンション222
木之下 重雄222-2222東京都三鷹市本町4-3-2三国荘201
あるとします。本番ではA1:E300とかに住所録があります。
(2)Sheet1は印刷する画面シートです。
F1セルに2、
F2に="Sheet2!A"&F1
F3に="Sheet2!B"&F1
F4に="Sheet2!C"&F1
F5に="Sheet2!D"&F1
F6に="Sheet2!E"&F1
郵便番号を置くセルをB3として式=INDIRECT(F3)
府県市を入れるセルをB5として式=INDIRECT(F4)
町番地を入れるセルをB6として式=INDIRECT(F5)
気付を入れるセルをC6として式=INDIRECT(F6)
名前を入れるセルをB8として式=INDIRECT(F2)
C8に「様」を入れる。
(3)F1セルが2の時は
111-1111

東京都小平市
新町2-1-2光マンション222

山田 和郎様
となりますが、このA1:C8を印刷する。
(4)F1セルの値を3に変える(3を入力する)と
222-2222

東京都三鷹市
本町4-3-2三国荘201

木之下 重雄様
と瞬時に変るが、これを印刷する。
(5)F1を4、5、6、・・・と変えて印刷、変えて印刷すれば良い。
この(5)の部分だけをマクロの記録やVBAにすれば、
同じVBAでも既解答よりずっと易しいと思いますがいかがででしょうか。
Sub test01()
Worksheets("sheet1").Activate
For i = 2 To 3 '300
Cells(1, "F") = i
Range("a1:c8").PrintOut
Next i
End Sub
行高、セル幅、フォントサイズなどは手動で設定。
氏名、郵便番号、住所を置くセルは自由に出来ます。
上記でF1:F6も自由に別列に設定できます。

VBAでもない解答をします。ただファイル-印刷の操作を
300回すること。最終部のようにすれば、VBAで自動化も出来ます。
(1)Sheet2のA1:E3に住所録が
氏名郵便番号住所1住所2
山田 和郎111-1111東京都小平市新町2-1-2光マンション222
木之下 重雄222-2222東京都三鷹市本町4-3-2三国荘201
あるとします。本番ではA1:E300とかに住所録があります。
(2)Sheet1は印刷する画面シートです。
F1セルに2、
F2に="Sheet2!A"&F1
F3に="Sheet2!B"&F1
F4に="Sheet2!...続きを読む

Qexcelデータを使用して、excelの別なシートに、差し込み印刷をし

excelデータを使用して、excelの別なシートに、差し込み印刷をしたいのですが、その方法が解りません。ご存知の方いらっしゃればお教えください。

Aベストアンサー

Excel 2007では、ウィザードを使ってラベル印刷ができるようですが、Excelの一般機能では差し込み印刷はできません。

「Excel ラベル印刷ウィザード」
http://office.microsoft.com/ja-jp/excel/HP100775161041.aspx

VBAを使えば、Excelで差し込み印刷ができるようですが、VBAに慣れておられなければ、Wordの差し込み印刷を使用した方がよいと思います。

下記URLのページは、VBAを使った差し込み印刷の過去ログの例と検索結果です。

「エクセルの名簿一覧表からすでにエクセルで作られている一人づつのシートに差込印刷」
http://oshiete1.goo.ne.jp/qa667710.html

「Excel 差し込み印刷 VBA」の検索結果
http://www.google.co.jp/search?hl=ja&num=20&q=Excel%E3%80%80%E5%B7%AE%E3%81%97%E8%BE%BC%E3%81%BF%E5%8D%B0%E5%88%B7%E3%80%80VBA&lr=lang_ja&aq=f&oq=

Excel 2007では、ウィザードを使ってラベル印刷ができるようですが、Excelの一般機能では差し込み印刷はできません。

「Excel ラベル印刷ウィザード」
http://office.microsoft.com/ja-jp/excel/HP100775161041.aspx

VBAを使えば、Excelで差し込み印刷ができるようですが、VBAに慣れておられなければ、Wordの差し込み印刷を使用した方がよいと思います。

下記URLのページは、VBAを使った差し込み印刷の過去ログの例と検索結果です。

「エクセルの名簿一覧表からすでにエクセルで作られている一人づつ...続きを読む

Qエクセルから帳票形式に差込印刷したいのですが

皆さん初めまして!

エクセルで1万件に近いデータがあります。

これらを帳票形式に差込印刷したいと思えば、ワードの「差込印刷」機能以外に、エクセル自体で行なうことは不可能でしょうか?

(例:請求データを請求書フォームに印刷)

ワードの差込印刷は便利ですが、エクセルデータ形式(特に金額のカンマ区切り表示が必要なため)を参照する際は、フィールド設定の数の制限が22列まで?で・・・行き詰っています(私は約40列あります)。

エクセル・ワードの操作は上級手前の操作まではいけますが、
エクセルでVBA、差込印刷マクロを作るとまではいけないもので・・・何か妙案がありましたらご教示願います・・・

Aベストアンサー

#01です。出血大サービスです(^^;
ただし不具合以外の修正はご自身でお願いします。
2行目~4行目と項目の定義の箇所は再度設定し直してください。

Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Sub InsPrint()
Const org As String = "Sheet1" '元データのシート名
Const prs As String = "Sheet2" '印刷するシート名
Const strt As Integer = 2 '元データの実データ開始行
Dim idx, fromL, toL As Long
Dim oSht, pSht As Worksheet
Dim res, res2
 Set oSht = Worksheets(org)
 Set pSht = Worksheets(prs)
 res = MsgBox("印刷行範囲を指定しますか?" & Chr(13) & _
  "はい:指定する、いいえ:指定しないで全件印刷、CANCEL:印刷しない", vbYesNoCancel)
 Select Case res
  Case Is = vbCancel
   Exit Sub
  Case Is = vbYes
   res2 = Application.InputBox("印刷開始行を半角数字で入力して下さい", Type:=1)
   If TypeName(res2) = "Boolean" Then
    MsgBox "印刷を中止しました", vbOKOnly
    Exit Sub
   Else
    If res2 >= strt And res2 <= oSht.Range("A65536").End(xlUp).Row Then
     fromL = res2
    Else
     MsgBox "開始行が不適切です。印刷を中止しました", vbOKOnly
     Exit Sub
    End If
   End If
   res2 = Application.InputBox("印刷する最終行を入力して下さい" & Chr(13) & _
     "99999を入力すると最終行まで印刷します", Type:=1)
   If TypeName(res2) = "Boolean" Then
    MsgBox "印刷を中止しました", vbOKOnly
    Exit Sub
   Else
    If res2 = 99999 Then
     toL = oSht.Range("A65536").End(xlUp).Row
    Else
     If res2 >= fromL And res2 <= oSht.Range("A65536").End(xlUp).Row Then
      toL = res2
     Else
      MsgBox "最終行が不適切です。印刷を中止しました", vbOKOnly
      Exit Sub
     End If
    End If
   End If
  Case Else
   fromL = strt
   toL = oSht.Range("A65536").End(xlUp).Row
 End Select

 For idx = fromL To toL
'以下の行を項目数だけコピーして定義する
  pSht.Range("A1").Value = oSht.Cells(idx, "A").Value
'
  pSht.PrintOut '印刷
'5頁につき8秒休止する
  If (idx Mod 5) = 0 Then
   DoEvents
   Sleep 8000
  End If
 Next idx
End Sub

#01です。出血大サービスです(^^;
ただし不具合以外の修正はご自身でお願いします。
2行目~4行目と項目の定義の箇所は再度設定し直してください。

Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Sub InsPrint()
Const org As String = "Sheet1" '元データのシート名
Const prs As String = "Sheet2" '印刷するシート名
Const strt As Integer = 2 '元データの実データ開始行
Dim idx, fromL, toL As Long
Dim oSht, pSht As Worksheet
Dim res, res2
 Set oSht = Works...続きを読む

Qエクセルで打ち込んだ数字を自動で別シートに表示したい

エクセルでセルに打ち込んだ数字を自動で別シートに表示できる方法があれば、教えてください。

例えば、シート1のC1に5を打ち込んだら、シート2のD2にシート1で打ち込んだ5が自動で表示される。

また1列すべてを自動で表示させる場合、一つのセルの時と違いがありましたら教えてください。よろしくお願いします。

Aベストアンサー

こんばんは。
入力したセルの値を合計とかでなくて、
純粋に別のシートに自動的に表示したいのであれば、
以下の方法があります。

1.1つのセルだけの場合
例)シート1のC1に5を打ち込んだら、
  シート2のD2にシート1で打ち込んだ5が自動で表示される

⇒シート2のD2のセルをアクティブにして「=」を入力
 した後、シート1のC1をクリックする。
 そうするとD2のセルに「=Sheet1!C1」と表示され、値が自動的に
 表示されるようになります。

2.1列全てコピーしたい場合。
  コピー&リンク貼り付けを使うと便利です。

例)例)シート1のC1~C5に何かを入力したら、
  シート2のD2~D7にシート1で打ち込んだものが自動で表示される

  シート1にあるコピー元のセルを範囲選択して、
  シート2のD2の上で「右クリック」⇒「形式を選択して貼り付け」
  をクリックします。

  そして出てきた小さな画面の左下にある「リンク貼り付け」という
  ボタンをクリックすると完成です。
  試してみてください。。

  念のためにリンク貼り付けを図解しているURLを載せておきます。
  参考にしてみてくださいね。。
  http://www.geocities.jp/office_inoue/excel/eq21.htm

こんばんは。
入力したセルの値を合計とかでなくて、
純粋に別のシートに自動的に表示したいのであれば、
以下の方法があります。

1.1つのセルだけの場合
例)シート1のC1に5を打ち込んだら、
  シート2のD2にシート1で打ち込んだ5が自動で表示される

⇒シート2のD2のセルをアクティブにして「=」を入力
 した後、シート1のC1をクリックする。
 そうするとD2のセルに「=Sheet1!C1」と表示され、値が自動的に
 表示されるようになります。

2.1列全てコピーしたい場合。
  コ...続きを読む

Q条件付き書式のやり方。隣のセルも色付け。

エクセル初心者です。

(1)B1に特定の文字が入力された場合特定の文字から隣のセル
6つ目まで(B~H)を特定した色になるようにしたいです。
条件付き書式で設定が可能かと思うのですが
やり方が分かりません。

「条件付き書式」→「新しい書式ルール」→「数式を使用して~」
のところで悩んで止まっています。
この設定ではできないのでしょうか?

(2)また、添付画像にはありませんが、たとえばB列のセルに
 「え」または「お」が入った場合、黄色にする、という設定は可能でしょうか?

(3)条件付き書式はいくつまで設定可能なのでしょうか?

どなたか回答お願いします

Aベストアンサー

NO2です。
もう一度、手順を整理します。
(1)色付け範囲を選択。(仮にB:Hを選択)
(2)「条件付き書式」→「新しい書式ルール」→「数式を使用して~」を選択→数式欄に=OR($B1="え",$B1="お")→書式→塗りつぶしタブで黄色を選択→OK

>最初の列しか色付けされない
 ⇒上記の数式欄で絶対参照記号の$が抜けているからです。

>同じ色をは使えない
 ⇒そのようなことはありません。

>(2)=OR($AC1="~)で色がつかない
 ⇒AC:AL列を選択→新しい書式ルール」→「数式を使用して~」を選択→数式欄に=OR($AC1="あ",$AC1="い",$AC1="う")→書式→塗りつぶしタブで色を選択→OK

因みに同一のセル範囲で条件を追加する場合、同一範囲を選択→「条件付き書式」→「ルールの管理」→「新規ルール」→「数式を使用して~」以下同じ

Q差し込み印刷で特定のデータだけを印刷したい

エクセルで作成した住所データを使って、
ワードで宛名印刷をしたいのです。
数十件のデータがあるのですが、例えば、会員の方だけ
印刷したい・・・という場合に
エクセルに項目を作ってマークか何かを入れておけば
そのマークが入っているものだけ印刷することは
可能でしょうか?
(筆まめは使ったことがあって、そういう機能があったのは
覚えているのですが、今回はワードとエクセルでしないと
いけないので・・・)
私だけでなく、パソコンに慣れてない他の人にもこれを
やってもらわないといけないので、なるべく簡単な方法が
あれば・・・と思っています。
よろしくお願いします。

Aベストアンサー

下記操作で会員(エクセル側に1をセット)だけラベルが作成されました。(WD2000,EX2000)
エクセルのテストデータとして
(A) (B) (C)
氏名住所会員
山田東京都1
上田埼玉県
下田栃木県1
中田神奈川県
青田千葉県1
「会員M.xls」で保存する。(例)
ワードに変わり
(1)ワードを開く
(2)ツール
(3)差し込み印刷ヘルパー
(4)(メイン文書)宛名ラベル
(5)作業中のフィールド
(6)(データファイル)データファイルを開く
(7)「会員M.xls」
(8)ワークシート全体-OK
(9)(ラベルオプション)KOKUYO2160ラベル(例)-OK
(10)差し込みフィールドの挿入
(11)ドロップダウンから住所、氏名、会員をクリック    しスペースや改行で各項目のラベル内の位置を決   める。
     <<住所>>
          <<氏名>>
                 <<会員>>
(12)クエリ・オプション
(13)ドロップダウンから会員をクリック
(14)演算子は=
(15)値を1と入れる。(1=会員)
(16)OK
(17)<<abc>>をクリック。確認。
東京都        | 栃木県     
   山田      |      下田             1   |        1
---------------------------------------
千葉県   |
   青田 |  
      1    |
となります。

下記操作で会員(エクセル側に1をセット)だけラベルが作成されました。(WD2000,EX2000)
エクセルのテストデータとして
(A) (B) (C)
氏名住所会員
山田東京都1
上田埼玉県
下田栃木県1
中田神奈川県
青田千葉県1
「会員M.xls」で保存する。(例)
ワードに変わり
(1)ワードを開く
(2)ツール
(3)差し込み印刷ヘルパー
(4)(メイン文書)宛名ラベル
(5)作業中のフィールド
(6)(データファイル)データファイルを開く
(7)「会員M.xls」
(8)...続きを読む

Q(Excel)あるセルに文字を入力しただけで、同じブック内のほかのワークシートにも、同じ文字が自動的に入るようにするには?

こんにちは。
質問内容はタイトルのとおりです。

あるワークシートのあるセルに文字を入力すると、ほかのワークシートのセルにも同じ文字が自動的に書き込まれる方法を知りたいです(ブックは同じ)。複数のワークシートを制御するには、やはりマクロを使うのでしょうか?

よろしくお願いします。

Aベストアンサー

clam_chowderさん、こんにちは。

Sheet1のA1にたとえば「100」と入力しますね。
Sheet2のA1に、これと同じ数値を表示するには、
 =Sheet1!A1
でOKです。

数式をいれるのが苦手なら、
Sheet2のA1セルで「=」を入力すると、数式入力状態に入りますから、
ここでSheet1のシートタブをクリックし、
リンクしたいA1セルをクリックしてEnterすると、
自動的にさきほどと同じ式が入ります。

Qエクセルからエクセルへの差込印刷

エクセルの差込印刷について質問です。

エクセルのデータをエクセルに差し込み、印刷する事は可能でしょうか?

ワードで手紙を作った際、あて先と名前だけ差込印刷で、
文章は全て同じのダイレクトメールを印刷する事ってありますよね。
そんなイメージです。エクセル2003を使用しております。

エクセルで作成したアンケートの氏名欄に、全社員の名前を入れて印刷したいのです。
アンケートの質問内容や名前は印刷して配り、印刷されたものに手書きで記入して
もらい、回収します。100枚程のアンケートを、対象者宛に配るのですが、対象者名を
差し込み印刷的な方法で印刷する事は可能かと思いまして…。

A列・1行に『氏名』 (氏名 ○○太郎 ←これの『氏名』です)

BCDEF列・1行をセルで結合し、そこへ名前を入れていきたいと思っております。

上記をシート1に、そして全社員名をシート2のA列に入力しています。

似たような質問を検索してみたのですが、エクセル素人な上に時間が無いもので、
こちらに質問させて頂きました。

どなたかご回答、宜しくお願い致します。

エクセルの差込印刷について質問です。

エクセルのデータをエクセルに差し込み、印刷する事は可能でしょうか?

ワードで手紙を作った際、あて先と名前だけ差込印刷で、
文章は全て同じのダイレクトメールを印刷する事ってありますよね。
そんなイメージです。エクセル2003を使用しております。

エクセルで作成したアンケートの氏名欄に、全社員の名前を入れて印刷したいのです。
アンケートの質問内容や名前は印刷して配り、印刷されたものに手書きで記入して
もらい、回収します。100枚程のアンケー...続きを読む

Aベストアンサー

EXCELだけでは差込印刷はできなかったと思います。
VBAを使うと出来るんですが、ちょっと難しいと思います。

VLOOKUP関数をご存知ですか?
それを駆使するとうまく出来るかもしれません。

VLOOKUPは覚えておくとすごくベンリですよ。
がんばってください。

http://www11.plala.or.jp/koma_Excel/contents3/mame3023/mame302301.html

参考URL:http://www11.plala.or.jp/koma_Excel/contents3/mame3023/mame302301.html

Qエクセルで、頭に0をつけて数字の桁を揃える方法

エクセルで、必ず5桁の数字を入れる列があるとします。
ところが、数値データとして最初に作っているので、0が頭になく桁が足りない場合があります。
任意文字として5桁の数字にしたいのですが、

何かいい方法はありませんでしょうか?

例)
A列 A列
50      00050
1000  ⇒  01000
11111    11111

どうぞよろしくお願いいたします。

Aベストアンサー

次の方法は如何でしょうか。
(1)表示だけで良いのならば、セルの書式設定→表示形式→ユーザ定義で00000を設定
(2)データとして必要ならば、空き列(仮にB列)B1に=TEXT(A1,"00000")を入力、下方向にコピー→B列をコピー→A列に形式を選択して貼り付けで「値」を選択→OK、B列を削除


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

人気Q&Aランキング