Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1339 / 13658 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【75069】連続印刷について 爽茶 13/12/6(金) 23:42 質問[未読]
【75070】Re:連続印刷について HARA 13/12/7(土) 8:29 発言[未読]
【75072】Re:連続印刷について 爽茶 13/12/8(日) 23:02 お礼[未読]
【75074】Re:連続印刷について HARA 13/12/9(月) 8:58 発言[未読]
【75069】連続印刷について
質問  爽茶  - 13/12/6(金) 23:42 -
引用なし
パスワード
   仕事の書類作成を簡素化したいと考えております。

現在提出してい報告書のフォームが固定となっております。

そこで、簡素化したいと思いVBAを使用し印刷ボタンを作成しました。

1.　VlookUP関数を使い、ページ番号を変えることにより報告書の内容を
　　変化させています。（入力データからすべてジャンプ）

2.　For〜Nextを使用ページ番号を変えて印刷をするBVAを作成しました。
　　（初歩かもしれませんが・・・・VBAを勉強したことはなく、インターネットの力を使いました（笑）

知りたいこと

　印刷する前にダイアログボックスを開きプリンタの種類、プレビュー確認をしたいです。


下記は連続印刷をするために作成しました。
For No = 2 To a
With Worksheets("報告書")　　　　　　　　
　.Range("U1").Value = No　　
　 .PrintOut　　　　　　　　
End With　　　　　　
Next No
【75070】Re:連続印刷について
発言  HARA  - 13/12/7(土) 8:29 -
引用なし
パスワード
   >　印刷する前にダイアログボックスを開きプリンタの種類、プレビュー確認をしたいです。
　　.printpreview
　 .PrintOut　　　　　　　　
でボタンを押したらどうでしょうか
【75072】Re:連続印刷について
お礼  爽茶  - 13/12/8(日) 23:02 -
引用なし
パスワード
   HARAさんご教示ありがとうございます。
プレビューを一つずつ確認することは可能ですが、
データ全体を一括プレビューすることが出来ないかなぁと考えております。


▼HARA さん：
>>　印刷する前にダイアログボックスを開きプリンタの種類、プレビュー確認をしたいです。
>　　.printpreview
> 　 .PrintOut　　　　　　　　
>でボタンを押したらどうでしょうか
【75074】Re:連続印刷について
発言  HARA  - 13/12/9(月) 8:58 -
引用なし
パスワード
   シートを分けるか、ページを複数にすればよいのではないでしょうか。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1339 / 13658 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free