Multiple tabs created

When I download a report from another system I use it does so by limiting the number of rows per tab (50). Therefore I get it with 11 tabs. Is there a way to add tabs 2-11 to tab 1? Or add all 11 to a new tab?

You could run a simple VBA script on the file to combine all sheets into sheet 1.

Would that be of interest?

BSB

Yes It would. I'll switch it to xslm and attach a file.

Here is the file I get from Maximo.

In the attached I've linked the sub below to a button on sheet 1. When you click it data from all sheets will be consolidated to sheet 1.

Sub CombineSheets()
    Dim i As Integer
    Dim lr As Long
    
    With ActiveWorkbook
        For i = 2 To .Sheets.Count
            With .Sheets(i)
                lr = .Cells(Rows.Count, "A").End(xlUp).Row
                .Range("A4:H" & lr).Copy Sheets(1).Cells(Rows.Count, "A").End(xlUp).Offset(1)
            End With
        Next i
    End With
End Sub

You can store the sub in a Personal.xlsb and run it from there so long as the newly downloaded data is the active workbook at the time.

BSB

That was excellent. Worked exactly as I needed. Thank you.

No problem at all. Happy to help

Thanks for the feedback.

BSB