'Align textbox and shape in Word via VBA

Problem 1

In MS Word, the Align commands as pictured below, do not work on textboxes. I have a textbox and a shape and would like them centered together.

Align commands

Solution

I'd like to write a VBA sub that'd take care of this. It is however quite complicated to determine which two objects are selected, especially if they're on a canvas or only one of them is on a canvas. It seems easier to read their names off the Selection taskpane.

Problem 2

How to determine which objects are highlighted on the Selection pane? In the example below, I'd like VBA to know that "3-Point Star 10" and "3-Point Star 9" are selected.

Selection taskpane

vbams-word


Sources

This article follows the attribution requirements of Stack Overflow and is licensed under CC BY-SA 3.0.

Source: Stack Overflow

Solution Source

Related Questions

How do I get the paragraph number of the currently selected paragraph in Microsoft Word into an AppleScript variable?

Retrieving custom property value from received mail using GetProperty (which was set using SetProperty in Outlook VBA)

VBA to copy a file from one directory to another

How to add icons to emails in Outllook?

I keep assigning a value to my variable but it stays empty

Check if a cell from a selected range is visible

Create table from data on a worksheet with specific name and add column

Using VBA to query a SQL Server table in Excel

How can I generate a "Social Golfer" matrix for worker seating arrangement?

How to stop scroll bar auto jump in vba

Delete a mailitem permanently in outlook

If IsEmpty then go to column A but in same row and extract that data

Fetch data from website table using vba

How can I use a for each loop on an array?

VBA - worksheet object is hidden