Macro Printing & Save as PDF Problem

[alexshaw76]

New to using VBA in excel

I've created buttons to be able to print the active sheet and to print the whole workbook less the hidden sheets. Is there a way to add code to make sure that excel is selecting the default printer?
Active sheet code:

ActiveWindow.SelectedSheets.PrintOut copies:=1, collate:=True
    Range("A3").Select
End Sub

Print whole workbook less hidden sheets code:

Sub PrintVisible()
Dim ws As Worksheet
For Each ws In ThisWorkbook.Worksheets
    If ws.Visible = xlSheetVisible Then ws.PrintOut
Next ws
End Sub

Help is much appreciated.