Tabstops.add at PowerPoint 2007 RRS feed

  • Question

  • Hi,

    I am making a PowerPoint add-in to automate formatting.

    I use the following method to add a tabstop in the textbox

    Dim PPapp As PowerPoint.Application = GetObject(, "PowerPoint.Application")
    PPpre = PPapp.ActivePresentation
    Dim PPsel As PowerPoint.Selection = PPapp.ActiveWindow.Selection
    PPsel.ShapeRange.TextFrame.Ruler.TabStops.Add(PowerPoint.PpTabStopType.ppTabStopRight, 10)

    The point is, when I use this tabstops.add, the previous formatting of the selected textbox is gone!! There were bullet points, spacing, a lot of formattings. Then after I applied tabstops.add, everything becomes zero...Can anyone help me on this issue?

    Thank you in advance!!


    Sunday, April 24, 2011 1:08 PM


All replies