StyleSheet Example |
Using Programming Languages other than VBA
Sub Example_StyleSheet() ' This example finds the name of the style sheet for the active layout Dim styleSheetName As String styleSheetName = ThisDrawing.ActiveLayout.StyleSheet If styleSheetName = "" Then MsgBox "There is no style sheet set for the active layout." Else MsgBox "The style sheet for the active layout is: " & styleSheetName End If End Sub
Comments? |