G Guest Mar 29, 2007 #2 Two options: 1. View > Toolbars and check Standard the Standard toolbar has a Print button it 2. put you own button in the worksheet with VBA: Sub button_maker() Application.CommandBars("Forms").Visible = True ActiveSheet.Buttons.Add(290.25, 69, 51.75, 41.25).Select Selection.OnAction = "printit" Application.CommandBars("Forms").Visible = False End Sub Sub printit() ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True End Sub The first sub creates a button. The second sub does the printing. This assumes that the print range has already been established.
Two options: 1. View > Toolbars and check Standard the Standard toolbar has a Print button it 2. put you own button in the worksheet with VBA: Sub button_maker() Application.CommandBars("Forms").Visible = True ActiveSheet.Buttons.Add(290.25, 69, 51.75, 41.25).Select Selection.OnAction = "printit" Application.CommandBars("Forms").Visible = False End Sub Sub printit() ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True End Sub The first sub creates a button. The second sub does the printing. This assumes that the print range has already been established.