User login

Declare And Set Worksheets In A Loop

The following Excel VBA code declares and sets an array of 30 worksheets.

Dim sht(30) As Worksheet

For i = 1 To 30
Set sht(i) = ActiveWorkbook.Worksheets(i)
Next i

http://www.ozgrid.com/forum