VBA 不覆盖单元格

Question

我有一个宏，可以将主工作簿中的数据匹配到另一个工作簿，如果匹配，它会将其他列行拉到“主”工作表中。我唯一的问题是它覆盖了其他填充的列。这不仅仅是粘贴到匹配的单元格，我能做些什么来阻止它？添加了一部分代码

如果 Valuetocheck = valueinnew 那么

mastersheet.Cells(A, 3).Value = workbooktocheck.Sheets("sheet1").Cells(b, 7)
mastersheet.Cells(A, 11).Value = workbooktocheck.Sheets("sheet1").Cells(b, 11)

Answer 1

我需要知道 A 在代码中指的是什么。 它们是固定的还是可变的？如果它们不同，则 A 假定的所有列都将被覆盖。

或者你可以使用：

If mastersheet.Cells(A, 3).Value = "" then
    mastersheet.Cells(A, 3).Value = workbooktocheck.Sheets("sheet1").Cells(b, 7)
end if
If mastersheet.Cells(A, 11).Value = "" then
     mastersheet.Cells(A, 11).Valueworkbooktocheck.Sheets("sheet1").Cells(b, 11)
End If

防止单元格已经填满时被覆盖。