N
NFL
I'm getting a runtime error 13 -- type mismatch and not sure why i'm getting
the error. The error is pointing to this line below. The report worked
great, but when I start adding more appointments, this error pops up.
Me.ClassID.Top = lngTopMargin + DateDiff("n", datSchedStart, Me.ClassTime) *
lngOneMinute
Dim lngTopMargin As Long
Dim lngOneMinute As Long 'size of one minute in twips
Dim datSchedStart As Date
datSchedStart = #8:00:00 AM#
lngOneMinute = 12
lngTopMargin = 1440 'timeline starts 1" down in section
Me.MoveLayout = False
Me.ClassID.Top = lngTopMargin + DateDiff("n", datSchedStart,
Me.ClassTime) * lngOneMinute
Me.ClassID.Height = DateDiff("n", Me.ClassTime, Me.EndTime) * lngOneMinute
Me.ClassID.Left = Me.ReportColumn 'field in table
Me.Instructor.Left = Me.ReportColumn 'field in table
I'm also getting an error on both the weekly and monthly calendar. The
error reads as "The expression is type incorrectly or is too complex .... "
It doesn't take me to the code.
Is there a limit of appointments you can enter?
Thank you!
the error. The error is pointing to this line below. The report worked
great, but when I start adding more appointments, this error pops up.
Me.ClassID.Top = lngTopMargin + DateDiff("n", datSchedStart, Me.ClassTime) *
lngOneMinute
Dim lngTopMargin As Long
Dim lngOneMinute As Long 'size of one minute in twips
Dim datSchedStart As Date
datSchedStart = #8:00:00 AM#
lngOneMinute = 12
lngTopMargin = 1440 'timeline starts 1" down in section
Me.MoveLayout = False
Me.ClassID.Top = lngTopMargin + DateDiff("n", datSchedStart,
Me.ClassTime) * lngOneMinute
Me.ClassID.Height = DateDiff("n", Me.ClassTime, Me.EndTime) * lngOneMinute
Me.ClassID.Left = Me.ReportColumn 'field in table
Me.Instructor.Left = Me.ReportColumn 'field in table
I'm also getting an error on both the weekly and monthly calendar. The
error reads as "The expression is type incorrectly or is too complex .... "
It doesn't take me to the code.
Is there a limit of appointments you can enter?
Thank you!