使用另一个表中的新值更新Excel表

时间:2017-10-08 12:13:57

标签: excel vba excel-tables

我们有这样的表A:

Name Website Description
Freelensia https://www.example.com  "Interpreter reservation platform"
フリレンシア https://www.example.com/ja "通訳予約プラットフォーム" 
"Phi Liên Á" https://www.example.com/vi "Nền tảng đặt hẹn với phiên dịch viên trực tuyến"
非連亜 https://www.example.com/zh "口譯預約平台"

其中Name是此表的唯一IDKey。

现在,偶尔我们想用表B中的新值批量更新表A,如下所示:

Name Website Description
Freelensia [blank] "Reserve interpreters online"
フリレンシア [blank] "オンラインで通訳者を予約する" 
"Phi Liên Á" [blank] "Đặt lịch trực tuyến với phiên dịch viên"
  • 名称将相同
  • 具有空白值的单元格将被视为无变化
  • 仅包含有新值的行。您可以看到表A中的第4行(ID =非连亜)不在表B中,因为此处没有要更新的新值。

是否存在与此类似的宏?

真实表A有大约2,000行和20列。

1 个答案:

答案 0 :(得分:0)

假设你的表B在sheet2中,而表A在sheet1中,那么

Sub test()
    Sheets("Sheet2").Range("TableB").Copy
    Sheets("Sheet1").Range("TableA").PasteSpecial Paste:=xlPasteValues, _
                                                  Operation:=xlNone, SkipBlanks:=True, Transpose:=False
End Sub