Текстовое поле с возможностью поиска и vba выделяет строку из непрерывной формы и выводит запись наверх, а остальные записи следуют - PullRequest
0 голосов
/ 14 июня 2019

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

Некоторая другая информация, моя форма недоступна для редактирования, но текстовое поле:

Я пытался использовать форму с некоторым кодом, но не могу ее получить, из-за ошибки, говоря, чтоprivate sub не распознается как действительное имя или выражение поля.

Private Sub Recsch_AfterUpdate()
   On Error GoTo Err_ErrorHandler

   Dim ItemSelected As String

       ItemSelected = Forms![Inventory_Status].Recsch
       Recsch = Null
       Me.Filter = "[RecId] = '" & ItemSelected & "'"
       Me.FilterOn = True

Err_ErrorHandler:
       Exit Sub
End Sub

enter image description here

Я просто хочу, чтобы мой код перенес меня на следующую строкуформа без необходимости нажимать в любом месте.Таким образом, он будет вводить данные в поле, искать в моей форме, выделять строку, переносить ее наверх, затем снова выделять мой блок, чтобы я мог ввести следующий номер без нажатия клавиши ввода.

...