Измените значение поля в одной таблице на основе значения поля в другой таблице в Access, используя VBA

Question

Я создаю сторону вдоль системы инвентаризации, используя Access.

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

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

Вот что у меня есть

Option Compare Database

Private Sub Command48_Click()
    If Me.KIT_ITEM_Card_Number.Value = [TEST2]![Kit Item Card Number] Then
        [TEST2]![Status] = "Removed"
    End If
End Sub

Answer 1

Запустите запрос на обновление :

Private Sub Command48_Click()

    Dim Sql As String

    ' Use one of these:
    ' If value is a number.
    Sql = "Update [TEST2] Set [Status] = 'Removed' Where [Kit Item Card Number] = " & Me!KIT_ITEM_Card_Number.Value & ""
    ' If value is a text.
    Sql = "Update [TEST2] Set [Status] = 'Removed' Where [Kit Item Card Number] = '" & Me!KIT_ITEM_Card_Number.Value & "'"

    CurrentDb.Execute Sql

End Sub

И переименуйте свои кнопки во что-то значимое.