Microsoft Office Forums - View Single Post - Macro to find a word in first row of table and then perform two macros

hmsrose · 01-29-2015, 10:15 AM

Quote:

Originally Posted by Guessed

I assume your macros are reliant on the selection object being in the first cell before running.

Code:

Sub AAA()
  Dim aTbl As Table
  For Each aTbl In ActiveDocument.Tables
    aTbl.Range.Cells(1).Range.Select
    Caption
    Table1
  Next aTbl
End Sub

Thanks so much for your help and the advice in naming macros! The macro you supplied worked perfectly. I was even able to add a section to it so that it would only run on selected tables and also remove the extra paragraph marks between the tables. This will be a huge time saver. Thanks again!