Scripts 属性

返回 Scripts 集合，该集合中包含许多 Script 对象，这些对象代表保存为 Web 页的指定文档中的脚本或代码段。

expression   必需。该表达式返回“应用于”列表中的对象之一。

示例

本示例向活动工作表的 Scripts 集合中添加一个新的 VBScript 块。

Set objScrs = ActiveSheet.Scripts
Set objNewScr = objScrs.Add
objNewScr.Language = msoScriptLanguageVisualBasic