共用方式為


WorksheetBase.Scripts 屬性

取得 Microsoft.Office.Core.Scripts 集合,其中包含 Script 物件,當工作表儲存為 Web 網頁時,這些物件表示其中的指令碼或程式碼區塊。

命名空間:  Microsoft.Office.Tools.Excel
組件:  Microsoft.Office.Tools.Excel.v4.0.Utilities (在 Microsoft.Office.Tools.Excel.v4.0.Utilities.dll 中)

語法

'宣告
Public ReadOnly Property Scripts As Scripts
public Scripts Scripts { get; }

屬性值

型別:Microsoft.Office.Core.Scripts
Microsoft.Office.Core.Scripts 集合,其中包含 Script 物件,當工作表儲存為 Web 網頁時,這些物件表示其中的指令碼或程式碼區塊。

範例

下列程式碼範例會使用 Scripts 屬性,顯示目前工作表中的指令碼數目、將指令碼加入至工作表,然後顯示更新的指令碼數目。

這是示範文件層級自訂的範例。

Private Sub AddScript()
    MsgBox("There are " & Me.Scripts.Count & " scripts in this worksheet.")

    Me.Scripts.Add(Me.Range("A1"), _
        Office.MsoScriptLocation.msoScriptLocationInBody, _
        Office.MsoScriptLanguage.msoScriptLanguageVisualBasic, _
        "ScriptOne", String.Empty, "MsgBox ""This is ScriptOne.""")

    MsgBox("There are " & Me.Scripts.Count & " scripts in this worksheet.")
End Sub
private void AddScript()
{
    MessageBox.Show("There are " + this.Scripts.Count +
        " scripts in this worksheet.");

    this.Scripts.Add(this.Range["A1"],
        Office.MsoScriptLocation.msoScriptLocationInBody,
        Office.MsoScriptLanguage.msoScriptLanguageVisualBasic,
        "ScriptOne", String.Empty, @"MsgBox ""This is ScriptOne.""");

    MessageBox.Show("There are " + this.Scripts.Count +
        " scripts in this worksheet.");
}

.NET Framework 安全性

請參閱

參考

WorksheetBase 類別

Microsoft.Office.Tools.Excel 命名空間