我有一个宏,可以将主工作簿中的数据匹配到另一个工作簿,如果匹配,它会将其他列行拉到“主”工作表中。我唯一的问题是它覆盖了其他填充的列。这不仅仅是粘贴到匹配的单元格,我能做些什么来阻止它?添加了一部分代码
如果 Valuetocheck = valueinnew 那么
mastersheet.Cells(A, 3).Value = workbooktocheck.Sheets("sheet1").Cells(b, 7)
mastersheet.Cells(A, 11).Value = workbooktocheck.Sheets("sheet1").Cells(b, 11)
答案 0 :(得分:0)
我需要知道 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
防止单元格已经填满时被覆盖。