Possible, but only with VBA. The bigger question is why? Section the report on brand, and set to start each section on a new page. Anything printed, viewed in page mode, sent to pdf, etc. will look exactly the same.
Just change the resort name to your section Object.
[Private Sub Document_AfterRefresh()
Dim Rpt As Report
Dim Var As DocumentVariable
Dim i As Long
Set Var = ThisDocument.DocumentVariables("Resort")
If UBound(Var.Values(boUniqueValues)) > 0 Then
Set Rpt = ThisDocument.Reports(1)
For i = 1 To UBound(Var.Values(boUniqueValues))
Set Rpt = Rpt.Duplicate
Call Rpt.AddComplexFilter("Resort", "= <Resort> = """ & _
Var.Values(boUniqueValues)(i) & """")
Rpt.Name = Var.Values(boUniqueValues)(i)
Next i
Call ThisDocument.Reports(1).Delete
End If