• ベストアンサー

VBAで2シートあるデータを一度に印刷する方法

fumufumu_2006の回答

回答No.3

処理したいシート数が10個以内くらいなら・・・ 素人さんが操作するなら、各シートを印刷するボタン+全部を印刷するボタンの方が確実に説明の手間が省けますよ。 各ボタンを押したら「印刷済み」と表示してあげた方が使いやすいと思います。 ただ、印刷失敗と言う場合があるので、印刷済みは印刷できなくするのはやめた方がいいかと思います。 既に決まった「仕様」なら別ですが・・・ 質問とは関係なくてすみません。

creopatra
質問者

お礼

実際印刷したいシートは2枚なんです・・・ ただ使うときによって一枚必要だったり二枚必要だったりするんです・・・

関連するQ&A

  • VBAの印刷について教えてください

    私は、VBAを始めて、まだ3日目の初心者ですので、詳しく教えて下さい。 エクセルの1つのブックの中にシートが10枚あるのですが、シートに印刷ボタンを表示して、ボタンを押したときに、シート1,4,5の印刷ボタンと、また、違う印刷ボタンを押したときにシート2.3、6が印刷されるようにしたいと思っていますので、よろしくお願いします。

  • VBAで印刷時各シートをページに変換

    VBA初心者です。よろしくお願いします。 エクセルのVBAでやりたいことは下記事項です。 (1)csvファイルを読み込みシート1に展開する。 (2)シート1のデータをシート2に埋め込みグラフを作成する。 (3)シート3にシート2の部分的に拡大した埋め込みグラフを作成する。 (4)シート4に運転時の各設定値を表作成する。 (5)シート2から4までを選択したプリンタで印刷する。印刷はプリンタのプロパティ切り替えで両面印刷もできる。 ざっと、上記のことをやりたいのですが、なんとかインターネット等で調べて(1)から(4)までは動作するプログラムができましたが(5)のシート2から4までを選択したプリンタで印刷することは1ページに1シート片面印刷はできるのですが両面印刷でシート2から4までを印刷する部分が分かりません。 シート2,3はグラフなので用紙いっぱいに印刷したい。 どうすればよいか皆様ご教授よろしくお願いします。                                      以上

  • 〔EXCEL VBA〕で「第1のシート」のデータを「第2のシート」に転

    〔EXCEL VBA〕で「第1のシート」のデータを「第2のシート」に転記する方法 EXCEL2003でデータが480行/65列ある第1のシート(データベース的)があります。 第1のシートの列にデータが入力されている場合のみ、第2シートの指定されたセルに検索した列の 表題と検索したデータを結合して転記したいのですが良い方法が分りません。 その際、各行毎に検索し空白列は第2のシ-トに転記せず左詰めにして転記したいのですが・・・・ 初心者に合せたご教示をお願いします。 また、Excel VBAの短期マスター法が御座いましたら合せて教示願います。 以上、宜しくお願い致します。

  • ACCESS VBA マクロ  Excelのデータをインポートする(複数シート)

    ACCESSのVBAでEXCELのシートにあるデータをインポートしたいです。シートは複数あり、シート数は作業毎に一定ではありません。データの数もシート毎に違います。(項目(column数)は全部同じです) 手作業でインポートをすると、どのシートのデータをインポートするかウイザードで選択しますが、シート数が多いので一度に同じテーブルにインポートをするVBAを組みたいのです。(データ数が多いのでエクセルで一つのシートにまとめる事が出来ません。) シート数がその都度違うので変数を使ったりVBAでインポートするのかな?と思うのですが。。。 インポートするベースのテーブルは先に作ってあり、データをインポートする際にそのテーブルに追加する形にしたいと思っています。 excelのVBAは初心者ですがAccessでのVBAの経験がありません。 ACCESSでのマクロ、VBAを良くご存知の方がいらっしゃったら是非教えてください。どうぞよろしくお願いいたします。

  • エクセルVBA シートから抽出して伝票に印刷

    初心者です。 エクセル2010を使用しています。 シート1(出庫台帳)にあるデータを、シート2(出庫依頼票)に転機させて印刷をしたいと思っています。 シート1にデータを毎日入力していくのですが、1行入力するごとに、シート1内に作成した印刷ボタンを押すと、その時一番下にある行(一番新しいデータ)が出庫依頼票に転機され、印刷プレビューがでるようにしたいのですが、どうしてもできません。 また、フォームからボタンを作りたいのですが、どこにあるのか探せません。 イメージを添付してみました。 どなたか、どうか教えてください。

  • エクセルで、特定のシートを印刷するVBA

    VBA初心者です。下記が可能か否かどなたか教えていただけませんか。 【内容】  一つのエクセルファイルに複数シートあるとします。(シート0~シート5まで)  「シート0」のトップページに選択ボタンをもうけて、それを押下したら、特定のシート「シート3」を印刷するのようなモノを作りたいと考えています。※ただし条件として、シートは「シート0」のままでその印刷処理を行いたいのです。(一度もシート3にいくことなく) 【今までの試み】 1.調べて下記のようなものを作ってみました。 Sub 特定シート印刷() Dim sh As Worksheet For Each sh In Worksheets If sh.Name Like "シート3" Then sh.PrintOut End If Next End Sub ただし、これだと、シート3のページに飛んで、印刷してしまいました。 2.次にマクロの記録で、マウス軌跡の実行を試みました。 具体的には、シート3をCtrlキーを押しながら選択し、ファイル→ 印刷→「選択したシートを印刷」を選択し実行しました。 この場合はシート0とシート3の両方が印刷されてしまい、希望通りにいきません。 そもそも、私の望んでいること自体が不可能なのか、 またそうでなければその解決方法をどなたか教えていただけないでしょうか。

  • EXCEL VBA 印刷時にメッセージ表示

    初めまして、こんにちは。 EXCEL VBA初心者で少々困っております。 EXCEL VBAを使い、ボタンに印刷するマクロを登録しました。 ボタンを押すと、指定の帳票が印刷できるようにはできたのですが、 追加の機能を盛り込みたいと思っています。 印刷する際、内容がいくつかあるので、それぞれテンプレートを作成したのですが、 印刷する内容がテンプレートそのままの場合は、メッセージボックスでメッセージを表示し、 印刷処理を中止するようにしたいのです。 テンプレートの内容は数量等が入るので、「○個」などとなっており、 数量などを適宜正しい値に変更した上で印刷処理をしたいため、 テンプレートのままの場合はNGとしたいです。 拙い説明で申し訳ございませんが、ご教示頂けますと助かります。 よろしくお願い致します。

  • 元データのシートにあるボタンを押すと、後ろのシートにデータをそのままコピーされてシートが追加できるようにしたい

    大変困っています。 会員マスタという元データを作成し、そのシートに「シート追加」という ボタンを作りました。 そのボタンを押すと、元データのシートの後ろにそのまま同じデータがコピーされて追加される様にVBAで設定したいです。 ・行などはずれない様に設定したい。 ・シート名は変更できるようにしたい。 ・コピーして追加したシートにはボタンは表示されないようにしたい。 急いでます。知恵を貸してください。

  • エクセルのデータをまとめて印刷

    一つのフォルダの中に複数のエクセルのデータがあります。さらにその一つ一つに複数のシートがあります。 このフォルダ下のエクセルデータ(全てのシート)を一括印刷したい場合どうすればいいのでしょうか? 色々調べたらそのフォルダのウィンドウの開いて、印刷したいエクセルのデータを選択して「ファイル」⇒「印刷」とすれば複数のエクセルデータを印刷できるのは分かっています。 けれど、このやり方だと全シートは無理ですよね? 何か良い方法を教えてください。 よろしくお願いします。

  • VLOOKUPとVBAを使っての複数のデータの一括印刷について

    パソコンにそれほど詳しくないものです。よろしくお願いします。 以下のようなことが可能かどうか、また、可能であれば方法を教えていただきたいのですが・・・ まず、エクセルのシート2には各店舗のデータがそれぞれ入っています。そしてシート1に表紙を作り、各店舗の店番号をA1セルに入力すと、シート2のデータより売上などをVLOOKUPで引き込むように設定してあります。この方法でやると、印刷の際に一店舗ずつ入力してから印刷をしないといけないのですが、任意の複数店舗の番号を入力するとその店舗分が一括で印刷できるVBAなどは無いでしょうか・・・ 例えば、1~10までの店舗番号があったときに、1、4、6を入力することで3店舗分が印刷されるようにしたいのですが・・・ よろしくお願いします。