перезаписать существующую запись, если при сравнении двух столбцов в разных листах найдено совпадение - PullRequest
0 голосов
/ 24 сентября 2018

* РЕДАКТИРОВАТЬ Я изменил и улучшил свой вопрос.У меня есть две таблицы в рабочей книге.

Мастер лист

  C        D    E
  Apple   100    No
  Banana  85    Yes
  Lemon   11    Yes
  Kiwi    165    No

Обновление листа

  C        D    E
  Apple    34   Yes
  Kiwi    165   Yes

Я хочу обновить запись в мастер-листе из листа обновления,поэтому после обновления записи в мастер-листе будут выглядеть следующим образом:

Мастер-лист

  C        D    E
  Apple   34    Yes
  Banana  85    Yes
  Lemon   11    Yes
  Kiwi    165   Yes

Пример, сравнение будет выполнено на основе столбца C как в мастер-листе, так и в листе обновления, еслисовпадение найдено, оно перезапишет всю строку в мастер-листе.Я написал часть кода и, похоже, застрял в том, как перезаписать всю строку.

Sub fruitUpdate()

Dim rangeUpdt, rangeMstr As Range

Dim ws1, ws2 As Worksheet
Set ws1 = Worksheets("Master")
Set ws2 = Worksheets("Fruit Update")

On Error Resume Next
With ws1
    Set rangeMstr = .Range("C4", .Range("C" & Rows.Count).End(xlUp)) 'records start at C4
End With
With ws2
    Set rangeUpdt = .Range("C10", .Range("C" & Rows.Count).End(xlUp)) 'records start at C10
End With
    If rangeMstr = rangeUpdt Then
    'overwrite, copy to masterlist (here's the part that I stuck)
    End If
End Sub

Я хочу добиться этого с помощью Excel VBA.Я думаю об использовании метода copy.Destination, но я думаю, что он будет вставлять как новые данные или перезаписывать их.Я новичок в VBA, любая помощь очень ценится.Спасибо.

...