附件是制作过程
插入按钮，将如下宏代码输入：
Sub 按钮1_Click() Sheets("c").Select ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _ IgnorePrintAreas:=FalseEnd Sub
做个宏，然后做个按钮，将其与宏链接应该就可以吧。
