Print Vba

Hej

Jeg har tidliger laver en print macro

den virker fint, men jeg kunne godt tænke mig at de sider jeg har skjult kolonner ikke bliver skrevet ud som blanke papir.
eksempel.

fra side 1-3 er der tekst, men den udskriver også side 4-6 hvor jeg har skjult indhold

Jeg har prøvet hvor jeg fastsætter at den kun skal printe fra side 1-3. (From:=1, To:=3, Copies:=1)
så virker det. men jeg har forskellige antal sider.

kan man skrive en del ind  så den udskriver alle sider med Tekst?

Håber det giver mening

Min kode:

Sub Udskrivalt()

answer = MsgBox("Er du sikker på du vil printe?", vbYesNo + vbQuestion)
   
    If answer = vbYes Then
   
ActiveSheet.Unprotect
Range("u:ac").EntireColumn.Hidden = True
Range("1:1").EntireRow.Hidden = True

    Application.ActivePrinter = "OKI MC561(PCL) på Ne01:"
    ActiveWindow.SelectedSheets.PrintOut , ActivePrinter:= _
        "OKI MC561(PCL) på Ne00:", Collate:=True


Range("u:ac").EntireColumn.Hidden = False
Range("1:1").EntireRow.Hidden = False
ActiveSheet.Protect

Else
        'do nothing
    End If

End Sub


Hilsen Jesper