Wow, I salute you, it's working. Thank for your time. I very appreciate...Does it make any difference we copy/paste values only?
VBA Code:Sub CombineTables_v3() Dim i As Long Sheets.Add Before:=Sheets(1) For i = 2 To Sheets.Count With Sheets(i) If .ListObjects.Count > 0 Then .ListObjects(1).Range.Copy Sheets(1).Range("A" & Rows.Count).End(xlUp).Offset(1).PasteSpecial xlValues End If End With Next i Sheets(1).Rows(1).Delete End Sub
This is the best way if could, because my table is live data, it's easy to refresh compare to copy and paste. Unfortunately my table have different headers name. Any idea, how to make it possible?
Sorry mate I don't use formulas so I can't helpThis is the best way if could, because my table is live data, it's easy to refresh compare to copy and paste. Unfortunately my table have different headers name. Any idea, how to make it possible?