Forum Discussion
Excel
Dec 26, 2021Iron Contributor
Worksheets in alphabetical order with the help of VBA code
Hello Everyone, Wish you a Merry Christmas. I have written VBA code to import TEXT file to EXCEL file. And it successfully import. CODE : Result : But how to Worksheets i...
- Dec 26, 2021
Here is a macro to sort sheets:
Sub SortSheets() Dim i As Long Dim j As Long For i = 1 To Worksheets.Count - 1 For j = i + 1 To Worksheets.Count If Worksheets(i).Name > Worksheets(j).Name Then Worksheets(j).Move Before:=Worksheets(i) End If Next j Next i End Sub
You can call it at the end of ImprtTextFile, if desired.
HansVogelaar
Dec 26, 2021MVP
Here is a macro to sort sheets:
Sub SortSheets()
Dim i As Long
Dim j As Long
For i = 1 To Worksheets.Count - 1
For j = i + 1 To Worksheets.Count
If Worksheets(i).Name > Worksheets(j).Name Then
Worksheets(j).Move Before:=Worksheets(i)
End If
Next j
Next i
End Sub
You can call it at the end of ImprtTextFile, if desired.
- ExcelDec 27, 2021Iron ContributorIt worked. Thank you so much sir.