Shape.Script Property

  • Article
Excel Developer Reference

Returns the Script object, which represents a block of script or code on the specified Web page. If the page contains no script, nothing is returned.

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