我正在尝试使用多个工作簿,其中一个是共享工作簿。 就我的测试而言,看起来我无法将工作簿/工作表变量设置为共享工作库的变量。
有没有一种方法可以解决,或者如果没有首先取消共享,这是不可能的?
以下是我测试过的方法(将共享工作簿作为活动工作簿):
Sub TestAssign()
Dim wb As Workbook
Dim ws As Worksheet
Dim r As Range
With Workbooks("testSHARE.xlsb")
Set ws = .Sheets(1)
End With
Set wb = ActiveWorkbook
Set ws = wb.Sheets("Sheet1")
Set ws = wb.Sheets(1)
Set ws = ActiveSheet
Set r = Range("A1:P5")
End Sub
答案 0 :(得分:0)
如果为corraboration设置了共享工作簿,则可以修改共享工作簿。
安装程序在http://office.microsoft.com/en-us/excel-help/use-a-shared-workbook-to-collaborate-HP010096833.aspx解释。