Просто быстрый запрос, я хочу обновить несколько строк в базе данных, используя форму пользователя.Я хочу, чтобы он выполнил поиск в столбце B с помощью Combobox1 и обновил столбец D значением в текстовом поле 4.
Ниже приведен код, который не выполняет задачу, которую я хочу:
Dim sh As Worksheet
Dim i As Integer
Set sh = ThisWorkbook.Sheets("1. PO tracker")
For i = sh.Range("C" & Application.Rows.Count).End(xlUp).Row To 13
If sh.Range("B" & i).Value = Me.ComboBox1 Then
sh.Range("D" & i).Value = Me.TextBox4.Value
End If
Next I
Может кто-нибудь знает, где я иду не так?
Заранее спасибо.