Split Worksheet to Multiple Worksheets

[markoakes]

I have a worksheet that has data in columns A to N. The Salesman’s number is in column A and I need to split this first worksheet in to separate worksheets in the same workbook for each salesman.

 

[SLKGVILLE]

Try this (added code in red)

Sub SalesmanToSheet()
Dim lastrow As Long, LastCol As Integer, i As Long, iStart As Long, iEnd As Long
Dim ws As Worksheet
Application.ScreenUpdating = False
With ActiveSheet
   Application.DisplayAlerts = False
   For Each ws In ThisWorkbook.Worksheets
       If ws.Name <> .Name Then ws.Delete
   Next ws
   Application.DisplayAlerts = True
    lastrow = .Cells(Rows.Count, "A").End(xlUp).Row
    LastCol = .Cells(1, Columns.Count).End(xlToLeft).Column
    .Range(.Cells(2, 1), Cells(lastrow, LastCol)).Sort Key1:=Range("A2"), Order1:=xlAscending, _
        Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
    iStart = 2
    For i = 2 To lastrow
        If .Range("A" & i).Value <> .Range("A" & i + 1).Value Then
            iEnd = i
            Sheets.Add after:=Sheets(Sheets.Count)
            Set ws = ActiveSheet
            On Error Resume Next
            ws.Name = .Range("A" & iStart).Value
            On Error GoTo 0
            ws.Range(Cells(1, 1), Cells(1, LastCol)).Value = .Range(.Cells(1, 1), .Cells(1, LastCol)).Value
            With ws.Rows(1)
                .HorizontalAlignment = xlCenter
                With .Font
                    .ColorIndex = 5
                    .Bold = True
                End With
            End With
            .Range(.Cells(iStart, 1), .Cells(iEnd, LastCol)).Copy Destination:=ws.Range("A2")
            iStart = iEnd + 1
        End If
    Next i
End With
Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub

There is a more versatile version of this code here http://www.mrexcel.com/forum/showthread.php?t=396069

PERFECT!!! This is exactly what I'm looking for. Thank you so much for helping me with this!

 

[SLKGVILLE]

Thanks again for the help yesterday. I've been asked to add one more thing to my workbook. I have address information along with some demographic fields populated with numbers. I want to group by zipcode and sum up the demographic numbers and create a new tab for each zipcode. So each tab would only have one zipcode with summed up demographic numbers. Is this possible? Thanks again for your time and help!!!

 

[VoG]

Do you mean that you want to add totals at the bottom of some of the columns? If so, which columns?

 

[SLKGVILLE]

Do you mean that you want to add totals at the bottom of some of the columns? If so, which columns?

I do want to sum the demographic columns by zipcode but want the totals to show in their own worksheet. So for example zipode 29690 will have its own tab with one line of totals. Does this make sense?

 

[VoG]

No sorry, I'm not getting it.

Try posting samples of what you have and what you want using Excel Jeanie http://www.excel-jeanie-html.de/html/hlp_schnell_en.php

 

[SLKGVILLE]

No sorry, I'm not getting it.

Try posting samples of what you have and what you want using Excel Jeanie http://www.excel-jeanie-html.de/html/hlp_schnell_en.php

Sorry, It's probably the way I'm trying to explain it to you. I'm basically looking for the same type of macro you gave me yesterday that splits the data into new worksheets based off of a column. In this case the column would be the zipcode instead of the route number. The zipcode is in column C. I have demographic fields that are populated with numbers. So for example....In my master spreadsheet I have 50 addresses in the zipcode 29690 and there is a demographic field called children...indicating how many children live at that address. If each address has one child living there then I would have a new worksheet created for 29690 with the children column summed to 50.

 

[VoG]

So which columns need to be summed?

 

[SLKGVILLE]

Here is an example of my spreadsheet. Zip5 is the column I'm talking about. I would want to sum all the columns except lat long, zip9, route. The end result would be a new worksheet called 29690 with one row containing all the summed columns.

FINAL_TABLE

<TABLE style="BACKGROUND-COLOR: #ffffff; PADDING-LEFT: 2pt; PADDING-RIGHT: 2pt; FONT-FAMILY: MS Sans Serif,Arial; FONT-SIZE: 10pt" border=1 cellSpacing=0 cellPadding=0><COLGROUP><COL style="WIDTH: 30px; FONT-WEIGHT: bold"><COL style="WIDTH: 55px"><COL style="WIDTH: 257px"><COL style="WIDTH: 42px"><COL style="WIDTH: 74px"><COL style="WIDTH: 112px"><COL style="WIDTH: 84px"><COL style="WIDTH: 55px"><COL style="WIDTH: 89px"><COL style="WIDTH: 102px"><COL style="WIDTH: 74px"><COL style="WIDTH: 74px"><COL style="WIDTH: 74px"><COL style="WIDTH: 74px"><COL style="WIDTH: 74px"><COL style="WIDTH: 74px"><COL style="WIDTH: 85px"><COL style="WIDTH: 95px"><COL style="WIDTH: 82px"><COL style="WIDTH: 82px"><COL style="WIDTH: 82px"><COL style="WIDTH: 82px"><COL style="WIDTH: 82px"><COL style="WIDTH: 82px"><COL style="WIDTH: 82px"><COL style="WIDTH: 89px"><COL style="WIDTH: 97px"><COL style="WIDTH: 97px"><COL style="WIDTH: 97px"><COL style="WIDTH: 97px"><COL style="WIDTH: 97px"><COL style="WIDTH: 93px"><COL style="WIDTH: 97px"><COL style="WIDTH: 84px"><COL style="WIDTH: 92px"><COL style="WIDTH: 99px"><COL style="WIDTH: 99px"><COL style="WIDTH: 99px"><COL style="WIDTH: 99px"></COLGROUP><TBODY><TR style="TEXT-ALIGN: center; BACKGROUND-COLOR: #cacaca; FONT-SIZE: 8pt; FONT-WEIGHT: bold"><TD> </TD><TD>A</TD><TD>B</TD><TD>C</TD><TD>D</TD><TD>E</TD><TD>F</TD><TD>G</TD><TD>H</TD><TD>I</TD><TD>J</TD><TD>K</TD><TD>L</TD><TD>M</TD><TD>N</TD><TD>O</TD><TD>P</TD><TD>Q</TD><TD>R</TD><TD>S</TD><TD>T</TD><TD>U</TD><TD>V</TD><TD>W</TD><TD>X</TD><TD>Y</TD><TD>Z</TD><TD>AA</TD><TD>AB</TD><TD>AC</TD><TD>AD</TD><TD>AE</TD><TD>AF</TD><TD>AG</TD><TD>AH</TD><TD>AI</TD><TD>AJ</TD><TD>AK</TD><TD>AL</TD></TR><TR style="HEIGHT: 17px"><TD style="TEXT-ALIGN: center; BACKGROUND-COLOR: #cacaca; FONT-SIZE: 8pt">1</TD><TD style="TEXT-ALIGN: left">ROUTE</TD><TD style="TEXT-ALIGN: left">STREET</TD><TD style="TEXT-ALIGN: left">ZIP5</TD><TD style="TEXT-ALIGN: left">ZIP9</TD><TD style="TEXT-ALIGN: left">GMORTHC_AVG</TD><TD style="TEXT-ALIGN: left">HV_AVG</TD><TD style="TEXT-ALIGN: left">COUNT</TD><TD style="TEXT-ALIGN: left">Z2_LAT_AVG</TD><TD style="TEXT-ALIGN: left">Z2_LONG_AVG</TD><TD style="TEXT-ALIGN: left">Age_18_24</TD><TD style="TEXT-ALIGN: left">Age_25_34</TD><TD style="TEXT-ALIGN: left">Age_35_44</TD><TD style="TEXT-ALIGN: left">Age_45_54</TD><TD style="TEXT-ALIGN: left">Age_55_64</TD><TD style="TEXT-ALIGN: left">Age_65_74</TD><TD style="TEXT-ALIGN: left">Age_75_plus</TD><TD style="TEXT-ALIGN: left">Inc_under_20K</TD><TD style="TEXT-ALIGN: left">Inc_20K_30K</TD><TD style="TEXT-ALIGN: left">Inc_30K_40K</TD><TD style="TEXT-ALIGN: left">Inc_40K_50K</TD><TD style="TEXT-ALIGN: left">Inc_50K_60K</TD><TD style="TEXT-ALIGN: left">Inc_60K_70K</TD><TD style="TEXT-ALIGN: left">Inc_70K_80K</TD><TD style="TEXT-ALIGN: left">Inc_80K_90K</TD><TD style="TEXT-ALIGN: left">Inc_90K_100K</TD><TD style="TEXT-ALIGN: left">Inc_100K_110K</TD><TD style="TEXT-ALIGN: left">Inc_110K_120K</TD><TD style="TEXT-ALIGN: left">Inc_120K_130K</TD><TD style="TEXT-ALIGN: left">Inc_130K_140K</TD><TD style="TEXT-ALIGN: left">Inc_140K_150K</TD><TD style="TEXT-ALIGN: left">Inc_150K_plus</TD><TD style="TEXT-ALIGN: left">HV_under_50K</TD><TD style="TEXT-ALIGN: left">HV_50K_75K</TD><TD style="TEXT-ALIGN: left">HV_75K_100K</TD><TD style="TEXT-ALIGN: left">HV_100K_125K</TD><TD style="TEXT-ALIGN: left">HV_125K_150K</TD><TD style="TEXT-ALIGN: left">HV_150K_175K</TD><TD style="TEXT-ALIGN: left">HV_175K_200K</TD></TR><TR style="HEIGHT: 17px"><TD style="TEXT-ALIGN: center; BACKGROUND-COLOR: #cacaca; FONT-SIZE: 8pt">2</TD><TD style="TEXT-ALIGN: left">1</TD><TD style="TEXT-ALIGN: left">AIRLINE RD</TD><TD style="TEXT-ALIGN: left">29690</TD><TD style="TEXT-ALIGN: left">29690-8114</TD><TD style="TEXT-ALIGN: left">122641</TD><TD style="TEXT-ALIGN: left">258250.4774</TD><TD style="TEXT-ALIGN: left">1</TD><TD style="TEXT-ALIGN: left">35.0576998</TD><TD style="TEXT-ALIGN: left">35.0576998</TD><TD> </TD><TD style="TEXT-ALIGN: left">1</TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD style="TEXT-ALIGN: left">1</TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD></TR><TR style="HEIGHT: 17px"><TD style="TEXT-ALIGN: center; BACKGROUND-COLOR: #cacaca; FONT-SIZE: 8pt">3</TD><TD style="TEXT-ALIGN: left">1</TD><TD style="TEXT-ALIGN: left">BATES VIEW DR</TD><TD style="TEXT-ALIGN: left">29690</TD><TD style="TEXT-ALIGN: left">29690</TD><TD style="TEXT-ALIGN: left">81269.10526</TD><TD style="TEXT-ALIGN: left">167648.0175</TD><TD style="TEXT-ALIGN: left">21</TD><TD style="TEXT-ALIGN: left">35.017117</TD><TD style="TEXT-ALIGN: left">35.017117</TD><TD style="TEXT-ALIGN: left">2</TD><TD style="TEXT-ALIGN: left">3</TD><TD style="TEXT-ALIGN: left">9</TD><TD style="TEXT-ALIGN: left">3</TD><TD style="TEXT-ALIGN: left">3</TD><TD style="TEXT-ALIGN: left">1</TD><TD> </TD><TD style="TEXT-ALIGN: left">1</TD><TD> </TD><TD style="TEXT-ALIGN: left">4</TD><TD style="TEXT-ALIGN: left">2</TD><TD style="TEXT-ALIGN: left">3</TD><TD style="TEXT-ALIGN: left">7</TD><TD style="TEXT-ALIGN: left">3</TD><TD> </TD><TD style="TEXT-ALIGN: left">1</TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD style="TEXT-ALIGN: left">3</TD><TD> </TD><TD> </TD><TD style="TEXT-ALIGN: left">2</TD><TD style="TEXT-ALIGN: left">16</TD></TR><TR style="HEIGHT: 17px"><TD style="TEXT-ALIGN: center; BACKGROUND-COLOR: #cacaca; FONT-SIZE: 8pt">4</TD><TD style="TEXT-ALIGN: left">1</TD><TD style="TEXT-ALIGN: left">BLUE RIDGE WAY</TD><TD style="TEXT-ALIGN: left">29690</TD><TD style="TEXT-ALIGN: left">29690-8626</TD><TD style="TEXT-ALIGN: left">93205</TD><TD style="TEXT-ALIGN: left">147069.5124</TD><TD style="TEXT-ALIGN: left">4</TD><TD style="TEXT-ALIGN: left">35.034783</TD><TD style="TEXT-ALIGN: left">35.034783</TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD style="TEXT-ALIGN: left">2</TD><TD style="TEXT-ALIGN: left">2</TD><TD> </TD><TD style="TEXT-ALIGN: left">1</TD><TD> </TD><TD> </TD><TD style="TEXT-ALIGN: left">2</TD><TD> </TD><TD style="TEXT-ALIGN: left">1</TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD style="TEXT-ALIGN: left">4</TD><TD> </TD><TD> </TD></TR><TR style="HEIGHT: 17px"><TD style="TEXT-ALIGN: center; BACKGROUND-COLOR: #cacaca; FONT-SIZE: 8pt">5</TD><TD style="TEXT-ALIGN: left">1</TD><TD style="TEXT-ALIGN: left">BRO0KS DR</TD><TD style="TEXT-ALIGN: left">29690</TD><TD style="TEXT-ALIGN: left">29690</TD><TD> </TD><TD style="TEXT-ALIGN: left">197772.7771</TD><TD style="TEXT-ALIGN: left">1</TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD style="TEXT-ALIGN: left">1</TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD style="TEXT-ALIGN: left">1</TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD style="TEXT-ALIGN: left">1</TD></TR><TR style="HEIGHT: 17px"><TD style="TEXT-ALIGN: center; BACKGROUND-COLOR: #cacaca; FONT-SIZE: 8pt">6</TD><TD style="TEXT-ALIGN: left">1</TD><TD style="TEXT-ALIGN: left">CENTER ST</TD><TD style="TEXT-ALIGN: left">29690</TD><TD style="TEXT-ALIGN: left">29690-1827</TD><TD style="TEXT-ALIGN: left">176933.8182</TD><TD style="TEXT-ALIGN: left">173633.9376</TD><TD style="TEXT-ALIGN: left">11</TD><TD style="TEXT-ALIGN: left">34.9649078</TD><TD style="TEXT-ALIGN: left">34.9649078</TD><TD> </TD><TD> </TD><TD style="TEXT-ALIGN: left">4</TD><TD style="TEXT-ALIGN: left">3</TD><TD style="TEXT-ALIGN: left">2</TD><TD> </TD><TD style="TEXT-ALIGN: left">2</TD><TD style="TEXT-ALIGN: left">5</TD><TD style="TEXT-ALIGN: left">2</TD><TD style="TEXT-ALIGN: left">2</TD><TD> </TD><TD> </TD><TD style="TEXT-ALIGN: left">1</TD><TD> </TD><TD style="TEXT-ALIGN: left">1</TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD style="TEXT-ALIGN: left">10</TD><TD style="TEXT-ALIGN: left">1</TD></TR><TR style="HEIGHT: 17px"><TD style="TEXT-ALIGN: center; BACKGROUND-COLOR: #cacaca; FONT-SIZE: 8pt">7</TD><TD style="TEXT-ALIGN: left">1</TD><TD style="TEXT-ALIGN: left">COOPER ST</TD><TD style="TEXT-ALIGN: left">29690</TD><TD style="TEXT-ALIGN: left">29690-1730</TD><TD style="TEXT-ALIGN: left">116290</TD><TD style="TEXT-ALIGN: left">98927.85342</TD><TD style="TEXT-ALIGN: left">9</TD><TD style="TEXT-ALIGN: left">34.9655126</TD><TD style="TEXT-ALIGN: left">34.9655126</TD><TD> </TD><TD> </TD><TD style="TEXT-ALIGN: left">5</TD><TD style="TEXT-ALIGN: left">1</TD><TD style="TEXT-ALIGN: left">2</TD><TD> </TD><TD style="TEXT-ALIGN: left">1</TD><TD style="TEXT-ALIGN: left">7</TD><TD> </TD><TD style="TEXT-ALIGN: left">1</TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD style="TEXT-ALIGN: left">1</TD><TD> </TD><TD> </TD><TD style="TEXT-ALIGN: left">9</TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD></TR><TR style="HEIGHT: 17px"><TD style="TEXT-ALIGN: center; BACKGROUND-COLOR: #cacaca; FONT-SIZE: 8pt">8</TD><TD style="TEXT-ALIGN: left">1</TD><TD style="TEXT-ALIGN: left">DEER VALLEY CT</TD><TD style="TEXT-ALIGN: left">29690</TD><TD style="TEXT-ALIGN: left">29690-3909</TD><TD style="TEXT-ALIGN: left">275364</TD><TD style="TEXT-ALIGN: left">333206.3377</TD><TD style="TEXT-ALIGN: left">5</TD><TD style="TEXT-ALIGN: left">35.1528764</TD><TD style="TEXT-ALIGN: left">35.1528764</TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD style="TEXT-ALIGN: left">4</TD><TD style="TEXT-ALIGN: left">1</TD><TD> </TD><TD> </TD><TD style="TEXT-ALIGN: left">1</TD><TD style="TEXT-ALIGN: left">2</TD><TD style="TEXT-ALIGN: left">1</TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD style="TEXT-ALIGN: left">1</TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD></TR><TR style="HEIGHT: 17px"><TD style="TEXT-ALIGN: center; BACKGROUND-COLOR: #cacaca; FONT-SIZE: 8pt">9</TD><TD style="TEXT-ALIGN: left">1</TD><TD style="TEXT-ALIGN: left">EDWARDS RD</TD><TD style="TEXT-ALIGN: left">29690</TD><TD style="TEXT-ALIGN: left">29690-8947</TD><TD style="TEXT-ALIGN: left">48000</TD><TD style="TEXT-ALIGN: left">103397.5612</TD><TD style="TEXT-ALIGN: left">2</TD><TD style="TEXT-ALIGN: left">35.0712028</TD><TD style="TEXT-ALIGN: left">35.0712028</TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD style="TEXT-ALIGN: left">1</TD><TD style="TEXT-ALIGN: left">1</TD><TD> </TD><TD style="TEXT-ALIGN: left">1</TD><TD> </TD><TD> </TD><TD style="TEXT-ALIGN: left">1</TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD style="TEXT-ALIGN: left">2</TD><TD> </TD><TD> </TD><TD> </TD></TR><TR style="HEIGHT: 17px"><TD style="TEXT-ALIGN: center; BACKGROUND-COLOR: #cacaca; FONT-SIZE: 8pt">10</TD><TD style="TEXT-ALIGN: left">1</TD><TD style="TEXT-ALIGN: left">FERNLEAF DR</TD><TD style="TEXT-ALIGN: left">29690</TD><TD style="TEXT-ALIGN: left">29690</TD><TD style="TEXT-ALIGN: left">80557.05834</TD><TD style="TEXT-ALIGN: left">153471.6963</TD><TD style="TEXT-ALIGN: left">46</TD><TD style="TEXT-ALIGN: left">34.9903788</TD><TD style="TEXT-ALIGN: left">34.9903788</TD><TD> </TD><TD style="TEXT-ALIGN: left">8</TD><TD style="TEXT-ALIGN: left">21</TD><TD style="TEXT-ALIGN: left">4</TD><TD style="TEXT-ALIGN: left">11</TD><TD style="TEXT-ALIGN: left">2</TD><TD> </TD><TD style="TEXT-ALIGN: left">1</TD><TD style="TEXT-ALIGN: left">4</TD><TD style="TEXT-ALIGN: left">12</TD><TD style="TEXT-ALIGN: left">3</TD><TD style="TEXT-ALIGN: left">9</TD><TD style="TEXT-ALIGN: left">7</TD><TD style="TEXT-ALIGN: left">7</TD><TD style="TEXT-ALIGN: left">3</TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD> </TD><TD style="TEXT-ALIGN: left">8</TD><TD style="TEXT-ALIGN: left">28</TD><TD> </TD><TD style="TEXT-ALIGN: left">4</TD></TR></TBODY></TABLE>

Excel tables to the web >> http://www.excel-jeanie-html.de/index.php?f=1" target="_blank"> Excel Jeanie HTML 4

 

[VoG]

Try

Sub ZipsToSheet()
Dim lastrow As Long, LastCol As Integer, i As Long, iStart As Long, iEnd As Long
Dim ws As Worksheet, j As Integer
Application.ScreenUpdating = False
With ActiveSheet
    Application.DisplayAlerts = False
    For Each ws In ThisWorkbook.Worksheets
        If ws.Name <> .Name Then ws.Delete
    Next ws
    Application.DisplayAlerts = True
    lastrow = .Cells(Rows.Count, "A").End(xlUp).Row
    LastCol = .Cells(1, Columns.Count).End(xlToLeft).Column
    .Range(.Cells(2, 1), Cells(lastrow, LastCol)).Sort Key1:=Range("C2"), Order1:=xlAscending, _
        Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
    iStart = 2
    For i = 2 To lastrow
        If .Range("A" & i).Value <> .Range("A" & i + 1).Value Then
            iEnd = i
            Sheets.Add after:=Sheets(Sheets.Count)
            Set ws = ActiveSheet
            On Error Resume Next
            ws.Name = .Range("C" & iStart).Value
            On Error GoTo 0
            ws.Range(Cells(1, 1), Cells(1, LastCol)).Value = .Range(.Cells(1, 1), .Cells(1, LastCol)).Value
            With ws.Rows(1)
                .HorizontalAlignment = xlCenter
                With .Font
                    .ColorIndex = 5
                    .Bold = True
                End With
            End With
            For j = 1 To 4
                ws.Cells(2, j).Value = .Cells(iStart, j).Value
            Next j
            For j = 5 To 38
                If j <> 8 And j <> 9 Then
                    ws.Cells(2, j).Value = WorksheetFunction.Sum(.Range(.Cells(iStart, j), .Cells(iEnd, j)))
                End If
            Next j
            iStart = iEnd + 1
        End If
    Next i
End With
Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub

 

[SLKGVILLE]

Thanks! It worked! Is there any way I can call on the worksheet "final_table" only? I have the 20 route tables you helped me split out yesterday and it's summing those too. Thank you so much!!