Here's the Excel macro I use to do an indexing on an entire spreadsheet:
Sub IndexSpreadsheetEntire()
Dim rng As Range
With ActiveSheet
Set rng = .Range(.Cells(2, 2), .Cells(2, 2).End(xlDown))
End With
Set rng = rng.Offset(-1, -1)
rng(1) = 1
rng(2) = 2
rng(1).Resize(2, 1).AutoFill rng
End Sub
The use of rng( ) sets up concommitant cell value inputs for the AutoFill to scope the entire sheet. Fiddling with the offsets allows the user to change the origin of the array.
Submit an article or tip