ник: ROM!MDB
Dim stDocName As String
Dim stDocName1 As Integer
Dim stLinkCriteria As String
stDocName = "F_TK_A_1"
stDocName1 = CurrentDb.Properties("ID_TK")
stLinkCriteria = "[ID_TK_A1]= " & "'" & stDocName1 & "'"
DoCmd.Close
DoCmd.OpenForm stDocName, stLinkCriteria
|
В качестве аргумента для открытия формы пытаюсь использовать CurrentDb.Properties.. ответ однозначен : либо прерывание макрокоманды, либо type mismatch...
Помогите разобраться!