Updating existing connectors that have connector text off-center

Started by UGABulldog80, July 25, 2013, 06:11:14 PM

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.


Hi -

I inherited a lot of process flows that were created using a theme and the Connector Variant Ion, and all of the connector text is off center (e.g. for straight lines the yellow text anchor is slightly below the actual connector). I was wondering if there was a way to fix all of them at once by correcting a Master and cascading it down, or some other method.  I've tried looking at the Master connector ShapeSheet values but I'm a novice when it comes to understanding how Themes/Variants work and I can only assume that the Variant is overriding the master connector.

I've also tried switching to the Whisp Variant but that only works on correcting the NEW connectors that I add and not the old ones. I'm sure it's something really simple but I can't figure it out for the life of me.

Any help would be appreciated!


Thomas Winkel

I guess you have to do that in VBA:

Sub CenterText()
  Dim aPage As Page
  Dim aShape As Shape
  For Each aPage In Application.ActiveDocument.Pages
    For Each aShape In aPage.Shapes
      If aShape.Style = "Connector" Then
        aShape.Cells("Controls.TextPosition.X").Formula = "Width*0"
        aShape.Cells("Controls.TextPosition.Y").Formula = "Height*0.5"
      End If
End Sub