Use something like:

ActiveDocument.Tables(x).Cell(y, z).Select

where x is table number, y is row number of table, and z is column
number of table. Be aware that, for a non-empty Word cell, the
selection contains the "cell terminator." I just remove the last two
characters. You could also use the statement:

Selection.MoveLeft unit:=wdCharacter, Count:=1, Extend:=True

to get rid of the "cell terminator."