This example clears all tab stops for the text in shape two on slide one in the active presentation.
With Application.ActivePresentation.Slides(1).Shapes(2).TextFrame _
.Ruler.TabStops
For i = .Count To 1 Step -1
.Item(i).Clear
Next
End With