What shortcut key use for change angle of rotation of text 0’ to 90’ ??
Sorry, I should read your post more carefully.
Here you have macro that rotate selected object about 90°. You can assign shortcut to this macro.
Best regards,
Mek
Sub Macro1() Dim OS As ShapeRange, x#, y#, w#, h# ActiveDocument.BeginCommandGroup "Rotation" Set OS = ActiveSelectionRange OS.GetBoundingBox x, y, w, h OS.Rotate 90# OS.SetPosition x, y + w ActiveDocument.EndCommandGroupEnd Sub