Как заполнить таблицу поиска, используя "Нет в списке"

Question

Таблица 1: Моя общая информационная таблица

• Организация: Поле поиска / отношения, которое по умолчанию имеет значение "N/A", но извлекает значения из...

Таблица 2: Организационный список

• Нет поля ID, только названия организаций в том порядке, в котором они были добавлены

Моя форма ввода данных имеет поле со списком для организации, и я хотел бы обновить его, когда добавлю организацию, которая не была добавлена ​​ранее. Я знаю, что должен использовать событие "Нет в списке", но я не знаю, как обновить список организации с помощью этого события. Как мне это сделать?

Answer 1

Убедитесь, что Limit To List свойство поля со списком установлено в Yes,

Добавить On Not In List событие для вставки значения в исходную таблицу при появлении нового значения:

Private Sub MyComboBox_NotInList(NewData As String, Response As Integer)

    With DoCmd
        .SetWarnings False
        .RunSQL "INSERT INTO [Organization List](Organizations) VALUES ('" & NewData & "')"
        Response = acDataErrAdded
        .SetWarnings True
    End With

End Sub

Редактировать... почти забыл... прежде чем я отвечу, что вы пытались?:)

Изменить 2... приведенный пример для строкового значения. Удалить ' с любой стороны New Data если это числовое значение (но, вероятно, нет, если это название организации).

Редактировать 3... INSERT SQL - это всего лишь один из способов помещения данных в таблицу. Вы можете предпочесть RecordSet.Add а также .Update методы.