特定の Excel スプレッドシートですべての配列数式を検索する方法はありますか?
質問する
10626 次
2 に答える
11
この例を見てください。それが役立つことを願っています。
Sub array_formula()
Dim rRange As Range, cell As Range
Dim tot As Integer
Set rRange = ActiveSheet.UsedRange.SpecialCells(xlCellTypeFormulas)
For Each cell In rRange
If cell.HasArray Then
MsgBox cell.Address & " " & cell.formula
tot = tot + 1
End If
Next cell
MsgBox "total number of array formula: " & tot
End Sub
于 2011-05-09T16:26:40.507 に答える