Syntax

expression.Script

expression A variable that represents a Shape object.

Example

This example displays the type of scripting language used in the first shape on the active worksheet.

Visual Basic for Applications 
Set objScr = ActiveSheet.Shapes(1).Script If Not (objScr Is Nothing) Then Select Case objScr.Language Case msoScriptLanguageVisualBasic MsgBox "VBScript" Case msoScriptLanguageJava MsgBox "JavaScript" Case msoScriptLanguageASP MsgBox "Active Server Pages" Case Else Msgbox "Other scripting language" End Select End If
script Script Property