在VBA中跨越页面范围？

我试图制作一个范围，跨越几张纸，一个三维参考，因为他们称之为。 以下是MS如何手动完成的例子 。 那么我需要做的代码（不，我不能使用表单公式）。 所以我做了…

Set m1 = Sheets("Sheet1").Cells(1, 1) Set m2 = Sheets("Sheet2").Cells(3, 1) Set m3 = Union(m1, m2) 

但是，这将返回可怕的'1004'错误，就像我尝试过的其他语法一样。 然后，我尝试通过select多个工作表来手动执行此操作，并使用此…

 Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range) MsgBox "range address: " & Target.Address End Sub 

而且这总是只返回ActiveSheet上select的部分。

那么，有没有办法让一个范围跨越表单？

Answer 1

Range对象只能是单个工作表上的一组单元格。 但是，您可以创build可以跨越多个工作表的范围数组或范围集合 。