Блог

Я новичок в VBA и в качестве упражнения пытаюсь создать систему управления запасами.

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

Моя идея состояла в том, чтобы найти данные в поле со списком, смещение(0,2) и в этой ячейке вычесть инвентарь, который я только что «продал».

 Set ws = Sheets("Productos") 'sheets with the inventory is called Productos Set rngFound = ws.Cells.Find(What:=Me.ComboBox2.Value, After:=Range("A1"), LookIn:=xlFormulas, LookAt:= _  xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _  , SearchFormat:=False)  

С помощью этого я притворяюсь, что нахожу значение из моего combobox2 на рабочем листе Productos, которое я не могу заставить работать.

Затем мне нужно вычесть инвентарь из моего текстового Поля5 из ячейки, которую я нашел, 2 ячейки справа.