MyTetra Share
Делитесь знаниями!
Параметры_кнопки
Время создания: 16.03.2019 23:43
Раздел: !Закладки - VBA - Excel - Shapes

Sub Параметры_кнопки()

Dim oSh As Shape

For Each oSh In ActiveSheet.Shapes

' : AlternativeText : "main" : String

' : OnAction : "'Name.xlsm'!MainSelect" : String

Debug.Print oSh.AlternativeText & " - " & oSh.OnAction

Next

End Sub

Так же в этом разделе:
 
MyTetra Share v.0.53
Яндекс индекс цитирования