Merge Worksheets to

[smk81]

I would like to merge 5 (worksheets are named Ohio, Kentucky, Indiana, Michigan, & Pennsylvania) worksheets into a "Master" worksheet. Each of the 5 worksheets I wish to merge have the same column headings. Is there a simple VBA solution I can use? Thanks for any and all help!

 

[onlyadrafter]

Hello,
have assumed the Master worksheet is the right most tab in your workbook and that you only have the size tabs mentioned.

Sub COMBINE_SHEETS()
    Application.ScreenUpdating = False
    Sheets(6).Cells.ClearContents
    Sheets(1).Rows(1).Copy Sheets(6).Range("A1")
    For MY_SHEETS = 1 To 5
        With Sheets(MY_SHEETS)
            .Rows("2:" & .Range("A" & Rows.Count).End(xlUp).Row).Copy
            Sheets(6).Range("A" & Rows.Count).End(xlUp).Offset(1, 0).PasteSpecial (xlPasteValues)
        End With
    Next MY_SHEETS
    Application.CutCopyMode = False
    Application.ScreenUpdating = True
End Sub

also assume you only want the column headings once.