Спойлер в Ворде - VBA

Формулировка задачи:

Здравствуйте, не подскажите как создать?

Решение задачи: «Спойлер в Ворде»

textual
                            Листинг программы 
                        

                            Sub main()
    On Error Resume Next
    For Each shap In Me.Shapes
            Debug.Print "Index: "; shap.ZOrderPosition
            Debug.Print "Name: "; shap.Name
            Debug.Print "Text: "; shap.AlternativeText
            Debug.Print "========================="
    Next shap
End Sub
                        

Оцени полезность:

14 голосов , оценка 4.357 из 5

Похожие ответы