エクセル2003を使用してます。
VBAで可能かどうか質問します。
以下の4つのシートがあります。
「データ」、「東京」「大阪」「福岡」
シート名「データ」のセル「A1」に入力された文字により、入力された
文字に対応するシートをマクロを使用して印刷できるようにしたいと思ってます。
例えば、シート名「データ」のセル「A1」に「東京」と入力してマクロを実行すると
別シートの「東京」というシートが印刷され、同様にA1に「大阪」と入力して実行
すると、シート名「大阪」が印刷されるようにしたいと思ってます。
マクロを実行して、今回の例にあった、それぞれの条件に対応したシートを印刷
する方法をご教示お願いします。
No.1ベストアンサー
- 回答日時:
Sub Macro1()
Dim a As String
a = Sheets("データ").Range("A1").Value
Sheets(a).PrintOut
End Sub
ページ範囲を限定したい場合は引数Fromに開始ページ、引数Toに終了ページを指定します。
Sheets(a).PrintOut From:=1, To:=3
さらに一度プレビューを表示してから印刷したい場合は引数Previewを追加します。
Sheets(a).PrintOut From:=1, To:=3, Preview:=True
プレビューだけなら
Sheets(a).PrintOut Preview:=True
keronjin様
ご回答ありがとうございます。こんなあっさりしたVBAで、
できるとは、思いませんでした。
意味も理解できました。
早速活用します。
ありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) セルによって印刷するシートを変える方法 EXCEL-VBA 2 2022/08/01 20:48
- Excel(エクセル) エクセルのマクロで複数シートを両面印刷するには? 2 2022/12/08 23:23
- Excel(エクセル) エクセルで”入力シート”の文字書式の変更を”出力シート”で同じ文字書式で印刷したいです。VBA希望 4 2023/04/24 11:07
- Excel(エクセル) 【Excel】複数シートがあるエクセルデータで片面印刷と両面印刷設定がシートごとに入 1 2023/03/10 15:25
- Excel(エクセル) エクセルのフッタやヘッダーについて 3 2023/02/04 09:45
- Excel(エクセル) Excel VBAプルダウンの値を変えながら2枚ずつ印刷する方法? 4 2022/05/27 13:04
- Visual Basic(VBA) vbaエクセルマクロ RemoveDuplicatesについて RemoveDuplicatesを使 3 2023/02/28 01:13
- Visual Basic(VBA) VBAで不特定枚数印刷をしたいです。 4 2022/08/02 07:30
- Excel(エクセル) エクセルで条件付き書式を使わずにセルの文字の色を変える方法を教えて下さい 8 2023/07/28 01:15
- Excel(エクセル) エクセルVBAで複数のシート印刷設定 1 2022/09/07 12:03
このQ&Aを見た人はこんなQ&Aも見ています
-
新NISA制度は今までと何が変わる?非課税枠の拡大や投資対象の変更などを解説!
少額から投資を行う人のための非課税制度であるNISAが、2024年に改正される。おすすめの銘柄や投資額の目安について教えてもらった。
-
EXCEL マクロ 条件の合ったシートだけ印刷したい
Excel(エクセル)
-
エクセル VBA 条件つきの印刷
Excel(エクセル)
-
特定のセルに数値が入っているシートのみ印刷する方法
Excel(エクセル)
-
-
4
エクセルで、特定のシートを印刷するVBA
Excel(エクセル)
-
5
シート名一致すれば印刷、一致しなければメッセージbox
Visual Basic(VBA)
-
6
マクロで印刷→セルの値から部数変更するには
Excel(エクセル)
-
7
エクセルでチェックボックスを使用してシートの抽出及び一括印刷
Excel(エクセル)
-
8
エクセル:VBAで特定のシートを選択し印刷
Word(ワード)
-
9
セルの数字によって、印刷するシートを変えるマクロ
Excel(エクセル)
-
10
複数ファイルにある特定のシートを一度に印刷したい
Excel(エクセル)
-
11
エクセルシートをまとめて印刷(ボタンを使い)
Excel(エクセル)
-
12
エクセルでデータがあるシートだけ印刷するマクロ
Excel(エクセル)
-
13
セルによって印刷するシートを変える方法 EXCEL-VBA
Excel(エクセル)
-
14
ExcelVBAを使って、値がある場合は作業を繰り返し実行するプログラムを作成したい。
Visual Basic(VBA)
-
15
【Excel】指定したセルの名前でPDFを保存する【VBA】
Visual Basic(VBA)
-
16
条件に一致したときに画像を表示したいのですが・・。
Excel(エクセル)
-
17
エクセルのマクロで印刷プレビューを閉じる方法
Excel(エクセル)
-
18
ヘッダー
Excel(エクセル)
-
19
マクロ セルに入力されたシートを選択する
Excel(エクセル)
-
20
エクセルで条件をつけて図形を表示する方法を教えてください。例えば、セルA1に入力された数値が100以
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルファイルを開く時、常...
-
1ヶ月分の日付を一度に出す方法...
-
エクセルで複数のシートの1枚目...
-
マクロで印刷→セルの値から部数...
-
エクセルの一部のセルの背景色...
-
エクセル印刷時 一枚の書類に...
-
Excel 特定のシートを印刷不可...
-
エクセルの行タイトルを特定の...
-
エクセルで行番号、列アルファ...
-
エクセルでシートの色がグレー...
-
エクセルでのヘッダーをページ...
-
エクセルのマクロで複数シート...
-
EXCEL マクロ 条件の合ったシー...
-
エクセルのシート名を印刷した...
-
【Excel】複数シートがあるエク...
-
特定のセルに数値が入っている...
-
条件によって印刷するシートを...
-
エクセルで、ヘッダーに他のシ...
-
エクセル 改ざん防止のため ...
-
エクセルで140人をマクロを...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルファイルを開く時、常...
-
エクセルの一部のセルの背景色...
-
エクセル印刷時 一枚の書類に...
-
1ヶ月分の日付を一度に出す方法...
-
マクロで印刷→セルの値から部数...
-
エクセルの行タイトルを特定の...
-
エクセルのマクロで複数シート...
-
Excel 特定のシートを印刷不可...
-
エクセルで複数のシートの1枚目...
-
エクセルでのヘッダーをページ...
-
エクセルでシートの色がグレー...
-
エクセルで行番号、列アルファ...
-
条件によって印刷するシートを...
-
EXCELで複数のシートを同時に印...
-
エクセルのシート名を印刷した...
-
エクセルで複数のシートを同じ...
-
エクセルで、ヘッダーに他のシ...
-
EXCELで宛名だけ連続変更...
-
Excelであるシートだけ印刷でき...
-
エクセルの複数シートをNアップ...
おすすめ情報