エクセルで困っています

質問

こんにちは
いつも皆様方に大変お世話になっております。
エクセルで下記条件を解決する方法はありますでしょうか？
仕事で使用するのに大変困っております。

条件(1)　お客様からメールにてエクセルファイルが届きます

条件(2)　１エクセルファイル（ファイル名は固定）に
　　　　シートが複数存在し、
　　　　それぞれシート名は、バラバラです
　　　　例）123456・・・456545など

条件(3)　シートにはお客様からの製品を作る際の仕様書と
　　　　　私が仕事上使用する指示書が存在します
　　　　　※仕様書と指示書のセル位置は固定です

条件(4)　お客様から送られてくるエクセルファイルを開かずに
　　　　　プリンター出力（私が使用する指示書のみ出力）

ちなみに一日に送られてくるファイル数が100近くあり、
作業効率上とても時間がかかり大変困っています

私が使用する分も印刷設定とお願いしたいのですが、
お客様側で仕様書のみを使用するのでとても言いにくいのです。

何とかしたいのですが・・・・。

ご回答お願いいたします

回答No.3

hana-hana3 · ベストアンサー

基本機能のみです。
適当なブックに下記のマクロをコピーして保存します。

「受注.xls」は、送られてくるファイル名を入れて下さい。
「AA2:BP29」は、印刷範囲を記入。

印刷範囲や印刷サイズが解らないので、用紙の無駄があるかも知れません。その場合「'印刷設定」と書かれた部分に各種の印刷オプションの設定が必要かも知れません。

使用方法
(1)マクロが入ったブックを開く
（動作に問題が無ければ個人マクロに登録してしまえば良いでしょう）
(2)メール添付のファイルを開く
(3)マクロ実行

Sub OderPrint()
Dim sht As Worksheet

For Each sht In Workbooks("受注.xls").Worksheets
With sht
'印刷設定
.PageSetup.PrintArea = "AA2:BP29"
.PrintOut
End With
Next
Workbooks("受注.xls").Close
End Sub

お礼

大変遅くなり申し訳御座いませんでした。
何とか無事解決できました
有難う御座います。

また何か御座いましたらよろしくお願い致します。

回答No.2

hana-hana3

＞セルの範囲指定ではダメでしょうか？　

別々のシートになっているのかと思っていましたが、同一のシートに仕様書と指示書（それぞれ固定範囲）があると言う事ですか？

補足

早速のお答えありがとうございます。

そうなんです同一のシートで仕様書の範囲と指示書の範囲（それぞれ
固定）になっているのです。

ファイルが送られて来るたびにそれぞれ毎回印刷範囲を指定しなおさないとダメなのです。

当初予定では１ファイル１シートだったのですが、
お客様よりそれでは、使用が困難とクレームを受けてしまい
同一のシートになってしまいました・・・・。

休み明けにはいつも以上にオーダーが来ると言われておりますので
どうしたら良いのかと悩んでいるしだいです・・・。

どうかお力をお貸しください。
お願いいたします。

回答No.1

hana-hana3

＞条件(4)　お客様から送られてくるエクセルファイルを開かずに

これは不可能です。
仕様書と指示書の区別（セルの文字等）が解ればＶＢＡから可能かと思います。

補足

早速のご回答ありがとうございます。
ファイルを開かないのは、やはりむりなんですか・・・・。

＞仕様書と指示書の区別（セルの文字等）が解ればＶＢＡから可能かと思います。
↑
セルの範囲指定ではダメでしょうか？　
例えば、セルAA2:BP29など・・・。

申し訳ございませんがもう一度ご回答願います。