diff --git a/components/tvplanit/source/vpprtfmt.pas b/components/tvplanit/source/vpprtfmt.pas
index b5c1e4cab..e4eec2c7c 100644
--- a/components/tvplanit/source/vpprtfmt.pas
+++ b/components/tvplanit/source/vpprtfmt.pas
@@ -2115,6 +2115,7 @@ begin
     FLastContact := StartContact;
     PaintToCanvasRect(ACanvas, ARect, ADate);
     ADate := GetNextDate(ADate);
+    StartTask := FLastTask;      // wp: added to enable switching pages in preview
 
     LastPage := True;
     if FHaveDate and (ADate < EndDate) then