excel - 检查两个工作表是否相同

Question

我正在尝试检查一个工作表是否与另一个工作表相同。下面的示例显示了我是如何做到的。

Dim sheet1 as Worksheet, sheet2 as Worksheet
Set sheet1 = GetObject("C:\sheet1.xls").Worksheets(1)
Set sheet2 = GetObject("C:\sheet2.xls").Worksheets(1)

If sheet1 = sheet2 Then Debug.Print("Same workbook") 'Should of course return false, but instead gives an error

但这给出了错误Object doesn't support this property or method。那么如何比较像这样的两张纸呢？

Answer 1

使用Is...

If sheet1 Is sheet2 Then Debug.Print("Same workbook")

详细信息在这篇msdn文章中（IsNotVBA 似乎不支持除外）。

Answer 2

如果您已定义时间表名称，则可以比较 name 属性。

If sheet1.Name = sheet2.Name Then Debug.Print("Same workbook")