Changing print area with respect to variable

I am trying to set up a page break based on the last piece of information on the sheet.

This piece of code works so far. But I am trying to get the upper range to be something like 3 rows higher than the last row.

Please Login or Register  to view this content.

I tried

Please Login or Register  to view this content.

but it comes up with a Syntax error.

Try this

Sub last_row()

Dim lastrow As Long

lastrow = Range("A65536").End(xlUp).Row
ActiveSheet.PageSetup.PrintArea = "A1:F" & lastrow - 3

End Sub