我有一段代码使用了大约一百个数组名称(我下面的示例只使用了三个),每个包含不同数量的元素。我正在尝试使用变量“i”引用数组名称,其中“i”用于索引数组名称和工作表名称。
以“Selection.Replace”开头的代码行因“应用程序定义或对象定义错误”而失败这在 Excel 2007 for windows 中运行良好,但在 Excel for MAC 2011 中失败。
我应该进行哪些更改才能使其重新工作(除了仅使用 Excel 2007 或 2010)?
干杯!
hist1 array("a","b","c","d","x")
hist2 array("a","e","f","g")
hist3 array("a","b","c","d","g","x")
i = 1
Do While i < 4
j = 0
Select Case i
Case 1
cnt = 4
Case 2
cnt = 3
Case 3
cnt = 5
End Select
Do While j < cnt
Sheets(i).Select
Selection.Replace What:="hist" & i & "(" & cnt & ")", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
j = j + 1
Loop
i = i + 1
Loop