ник: kot_k_k
кажетс дошло - нужно выводить дату если она попадает в этот год.
вар. № 1
в поле вот что пишем
=IIf(Year(Forms!F_1!fld_date)=Year(Date());Forms!F_1!fld_date;"")
вар № 2
Private Sub Report_Open(Cancel As Integer)
If Year([Forms]![F_1]![fld_Date]) = Year(Date) Then
Me.ПОЛЕ_ДАТА.Visible = True
Else
Me.ПОЛЕ_ДАТА.Visible = False
End If
End Sub
это засовываем в Событие отчета - Открытие