Microsoft Office Forums - View Single Post - Grouped Shapes Not Anchoring to Original Paragraph in Word VBA

ADAL · 12-13-2024, 03:45 AM

Quote:

Originally Posted by Guessed

There should be no need to ungroup the shapes as you can resize and move them as child elements. For instance,

Code:

            'shpGroup.Ungroup
            Debug.Print shpGroup.GroupItems.Count
            For Each shp In shpGroup.GroupItems
              If shp.Name = "1" Then Set L = shp
              If shp.Name = "2" Then Set C = shp
              If shp.Name = "3" Then Set R = shp
            Next

Having said that, I haven't taken the time to figure out the desired width and offsets and find the characters in the selected text stylename and right to left is not helping.

Hello,

The reason I'm reaching out is that Word VBA has a bug: while all measurements are typically in points, for some reason, when you use the Left property in GroupItems, it uses centimeters. This inconsistency is causing issues for me.