- ベストアンサー
エクセル マクロ 印刷指定
- エクセルのマクロを使って印刷を指定する方法について解説します。
- マクロの記録を使って連絡票、予定表、配車表を順番に印刷するマクロを作成しましたが、2番目のシートからの印刷ができません。解決方法を教えてください。
- 連絡票、予定表、配車表の各シートから印刷範囲を指定する方法について詳しく説明します。
- sakuraY
- お礼率25% (1/4)
- Excel（エクセル）
- 回答数4
- ありがとう数1
- みんなの回答 （4）
- 専門家の回答
質問者が選んだベストアンサー
> 配車表シート（上記"連絡票"とありますが）のr1 > セル値のシートを開く。 > ということをしたかったのでした。 str = Worksheets("配車表").Range("r1").Value MsgBox str にして正しいシート名になっているか確認してください。 エラーになった場合、エラーメッセージを書いていると分かりやすいこともあります。
その他の回答 (3)
- kkkkkm
- ベストアンサー率66% (1719/2589)
回答No.1回答No.3の補足です。 言いたいことは それぞれセルの値が正しければ、正常に動きますので、セルの値を確認してください。 ということです。 それぞれのセルの値を MsgBox で見てみてください。
- imogasi
- ベストアンサー率27% (4737/17069)
>マクロの記録を使って、 普通は「マクロの記録を使って」、は勉強に有効と思うが、印刷に関しては色んな引数がすべて出てきたりして、理解がややこしくなる。最低限、効いている引数（指定すべき引数）はなになのか、わかりにくい。 ＝＝ この質問も回答者に読み解かせている質問だが、 やりたいことを文章で書けるようになるのが、必須だろう。 ＞ActiveWindow.SelectedSheets など、ActiveWindow.の問題にするべき課題か？ 印刷するデータシート名、印刷する範囲、印刷形式など特殊事項や注意事項 をシートごとに文章で、列挙して質問すべくでしょう。 ＝＝ 掲示するVBAコードややり方について、ベテランならば、そうするやり方に合理性もあり、その線で回答すべきでしょうが、質問者は初心者らしく、こういう場合は自分のやった方法は、まずは封印するとかや参考に載せ、もくてきを別途目的を明確にして、一から聞く方がよいと、いつも感じる。 コードの添削は、技量的にも難しく、時間が掛かって大変なんだ。
- kkkkkm
- ベストアンサー率66% (1719/2589)
セルの指定が Range("y1").Value Range("z2").Value となってますがあってますでしょうか。
補足
ありがとうございます。 連絡票シートのp1セル値からq1セル値までを印刷 予定表シートのy1セル値からz2セル値までを印刷 配車表シートのs1セル値からt2セル値までを印刷。 最後にDim str As String str = Worksheets("連絡票").Range("r1") Worksheets(str).Select で、間違っていましたが、配車表シート（上記"連絡票"とありますが）のr1 セル値のシートを開く。 ということをしたかったのでした。 ご教示いただけると助かります。
お礼
何度もご教示ありがとうございました。 マクロの記録を、知識もないのに書き換えてしまったので、エラーが出ると何が何だかわからず、結果的にご指摘いただいた、 "セルの指定が Range("y1").Value Range("z2").Value となってますがあってますでしょうか。" のところに問題がありました。 印刷フォームを途中で変更してしまっていたみたいです。 ("z2")ではなくなっていました。 基本を忘れていました。 この度は本当にありがとうございました。