- ベストアンサー
excelのマクロで印刷
まず印刷のシートがいくつであるか入力するメッセージボックスが出てきて、その後それらのシート内の一部分を削除する場合があるので削除するかどうかのメッセージボックスが出てきてから印刷するものを作りたいのですがどうすればいいですか?宜しくお願いします。
- みんなの回答 (4)
- 専門家の回答
関連するQ&A
- エクセルのマクロ印刷について
ある経費精算書を作っています。 シート1に入力フォーム。シート2に印刷用フォームです。 シート1には、入力もれがないように、すべて入力された場合のみにあるセルに「OK」とでるように設定しました。 「OK」になったときのみ、印刷可能にしたいのですが・・・ できれば、「OK」じゃないときに印刷しようとすると「エラーのため印刷できません」等のメッセージをだしたいのですが・・・ また、シート1は印刷できず、シート2の印刷フォームのみ常に印刷するようにしたいのです。(印刷用ボタン作成するつもりですが) ぜひぜひ教えてください。
- ベストアンサー
- オフィス系ソフト
- エクセルのマクロで、印刷設定をしたいのですが可能でしょうか?
エクセルのマクロで、印刷設定をしたいのですが可能でしょうか? お世話になっています。 会社での作業を少しでも効率よく出来ないものかと、以下のようなことを考えています。 エクセル2003を使用していますが、下記のような動作をするマクロを組むことは可能でしょうか? よろしくご教授ください。 Sheet1は、入力用のシートとして使っています。 Sheet2は、Sheet1に入力された商品データなどから、必要な箇所のみ反映されるように設定しています。 このシートは、罫線などが存在し表形式になっており、全てを印刷するとA4用紙6枚分になります。 そこで、Sheet1(入力用のシート)のJ18セルに文字が入力された場合は、Sheet2(印刷用のシート)の1ページだけを印刷したく、Sheet1のj27セルに文字が入力された場合は、Sheet2の2ページまで・・・ Sheet1のJ36に文字が入力された場合は、Sheet2の3ページまでという風に印刷範囲を設定しなくても印刷出来るようにしたいのです。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルから、ワードを印刷する【マクロ】について
タイトルの件、下記のとおり質問いたします。 【前提】 ●エクセルに、Sheet1、Sheet2がある ●ワードの文書1がある ●上記2つのファイルは同じフォルダにある。 ●エクセルのSheet1の情報は、ワード文書へリンクされている。 例:エクセルのSheet1のA1セルに、「あいうえお」と入力すると、ワード文書1の任意の部分に 「あいうえお」と反映される「ワードを開かなくても」 【質問】 エクセルにて、下記の印刷できるマクロがほしいです。 ●エクセル、Sheet1、Sheet2、ワード文書1を印刷できるマクロを、エクセル側にほしい。 ●エクセルは開くが、ワードは閉じたまま、印刷したい。 ●印刷するときに、ワードにて、「文書は変更されています。保存しますか?」というメッセージが 出ないようにして、印刷をしたい。 ご存知の方、いらっしゃいましたら、宜しくお願いします。
- ベストアンサー
- その他MS Office製品
- マクロを使って印刷したい
まず、印刷対象のシートを複数作成しておきます。 印刷メニューとして設けているシートに、チェックボックスを印刷対象の分作り、印刷したい物にチェックを付け、 ボタンを押すと対象のシートが印刷されるようにしたいです。 また、出来れば複数チェックして印刷をする場合に、チェックを付けた順番通りに印刷されるようにするのは可能でしょうか? (印刷後に紙をソートするのが面倒なもので…) 初心者ですいません。
- 締切済み
- Visual Basic
- 複数のマクロを条件付きで実行する
会社でエクセル2003を使っています。 縦にデータを入力する表を作りました。 (1)氏名 (2)〒 (3)住所 (4)電話番号 (5)生年月日 (6)性別・・・など20項目を入力します。 入力完了後、別シートにデータを転記してそちらの別シートを印刷するというマクロを作りました。 ★ 例えば、その中で入力を絶対してほしい項目がありまして、それを忘れていたらメッセージボックスで「○○が未入力です」とお知らせしたいと思ってます。 ★←このマクロは、昨日質問させていただいて、クリアになりました。 もう一つのマクロ(コード?)を教えていただきたいのです。 未入力のセルがあればメッセージボックスが出て、未入力のセルを知らせて未入力をなくします。 未入力がなくなった段階で、同じファイルの別シートに移りたいのです。 (1)未入力のセルがあればメッセージボックスで知らせて、そのままのシート(Sheet1)にとどまって未入力セルにデータを入力する。 (2)隣のシート(Sheet2)にジャンプする 今はcall macro01(メッセージボックス)、call macro02(隣のシートへジャンプ) としているのですが、メッセージボックスが出て「OK」ボタンをクリックすると未入力のセルがあっても、Sheet2に飛んでしまいます。 未入力のセルがあれば、メッセージボックスが出てそのシートに留まり 未入力がなければ隣のシートに移る…というマクロ(コード?) 同じ事ばかり書いていますが、なにとぞ、よろしくお願いします。
- ベストアンサー
- Excel(エクセル)
- 教えて!エクセルでの印刷マクロ
シート1に下のようなデータベースがあります。 受付番号 氏名 〒 住所 1 2 3 データを1から順に入力して、入力内容が日によって違いがあるのですが、入力した分だけ印刷できるマクロがわかりません。 前日、1から15まで入力して印刷、今日は16から50まで入力して、その分(16~50まで)を印刷(前日印刷した分は印刷しない)、次の日は50件入力(印刷は51~100まで)となるようなマクロです。 どなたか、ご教授くださいませ。
- ベストアンサー
- オフィス系ソフト
- エクセルでまとめて印刷する
教えてください。 エクセルで差込印刷のようにプリントアウトさせるマクロをかいています。 for i=0 to 99 ~印刷シートにデータを入力~ ActiveWindow.SelectedSheets.PrintOut Copies:=1 next このように記述するとPrintOutの関数のところにくるたびに「印刷中」のメッセージボックスが計100回もでてきます。 また、共有のプリンタで二人で同時に行ってしまったら、二人の印刷物が間に割り込んでしまったりするのですよ。 まとめてプリンタに送信することは可能なのでしょうか。 また、メッセージボックスを出なくする方法ってあるのでしょうか? エクセルで普通に複数枚印刷かけるとステータスバーにプリンタのアイコンと印刷枚数がカウントされるようなアニメが表示されます。あんな感じでできないのでしょうか? どなたか教えてください。 よろしくお願いします。 (office2000を使用)
- 締切済み
- オフィス系ソフト
- excelの印刷用マクロ。
excelで分からない事があり困っています。 横がA~I列、縦がB列のB-1から文字が入力されている最後の行までの範囲を選択して、印刷するマクロを作りたいのですが、どうすればよろしいでしょうか。印刷したいシートには、オートフィルタが掛かっている場合もあります。その場合は、その状態のまま印刷出来る様にしたいです。 どなたか分かる方が居ましたら回答お待ちしています。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセル マクロで印刷
こんにちは、いつもお世話になっております。 毎月作業していて何とかならないかと思い立った作業が2つあるのですが当方では全く歯が立たたない要求ですのでHELPです。 1.1つのBookの複数のシートの印刷 エクセルBookの複数のシート名の一覧表を「Sheet1」に目次のように作って、そのシート名を選択(☑や「印刷」等入力)すると指定したシートが印刷されるようにしたいのですが。 選択するシートは任意の複数枚。 シートを選択しての印刷は出来るのですが、できれば一覧表からの選択で印刷できるようにしたい。 2.エクセルBookのSheet 1に、他の複数のBookのフルパスが入っている目次にチェックを入れると任意の複数枚のシートが印刷される。 複数のBookの複数シート名指定で印刷出来れば最高です 1.2どちらか1つでもHELP頂けたらありがたいですので宜しくお願い致します。 尚、この作業は月報用、つまり月一回の作業なので当方にとってあまりハードルが高いようならすぐに諦めますのでご回答者様に失礼になるかもしれませんのでご了承下さい。 最近眼が著しくしょぼくなってきておりまして、出来るだけ頑張りますのでご容赦ください。
- ベストアンサー
- Excel(エクセル)
- エクセルのマクロについて
エクセルのマクロ初心者です。 マクロを使用して印刷プレビューが見れるようにしたいです。 vlookup関数を使いsheet1に入力し、sheet2,sheet3,sheet4、sheet5へデータを反映させています。 sheet1に入力画面を作成してあり、セルA2~A13に入力すればsheet2へ、セルA17~A28はsheet3へ、セルF2~F13はsheet4へ、セルF17~F28はsheet5へデータを反映する作りです。 sheet2~sheet5はフォーマットを作成してあり、印刷するとA4で2枚印刷されるようになっています。 入力画面で入力した内容によってはA4用紙1枚ですむこともあります。(A1~M15でA4用紙一枚、A1~M31でA4用紙2枚) 教えて頂きたいことは。 ・入力画面にマクロのボタンを設置し、ボタンをクリックすると印刷プレビューが表示されるようにしたいです。 ・sheet2用、sheet3用、sheet4用、sheet5用、とボタンを設置したい。 ・印刷プレビュー後に、(実際には印刷後)に入力画面を表示したい。 ・印刷プレビューが見たいのはsheet2,sheet3,sheet4,sheet5です。 以上です。 説明が下手ですみません><
- ベストアンサー
- オフィス系ソフト
補足
参考にさせていただき下記のようにつくりましたがSheets("Z").Selectの所でつまづいてしまいました。 どうかえればいいですか? X = InputBox("何件ですか? (1 ~ 20)", "件数") Z = 1 If X <= 20 Then Y = MsgBox("削除しますか?", vbYesNo + vbQuestion) Do Until Z > X Sheets("Z").Select If Y = vbYes Then Range("O4:S4").Select Selection.ClearContents Range("J10:M10").Select Selection.ClearContents ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Else ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True End If Z = Z + 1 Loop End If End Sub