Доброго времени суток.
На кнопке открытия формы стоит код:

Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "frmPlanSv2"
DoCmd.OpenForm stDocName, , , stLinkCriteria

В источнике формы должны быть либо qPlanSv4_bezTitula либо qPlanSv4.
Но форме, которую должна открыть эта кнопка в загрузку поместил условие, которое меняет источник этой формы

If DCount("[год]", "qPlaniTitul4") = 0 Then
        Me.RecordSource = "qPlanSv4_bezTitula"
End If

По умолчанию форма открывается с qPlanSv4.
Нажимаю кнопку при выполнении условия

DCount("[год]", "qPlaniTitul4") = 0

Акс ругается, пытается отбсчитать qPlanSv4 (хотя должен qPlanSv4_bezTitula)
Красит строку

DoCmd.OpenForm stDocName, , , stLinkCriteria

Отдельно qPlanSv4_bezTitula открывается без проблем.
В чем может быть ошибка?
Спасибо.

http://www.sql.ru/forum/1069679/zamena-istochnika-v-forme