Macro to find a word in first row of table and then perform two macros

hmsrose · #1 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!

hmsrose · #2 01-29-2015, 11:54 AM

Quote:

Originally Posted by hmsrose

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!

Well, I thought I had the paragraph part down but that may have been a fluke.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Word VBA Find Table Text Shading Colour and replace with another	QA_Compliance_Advisor	Word VBA	10	09-19-2014 08:36 AM
Word VBA Macro to Find and Replace based on the Alt Text of an Image	bennymc	Word VBA	1	01-27-2014 04:23 PM
How Find Out What Keys Trigger My Macros?	peytontodd	Word	1	10-28-2013 09:39 AM
Find - Replace Macro using a table list	mdw	Word	0	08-01-2013 04:36 PM
Macro that can find phrase and then find another and copy	jperez84	Word VBA	10	09-19-2012 04:48 PM