Обновление таблицы из 2 столбцов на основе местоположения vlookup и выбора кнопок команд - PullRequest
0 голосов
/ 10 мая 2019

Я пытаюсь отследить катушки, которые мы отправляем поставщикам, обновив простую таблицу из 2 столбцов, которая состоит из идентификатора катушки # и текущего местоположения катушки. Как бы я хотел, чтобы это работало, если бы оператор сканировал штрих-код барабана и выбирал соответствующую командную кнопку для нового местоположения барабана. Расположение будет цикл между 3 вариантами. Поставщик1, Поставщик2 и Объект. Я знаю, как написать в vlookup, чтобы найти идентификатор барабана в таблице и в соседней ячейке. Однако я теряюсь, пытаясь найти способ заменить текст в ячейке, расположенной в vlookup, новым местоположением. Кроме того, мои навыки VBA в лучшем случае элементарны, ха-ха.

Private Sub CommandButton1_Click()
    Dim reelID As Integer, reelLoc As String
    reelID = Range("B2").Value
    reelLoc = Application.WorksheetFunction.VLookup(reelID, Range("E3:F22"), 2, False)
End Sub

Я продолжал играть с ним, но он говорит мне "объект требуется"

Private Sub CommandButton1_Click()

 Dim reelID As Integer, reelLoc As String

 reelID = Range("B2").Value
 reelLoc = Application.WorksheetFunction.VLookup(reelID, Range("E3:F22"), 2, 
 False)

 Set reelLoc = ActiveCell
  ActiveCell.Value = "Supplier2"

End Sub
...