Code:
rst.FindFirst "d_t = " & str
If rst.NoMatch Then
MsgBox "Record not found"
Else
rst.MovePrevious
Me.Bookmark = rst.Bookmark
Me.scroll fmScrollActionBegin object does not support this property or method
Parent.scroll fmScrollActionBegin
me.parent.scroll fmScrollActionBegin
forms!balans!lbl!scroll fmScrollActionBegin
forms!balans!lbl.scroll fmScrollActionBegin
fmScrollActionBegin not defined --> add fm20.dll to preference : microsoft forms 2.0 object library
End If
rst.Close
i just cannot find solution for sync subform2 to subform1 without subform1 change view
the attachment shows date selected but want date newest date
union sql works faster then on dates
2lines from table in form balans subform bl ; selected date is used in 5lines from sql
d_d is vba nummering to select yesterday (d_d - 1 ) to calculate difference daily base
d_t is vba nummering to select last month (d_t - 1 ) to calculate difference (running) month base