Sub ScratchMacro()
'A basic Word macro coded by Greg Maxey
Dim oRow As Word.Row
For Each oRow In Selection.Tables(1).Rows
  Do While oRow.Cells(1).Range.Characters.First = Chr(32)
    oRow.Cells(1).Range.Characters.First.Delete
  Loop
   Do While oRow.Cells(2).Range.Characters.First = Chr(32)
    oRow.Cells(2).Range.Characters.First.Delete
  Loop
  If Len(oRow.Range) = 6 Then
    oRow.Delete
  End If
Next
End Sub