Calendar - In Acc ; Activeview in Report = Activeview in Form

Print Page | Close Window

In Acc ; Activeview in Report = Activeview in Form

Printed From: Codejock Forums
Category: Codejock Products
Forum Name: Calendar
Forum Description: Topics Related to Codejock Calendar
URL: http://forum.codejock.com/forum_posts.asp?TID=10459
Printed Date: 07 July 2025 at 12:43am
Software Version: Web Wiz Forums 12.04 - http://www.webwizforums.com

Topic: In Acc ; Activeview in Report = Activeview in Form

Posted By: LeJi
Subject: In Acc ; Activeview in Report = Activeview in Form
Date Posted: 02 May 2008 at 4:53pm

Dear,

In Access, Is it possible to have on an Report exactly the same activeview that on a form,

I tested the code below, but if I select 3 days in the form I do not find them in the Report ?

Can you help me

In advance Merci

Jacky

Private Sub Report_Open(Cancel As Integer)
    Dim ObjCalendarFrms As CalendarControl
    Dim ObjCalendar As CalendarControl
    Set ObjCalendarFrms = Forms!PlanningCalendar!CalendarControl1.Object
    Set ObjCalendar = Me.wndCalendar.Object
    Call PlanningPopulate(ObjCalendar)
    ObjCalendar.VisualTheme = xtpCalendarThemeOffice2007
    ObjCalendar.ViewType = ObjCalendarFrms.ViewType
    ObjCalendar.DayView.TimeScale = ObjCalendarFrms.DayView.TimeScale
    ObjCalendar.PrintOptions.PrintFromToExactly = False
    ObjCalendar.ActiveView.ShowDay ObjCalendarFrms.ActiveView.Days(0).Date, ObjCalendarFrms.ActiveView.Days(ObjCalendarFrms.ActiveView.DaysCount - 1).Date
    'Me.wndCalendar.Object.PrintOptions.PrintDateHeader = False

End Sub

Print Page | Close Window

Forum Software by Web Wiz Forums® version 12.04 - http://www.webwizforums.com
Copyright ©2001-2021 Web Wiz Ltd. - https://www.webwiz.net