Loop Through Tables In The Workbook Or Active Sheet

less than 1 minute read Sub LoopThroughAllTablesinWorkbook() Dim tbl As ListObject Dim sht As Worksheet ‘// Loop through each sheet and table in the workbook For Each sht In ThisWorkbook.Worksheets For Each tbl In sht.ListObjects ‘Do something to all the tables… tbl.ShowTotals = True Next tbl Next sht End Sub Sub LoopThroughAllTablesInWorksheet() Dim tbl As … Read more