• 締切済み

Excelの部数印刷での部番号表示

初めまして。 どうしてもわかないので皆様に協力して頂ければと思います。 1部3ないし4ページになるアンケート調査の質問紙を印刷したいのですが、 各部ごとにIDを振りたいと考えています。 そのIDに部番号のようなものがあればそれを印刷し、と思っていたのですが、標準の印刷機能ではどうも不可能なようで、VBA?を調べてみたのですが、私には分かりませんでした。 VBAで可能なのでしょうか?皆様のお力をお貸し下さい。 よろしくお願いいたします。

みんなの回答

  • mu2011
  • ベストアンサー率38% (1910/4994)
回答No.2

>1部3ないし4ページになるアンケート調査の質問紙を印刷したいのですが、 >各部ごとにIDを振りたいと考えています。  ⇒何故、VBAにハードルを上げる必要があるのかを明示した方が回答が付き易い。   因みに部番号の意味がよく分からないですが、ページ単位にシートを分けては駄目なんで   しょうか。   例えば、ヘッダとかフッダにID情報を設定するとか?

全文を見る
すると、全ての回答が全文表示されます。
  • keithin
  • ベストアンサー率66% (5278/7940)
回答No.1

>各部ごとにIDを振りたいと考えています。 >そのIDに部番号のようなものがあればそれを印刷 何を言いたいのかサッパリ判りませんが,たとえば次のようにマクロを組んでみます。 sub macro1()  for i = 1 to 10  Range("G1") = "No." & i  activesheet.printout  next i end sub 実行すると,G1セルにNo.1からNo.10までの通し番号を記入した印刷物が計10部出てきます。

全文を見る
すると、全ての回答が全文表示されます。

関連するQ&A

  • excelシートの部数印刷でのページ番号表示

    初めまして。どうしてもわかないので皆様にお世話になれればありがたいと思います。 EXCELのページ番号ですが、部数印刷した場合でも連番で表示される機能もしくはVBAなどありますか?  1シート1ページを10枚印刷した場合にページ番号が連番表示されるということです。  お力を貸してください。宜しくお願いします。

  • 部数をページ番号のように印刷したい

    資料を何部印刷したのかが、ページ番号のように印字できればよいと思うのですが、何かよい方法はありませんでしょうか?

  • Excelで印刷設定をした後に部数の連番を印刷

    おそらくVBAを使うことになると思いますが、やりたいことは、 シートを1ページ印刷します。 それを例えば10部印刷します。 合計10枚出力します。 そのときに用紙サイズや用紙種類を指定して、 10部の連番を一枚ずつのページに印刷されるようにしたいです。 例えば、 1枚目:1/10 2枚目:2/10 ・・・ 10枚目:10/10 ちなみに部数印刷の場合なので ヘッター/フッターでは出来なそうです。 素人ながらに検索しましたら、 部数を印刷するVBAは見つかりました。 http://okwave.jp/qa/q2909328.html このマクロではそのまま印刷が始まってしまいますが、 印刷が始まる前に、用紙の設定等をしたいのです。 よろしくお願い致します!

  • Word 印刷部数を挿入

    4ページで構成されたWordファイルを、16部印刷します。 印刷時に、印刷部数の番号をページに挿入する事は可能でしょうか?

  • Excelアンケート用紙に学校名と通し番号を連続印刷したい

    学校向けのアンケート用紙を作成しています。 学校ごとに通し番号をつけて連続印刷する方法を教えてください。 利用したいデータは次の2つです。 1) アンケート用紙(Excel) 2) 学校リスト(Excel) 1) のアンケート用紙には、 ・「学校」欄 ・「整理番号」欄 があって、そこに、学校名と学校ごとの通し番号を印字して、連続印刷したいと考えています。 2) の学校リストには以下のような項目があります。 学校名 調査人数 A学校 30 B学校 20 C学校 50  :   : このデータを利用して、A学校分のアンケート用紙には、「学校」欄にA学校の名が印字され、 「整理番号」欄には、1から30までの通し番号が印字された用紙を30枚分、 同様にB学校分は、B学校名と1から20までの通し番号を印字したものを20枚、 ・・・というように、すべての学校のアンケート用紙を一気に連続印刷したいのです。 ちなみに、VBAに関しては全くの素人です。 はじめは、Excelで作成したアンケート用紙をWordに画像として貼り付けて、学校欄と整理番号欄をWord文書上に設けて差込印刷でやろうとしていました。 ですが、それだと調査人数をもとにして通し番号を振ることができず、ギブアップしました。 おそらくマクロを使うのだと思いますが、もし、マクロを使わなくてもすむ方法があれば、それも教えていただきたく、よろしくお願いします。

  • Wordでページ番号を増やして印刷するには…

    Wordで1ページのアンケート用紙を作り、印刷する枚数の分だけフッダーのページ番号を増やしていきたいと思っています。 しかし、現在の設定では2枚印刷すると、2枚ともページ番号が1のままです。 同じ内容のページを何枚もコピペして作り印刷する以外に、ページ番号だけ増やして印刷する方法はありますか。Wordは2007のバージョンです、お願いします。

  • Excelで1部印刷する毎に連番を2箇所つけたい

    Excelで1ページに同じ表を2つ作成し、それぞれに連番を振って印刷した後に切り離して利用したいと考えています。 連番の位置の都合上、ヘッダーやフッターの機能では対応できません。 例えば、表1、表2を1ページに作成し、表1内のセルA1に「1」、表2内のセルA10に「2」と入力し、10部印刷したとします。 1部目は表1のA1の場所に「1」、表2のA10の場所に「2」と印刷され、2部目は表1に「3」、表2に「4」と印刷される、といった具合で、10部目は表1に「9」、表2に「10」となります。 また、A1に「5」、A10に「6」と入力した状態で印刷した場合は、1部目は表1に「5」、表2に「6」、2部目は表1に「7」、表2に「8」となりようにしたいです。 解決策を検索すると、マクロを開いて印刷部数を直接記述する方法がありますが、その作業ができない人も印刷するため、単純に表1、表2にスタート時の番号を入れておけば、後は印刷した部数分、自動で番号が1ずつ増えていくようにしたいです。 ボタンを設置してマクロを実行する形は問題ないと思います。 環境はExcel2010、Windows7です。 説明がややこしくなりましてすみません。 どなたかご教示のほど、よろしくお願いします。

  • エクセルで指定したセルにページ番号を表示して印刷する方法

    エクセルで1枚のシートを複数枚印刷時に指定したセルにページ番号を表示させるにはどのようにしたら宜しいのでしょうか? 使用目的は、印刷されたプリントに『11-001』や『11-112』と表示したいと考えてます。 ここで『11』はそのプリントを使用する月で『001』や『002』は使用したプリントを把握する為につけた通し番号としたいと考えてます。 可能であれば併せて途中の番号からの印刷方法もご教示頂けますと幸いです。 また、恥ずかしながらVBAの使用環境はありますが、未経験です。 可能でしょうか?

  • エクセルの印刷について

    エクセルの印刷についていつも困っているので質問します。 例えば   A   B    C 1  名前  住所  電話番号 2  山田  山田町 12-3456 3  田中  田中町 1-23456 4  鈴木  鈴木町 123-456   といった表があるとします。A4の用紙に印刷したい場合 このような表を印刷プレビューで表示するとなると、 左上の方に表示され、 設定で拡大縮小機能を使い大きくする必要があります。 しかしセルを大きくしたり拡大縮小機能や 改ページプレビューを使わずに 自分の入力したセルだけ 表示する方法があれば教えてください。 また、VBAでも可能でしょうか?

  • エクセルを印刷時のページ番号

    どうもこんにちわ。 ご質問を1つさせていただきます。 お分かりになる方いらっしゃいましたら宜しくお願い致します。 エクセルについての質問です。 1つのエクセルに現在カテゴリーわけしたシートが10個あります。 それを印刷したときにページ番号が自動的に連番になるようにしたいのです。 1枚目のシートをページ番号が入るように印刷すると普通にページ番号が入るのですが、2枚目のシートを印刷したときには、また1からの番号になってしまいます。これをシートが変わっても一枚目のシートからの連番にする方法はないでしょうか? また、今後各シートのページ数が増えて行くと思うのですが、それも反映されつつ番号が増えていけばいいなと思っております。 説明がわかりにくいようでしたら随時付け足しは行っていきます。 お分かりになる方がいましたらご教授宜しくお願い致します。

このQ&Aのポイント
  • 基礎体温をつけているけど、排卵日が分からない
  • アプリの予測では9月3日が排卵予定日
  • 9月20日が生理予定日です
回答を見る

専門家に質問してみよう