Hello All. I have the code below that irudyk helped me with. It works great. It looks for "TBD" . If they are in a Table, it gets the Section Number and the Title of the Table.
I need another piece of code to capture all of the data in the cell with the TBD. The cell might have "TBD <5.1>" with other text.. I need to capture all of that data in a variable.
I am running this code out of MS Access.
Please see attached file.
Dim FindRange As Word.Range
Set FindRange = ActiveDocument.Range
FindRange ' TBD"
Do While FindRange.Find.Execute() = True
pdPage = FindRange.Information(wdActiveEndPageNumber)
Selection.Goto wdGoToPage, wdGoToAbsolute, pdPage
pageNumberText = FindRange.Sections(1).Footers(WdHeaderFooterIndex.wdHeaderFooterPrimary).Range.Text
If FindRange.Information(Word.WdInformation.wdWithInTable) = True Then
strCaptureAllDataInTableCell = I need to capture all if the data in the cell once the TBD is found.
Experts Exchange is the only place where you can interact directly with leading experts in the technology field. Become a member today and access the collective knowledge of thousands of technology experts.