Deletes the first cell in the first row of the first table in the active document and shifts the other cells in the first row to the left to fill the gap: : Document Table « Word « VBA / Excel / Access / Word
Deletes the first cell in the first row of the first table in the active document and shifts the other cells in the first row to the left to fill the gap:
Sub del()
ActiveDocument.Tables(1).Rows(1).Cells(1).Delete _
ShiftCells:=wdDeleteCellsShiftLeft End Sub