I have two little functions you could use to get a really simple solution for navigating a table-like object and setting a value in a cell. You can use the code as a template to build similar solutions if you'd like. It's basically using key navigation wrapped in loops controlled by the arguments that are passed in. The WinObject used is from a MS Excel workbook, but can of course be modified to something more appropriate for your needs:
'This function uses keyboard navigation to work with a table object. In this function example, an Excel
'Spreadsheet is used, but the WinObject lines should be changed to match your application
Function NavTable (RowNum,ColumnNum)
'Initialize Windows Scripting Shell object for keyboard use
Set WshShell = CreateObject(''Wscript.Shell'')
'Activate Table
Window(''Book1'').WinObject(''Book1'').Click
'Send Ctrl+HOME to go to home cell in upper left corner
WshShell.SendKeys ''^{HOME}''
'Use the row and column values to navigate through table using loops and key navigation
'Loop to desired row
For i = 1 to RowNum-1
WshShell.SendKeys ''{DOWN}''
Next
'Loop to desired column
For i =1 to ColumnNum-1
WshShell.SendKeys ''{RIGHT}''
Next
Set WshShell = Nothing
End Function
'This function is slightly different. It uses keyboard navigation to select the row/column, but also allows a typed
'value in the cell.
Function EditTable (RowNum, ColumnNum, TypeValue)
'Initialize Windows Scripting Shell object for keyboard use
Set WshShell = CreateObject(''Wscript.Shell'')
'Activate Table
Window(''Book1'').WinObject(''Book1'').Click
'Send Ctrl+HOME to go to home cell in upper left corner
WshShell.SendKeys ''^{HOME}''
'Use the row and column values to navigate through table using loops and key navigation
'Loop to desired row
For i = 1 to RowNum-1
WshShell.SendKeys ''{DOWN}''
Next
'Loop to desired column
For i =1 to ColumnNum-1
WshShell.SendKeys ''{RIGHT}''
Next
Window(''Book1'').WinObject(''Book1'').Type TypeValue
Set WshShell = Nothing
End Function
'Examples of calling the custom functions:
NavTable 6,8
EditTable 9,3,''Test Value''