So I have the following code....I am fairly novice so I am not sure this is even the most effective way to do this
Sub BuildTable()
Application.ScreenUpdating = False
Dim copySheet AsWorksheet
Dim pasteSheet AsWorksheet
Dim LastRow As Long
Set copySheet =Worksheets("Combined...