Sort multiple tabs

BakerBaker

New Member
Joined
Feb 12, 2018
Messages
16
Thank you in anticipation.

I have multiple tabs on a worksheet that are ordered thus (the numerals are times but set as text):

Bus 14.10 Bus 14.40 Bus 15.10 Car 14.15 Car 14.45 Car 15.15 Plane 14.20 Plane 14.50 Plane 15.20

I would like to sort the tabs in TIME order.
 

Some videos you may like

Excel Facts

Will the fill handle fill 1, 2, 3?
Yes! Type 1 in a cell. Hold down Ctrl while you drag the fill handle.

Fluff

MrExcel MVP, Moderator
Joined
Jun 12, 2014
Messages
42,835
Office Version
365
Platform
Windows
How about
Code:
Sub BakerBaker()
   Dim i As Long, j As Long
   For i = 1 To Sheets.Count - 1
      For j = i + 1 To Sheets.Count
         If Val(Split(Sheets(i).Name)(1)) > Val(Split(Sheets(j).Name)(1)) Then
            Sheets(i).Move , Sheets(j)
         End If
      Next j
   Next i
End Sub
 

BakerBaker

New Member
Joined
Feb 12, 2018
Messages
16
Brilliant, that works fine - puts all tabs in timed order just as I wished.
Thanks for doing this so quickly - provided a very convenient feature.
 

Fluff

MrExcel MVP, Moderator
Joined
Jun 12, 2014
Messages
42,835
Office Version
365
Platform
Windows
You're welcome & thanks for the feedback
 

Watch MrExcel Video

Forum statistics

Threads
1,102,665
Messages
5,488,177
Members
407,630
Latest member
Mehezabin

This Week's Hot Topics

  • Timer in VBA - Stop, Start, Pause and Reset
    [CODE=vba][/CODE] Option Explicit Dim CmdStop As Boolean Dim Paused As Boolean Dim Start Dim TimerValue As Date Dim pausedTime As Date Sub...
  • how to updates multiple rows in muliselect listbox
    Hello everyone. I need help with below code. code is only chaning 1st row in mulitiselect list box. i know issue with code...
  • Delete Row from Table
    I am trying to delete a row from a table using VBA using a named range to find what I need to delete. My Range is finding the right cell. In the...
  • Assigning to a variable
    I have a for each block where I want to assign the value in column 5 of the found row to the variable Serv. [CODE=vba] For Each ws In...
  • Way to verify information
    Hi All, I don't know what to call this formula, and therefore can't search. I have a spreadsheet with information I want to reference...
  • Active Cell Address – Inactive Sheet
    How to use VBA to get the cell address of the active cell in an inactive worksheet and then place that cell address in a location on the current...
Top