🚀 go-pugleaf

This is a snippet from ID 2.x - thanks to this forum I learned to count the lines which seems to work.
' count the text lines to see if it overflows and wraps to another line
cell_lines = MyTable.Rows.Item(row_loop).Cells.Item(column_loop).TextLines.Count
'if it wraps to another line the text line count will be over 1
Do While cell_lines > 1.5
' get the current tracking
MyIn_Tracking = MyInsertionpoint.Tracking
'compute a new tracking of current - 10
MyIn_New_Tracking = MyIn_Tracking - 10
' set the new tracking
MyInsertionpoint.Tracking = MyIn_New_Tracking
' count the text lines to see if it overflows and wraps to another line
cell_lines = MyTable.Rows.Item(row_loop).Cells.Item(column_loop).TextLines.Count
Loop
Good luck, iolaire