Drastically shorten your training time with WalkMe's advanced online training solution that Guides your trainees to action. Forget about retraining and skyrocket knowledge retention rates.
Sub Sort() Dim S As Integer, SS As Integer, Start As Integer, Finish As Integer Start = Worksheets("Start").Index Finish = Worksheets("Finish").Index If (Finish - Start) > 2 Then For SS = Start + 1 To Finish - 2 For S = Start + 1 To Finissh - 2 If Worksheets(S + 1).Name < Worksheets(S).Name Then Worksheets(S + 1).Move before:=Worksheets(S) Next Next End If End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.