excel - 有什么方法可以加快 VBScript 中的 excel 比较速度？

Question

我首先制作了一个 VBA 脚本来比较两个 excel 文件。然后使用 Variant 对其进行优化，如this question中所述。但后来，我把它改成了 VBScript。在这里，上面说的方法似乎不起作用。还有其他更好的方法来加快这个过程吗？特别是对于大文件。

我的核心代码如下：-

For Each cell In objxlWorksheet1.UsedRange
 If cell.Value <> objxlWorksheet2.Range(cell.Address).Value Then
  'fill the color in the cell if there is a mismatch and Increment the counter
  objxlWorksheet2.Range(cell.Address).Interior.ColorIndex = 3
  counter=counter+1
 End If
Next

Answer 1

这取决于您要比较的是什么。如果您有两张具有相似数据表的工作表，则使用公式而不是 VBA 代码会更容易。只需创建一个新工作表并输入如下公式：=Sheet1!A1=Sheet2!A1然后您可以使用 Ctrl-Find 搜索False

或者，如果您可以并排复制一张工作表上的数据，您可以使用条件格式来突出显示不同的值。