Я использовал NotInList для добавления данных в таблицу, и теперь я хочу открыть форму, связанную с этой таблицей, но отфильтрованную по введенным данным.

Question

У меня есть следующий код для добавления новых данных в таблицу из комбинированной команды "NotInList".Последний DoCmd только запускает форму, но не фильтрует критерии whereAs.
Предложения, пожалуйста.

'Get confirmation that this is not just a spelling error.
strTmp = "Add '" & NewData & "' as New Supplier?"
If MsgBox(strTmp, vbYesNo + vbDefaultButton2 + vbQuestion, "Not in list") = vbYes Then

    'Append the NewData as a record in the Supplier list table.
    strTmp = "INSERT INTO SuppliersList (SupplierName) " & _
        "SELECT """ & NewData & """ AS SupplierName;"
    DBEngine(0)(0).Execute strTmp, dbFailOnError

    'Notify Access about the new record, so it requeries the combo.
    Response = acDataErrAdded

'The following command loads a specific form filtered to the new data entered
DoCmd.OpenForm "F_Supplier", acNormal, , "[SupplierName]='" & Me.[SupplierName] & "'", acDialog
End If