- ベストアンサー
VBAの印刷について教えてください
私は、VBAを始めて、まだ３日目の初心者ですので、詳しく教えて下さい。 エクセルの１つのブックの中にシートが１０枚あるのですが、シートに印刷ボタンを表示して、ボタンを押したときに、シート１，４，５の印刷ボタンと、また、違う印刷ボタンを押したときにシート２．３、６が印刷されるようにしたいと思っていますので、よろしくお願いします。
- みんなの回答 （4）
- 専門家の回答
質問者が選んだベストアンサー
その他の回答 (3)
- mitsu-s
- ベストアンサー率25% (7/27)
>ユーザーホームのボタンとコマンドボタンは違うのですか。 >違うのでしたら、コマンドボタンの作成を教えてください。 ボタンは 簡単に言うと、 ボタンはクリックした時にマクロが実行されるように割り当てる。 コマンドボタンはコントロール自体にマクロを記述する。 というイメージになるのでしょうか。 で、作成方法は、 「表示」－「ツールバー」－「コントロールツールボックス」にチェックを入れます。 表示されたコントロールツールボックスの中からコマンドボタンをクリックし、シート上へ配置します。 作成したコマンドボタンをダブルクリックすると、 Visual Basic Editorが起動され、 Private Sub CommandButton1_click() End Sub と表示されます この Private Sub Command… から End Sub の間に 自分が処理したいコードを書き込みます。 ちなみに、CommandButton1_click()というのは commandButton1 という名前のコマンドボタンを クリックした場合に End Sub まで記述してある コードを実行します。
お礼
ありがとうございました。 私は、初心者ですので、詳しく書いてくれてましたので助かりました。
- sgh
- ベストアンサー率61% (75/121)
>シートに印刷ボタンを表示して、印刷は出来ないのですか。 メニューから「表示」「ツールバー」「フォーム」をクリックすると、ツールバーが出てきます。 ボタンらしきアイコンをクリックして、シート上に配置すると、「マクロの登録」画面が出てきますので、作成したマクロを登録してください。 ちなみに、オートシェイプにもマクロは登録できます。
お礼
ありがとうございました。 本よりわかりやすかったです。
- sgh
- ベストアンサー率61% (75/121)
こんなのでいかがでしょうか？ Sub Print145() Sheets("Sheet1").Select ActiveWindow.SelectedSheets.PrintOut Sheets("Sheet4").Select ActiveWindow.SelectedSheets.PrintOut Sheets("Sheet5").Select ActiveWindow.SelectedSheets.PrintOut End Sub EXCELの場合は、マクロの記録を使って、動作をコード化してもらい、不要なところを削除するのが簡単です。
補足
早速試してみました、印刷は出来たのですが、出来れば下記のようにしたいのですが、教えてください。 シートに印刷ボタンを表示して、印刷は出来ないのですか。
補足
あと少し教えてください。 ユーザーホームのボタンとコマンドボタンは違うのですか。 違うのでしたら、コマンドボタンの作成を教えてください。