Estoy tratando de crear un código en vba excel para detectar qué hay dentro de los objetos de flujo de trabajo - 3D como los que se muestran en la siguiente imagen:

Las imágenes son siempre las mismas. He podido encontrar y seleccionar la oración dentro de la celda. Pero lo necesito para buscar todos los objetos de flujo de trabajo en diferentes visio.

Aquí es donde llegué a: Dim DiagramServices As Integer DiagramServices = ActiveDocument.DiagramServicesEnabled ActiveDocument.DiagramServicesEnabled = visServiceVersion140 + visServiceVersion150

 Dim vsoCharacters1 As Visio.Characters Set vsoCharacters1 = Application.ActiveWindow.Page.Shapes.ItemFromID(228).Characters Debug.Print vsoCharacters1

Necesito el código para encontrar primero todos los objetos de flujo de trabajo en diferentes páginas en visio y luego obtener la oración dentro (vsoCharacters1)