GoTo Cell Reference in wdTable

Hdata · #1 02-09-2017, 09:27 PM

Yes, I have word tables previously setup with updateable cell formulas. I also have a list of cell references which I would like to GoTo in order to update these formulas.

Essentially you have hit the nail on the head. I want to select the contents of that cell or a range of cells in order to update formulas within that cell or range of cells without updating the entire table.

Thanks for your expertise regarding VBA code. (Hdata)

macropod · #2 02-10-2017, 05:21 AM

Quote:

Originally Posted by Hdata

Yes, I have word tables previously setup with updateable cell formulas. I also have a list of cell references which I would like to GoTo in order to update these formulas.

You don't need to 'Goto' or 'Select' anything for this. All you need is something like:

Code:

Sub Demo()
Application.ScreenUpdating = False
Dim ArrTbls, ArrRows, ArrCols, i As Long
ArrTbls = Array(1, 1, 3, 3, 4, 5)
ArrRows = Array(6, 8, 6, 8, 6, 6)
ArrCols = Array(4, 4, 5, 7, 2, 2)
With ActiveDocument
  For i = 0 To UBound(ArrTbls)
    .Tables(ArrTbls(i)).Cell(ArrRows(i), ArrCols(i)).Range.Fields.Update
  Next
End With
Application.ScreenUpdating = True
End Sub

With this code, you use three arrays, one each for the tables, rows & columns to be updated. Each array contains its respective table index, row index and cell index for the cells you want to update. In the above demo, the first set of array entries points to table 1, row 6 column 4, the second set of array entries points to table 1, row 8 column 4, and so on.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Reference Word Table Cell Using Offset?	wlcdo2	Word VBA	2	06-19-2016 08:53 PM
Assign the value of a cell as a cell reference of another cell in Excel 2010 - How to?	bharathkumarst	Excel	7	10-13-2014 10:25 AM
Locking A Cell Reference Regardless	skoz55	Excel	8	05-16-2014 09:15 AM
Keeping an absolute reference in a cell	bremen22	Excel	7	01-16-2014 11:06 AM
How to reference a cell value	Jmoney2290	Excel	1	11-06-2013 09:39 PM