Ví dụ
=SUM(Sheet1:Sheet10!A1:A100)
Hàm trên cho phép cộng dãy giá trị từ A1 tới A100 trong tất cả các Sheet từ Sheet1 tới Sheet10 . Tuy nhiên điều đó sẽ không linh hoạt khi mà người ta lại dùng các Sheet với những tên khác nhau không theo trình tự .
Để giải quyết việc này chúng ta có thể viết hàm số trong Excel để có thể thực hiện một cách linh hoạt hơn .
Function SumAllWorksheets(InputRange As Range, InclAWS As Boolean) As Double
Dim ws As Worksheet, TempSum As Double
Application.Volatile True
TempSum = 0
For Each ws In ActiveWorkbook.Worksheets
If InclAWS Then
TempSum = TempSum + Application.WorksheetFunction.Sum(ws.Range(InputRange.Address))
Else
If ws.Name <> ActiveSheet.Name Then
TempSum = TempSum + Application.WorksheetFunction.Sum(ws.Range(InputRange.Address))
End If
End If
Next ws
Set ws = Nothing
SumAllWorksheets = TempSum
End Function