Excel VBA Поиск и обновление - PullRequest
0 голосов
/ 25 февраля 2019

У меня есть сценарий VBA, который может искать несколько результатов и отображать их в строках Bxx-Dxx.

Dim erow As Long
Dim ws As Worksheet
Dim lastrow As Long
Dim count As Long
Dim resultrow As Long

resultrow = 11

lastrow = Sheets("Klanten").Cells(Rows.count, 1).End(xlUp).Row
Sheet1.Range("resultcells").ClearContents
count = 0
For x = 5 To lastrow
    If Sheets("Klanten").Cells(x, 2) = Sheet1.Range("C6") Then
        Sheet1.Range("C11").Offset(count) = Sheets("Klanten").Cells(x, 1)
        Sheet1.Range("B11").Offset(count) = Sheets("Klanten").Cells(x, 2)
        Sheet1.Range("D11").Offset(count) = Sheets("Klanten").Cells(x, 11)
        count = count + 1
End If


Next x

End Sub

Я хотел бы изменить результат после поиска, а затем обновить его.

Как в этом сценарии:

Клиент покупает что-то и получает баллы лояльности. Владелец ищет свое имя в excel и обновляет свои баллы до нового значения.

Форма выглядит следующим образом:

enter image description here

Последний столбец содержит клиентские его / ее баллы из магазина.

Я хотел бы сделать так, чтобы вы могли редактировать точки непосредственно в результате поиска и нажимать кнопку "Pas punten aan" , чтобы точки изменялись или обновлялись вдругой лист с данными о клиентах.

Причина, по которой я спрашиваю это, заключается в том, что у меня нулевой опыт работы с самим VBA, не говоря уже о VBA в Excel.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...