I have a tab that lists my desired sheet names in Column A, rows 1-29. (There are exactly 29 rows already created).
Dim i As Long
For i = 1 To ActiveWorkbook.Sheets.Count
On Error Resume Next
ActiveWorkbook.Sheets(i).Name = ActiveSheet.Cells(i, "A").Text
Next i
I've realized now that I need...