0

我想更改此范围内的值

Dim ws As Worksheet
Set ws = ThisWorkbook.Sheets("Sheet2")
Workbooks(Nextfile).Sheets("Sheet").Range("A1:Z171") = Application.WorksheetFunction.VLookup                                                                        (Workbooks(Nextfile).Sheets("Sheet").Range("A1:Z171"), _
                                                       ws.Range("A1:B2000"), _
                                                       2, False)

我的问题是,当我运行这个包含其他值的所有其他单元格时,都会转到#n/a。

我希望我的代码做什么:

如果在range列中找到相同的值,则查找所有Workbook 1 - Sheet1具有 range 值的单元格从同一行的列中获取值并替换在 range 中找到的值。("A1:Z171")Workbook2 - Sheet2("A1:B2000")ABWorkbook 1 - Sheet1("A1:Z171")

4

0 回答 0