* РЕДАКТИРОВАТЬ Я изменил и улучшил свой вопрос.У меня есть две таблицы в рабочей книге.
Мастер лист
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, любая помощь очень ценится.Спасибо.