View Single Post
 
Old 05-04-2019, 03:06 PM
macropod's Avatar
macropod macropod is offline Windows 7 64bit Office 2010 32bit
Administrator
 
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 22,467
macropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond repute
Default

What do you mean by "Is there a way to set the axis the shape/inlineshape axis after a rotation"? What axis?

The basic code to rotate an InlineShape is:
Code:
Sub Demo()
Dim Shp As Shape
With ActiveDocument
  Set Shp = .InlineShapes(1).ConvertToShape
  With Shp
    .Rotation = 90
    .ConvertToInlineShape
  End With
End With
End Sub
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
Reply With Quote