| |
▼Jaka さん：
こんな感じだったのですが。
マクロボタンを作ったSheetを残しておけば良かったですね・・・
▼an さん：
>▼ハチ さん：
>テンプレートファイルを作っていろいろなマクロ処理し、
>そのテンプレートファイルの中の4枚のシートをコピーして
>保存後、特定の数人に添付ファイルで送る操作を毎月しています。
>（今回の質問もその処理のうちの一つです）
>そこでですが、印刷マクロ（モジュール）も添付ファイルに
>コピーして送ることは出来ますか？
>ボタンを押したら各シート一度に印刷できるようにしたいのです。
>お分かりでしたらアドバイス頂けると助かります。
Excel2002以降はVBprojectの操作は、基本的にはできません。
印刷モジュールを記載済みのテンプレートを作って
そこにコピーしてはどうでしょうか？
>With Sheets(Array("abc", "def", "ghi", "jkl")).Copy
テンプレ上には、Sheet 1枚にしておいて、
Sheets(Array("abc", "def", "ghi", "jkl")).Copy After:= _
Workbooks.Add(Template:="ここにテンプレート名").Worksheets(1)
WorkSheets(1).Delete
AddしたタイミングでActiveなBookが切り替わる（試してないんですが・・）かも
しれませんからSheets(Array("abc・・ の前に
オブジェクト名（ThisWorkbook. など）を入れておいたほうがいいかも知れません。
|
|
ハチ
- 06/6/8(木) 12:47 -
