Подформа

Имеются две формы: Подформа - PodTovarTexnika и главная -TovarTexnika
На главной форме два полея Date1 и Date2
Задача -отфильтровать данные в подформе, поле DataIzm (дата)


Private Sub Кнопка6_Click()
DoCmd.ApplyFilter "", "[DataIzm] Between #" & Format(Forms![TovarTexnika]![Data1], "MM\/DD\/YYYY") & "# And #" & Format(Forms![TovarTexnika]![Data2], "MM\/DD\/YYYY") & "#"
FilterOn = True
End Sub
спрашивает что такое "[DataIzm]

Private Sub Кнопка6_Click()
 With Me![PodTovarTexnika].Form
   .Filter = "[DataIzm] Between #" & Format(Forms![TovarTexnika]![Data1], "MM\/DD\/YYYY") _
                 & "# And #" & Format(Forms![TovarTexnika]![Data2], "MM\/DD\/YYYY") & "#"
   .FilterOn = True
 End With
End Sub

Анатолий ( Киев )

Private Sub Кнопка6_Click() With Me![PodTovarTexnika].Form .Filter = "[DataIzm] Between #" & Format(Forms![TovarTexnika]![Data1], "MM\/DD\/YYYY") _ & "# And #" & Format(Forms![TovarTexnika]![Data2], "MM\/DD\/YYYY") & "#" .FilterOn = True End With End Sub

Все ОК, огромное спасибо.