- ベストアンサー
Excelのマクロ初心者です
Excelのマクロ初心者です 同じBookでセルA1に”1”が入力されているSheetのみ全て印刷する マクロを教えてください！
- hashihasi
- お礼率75% (9/12)
- その他MS Office製品
- 回答数1
- ありがとう数1
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
Sub Macro1() For i = 1 To Sheets.Count Sheets(i).Select If Range("A1") = 1 Then ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True End If Next i End Sub
お礼
ありがとうございました！早々の回答だったので、 大変助かりました！使用させて頂きます。