LoadFromFile 方法

       

用磁盘中指定文件的文字更新“Microsoft 脚本编辑器”中的文字。

expression.LoadFromFile(Filename)

expression   HTMLProjectItem 对象。

Filename   String 类型,必需。包含要载入文字的文本文件的完整合法路径。

示例

本示例判断是否已打开了指定的工程项;如果该项目已打开,那么本示例从指定文件中载入脚本。

If ActiveWorkbook.HTMLProject.HTMLProjectItems _
    .Item(1).IsOpen Then
    ActiveWorkbook.HTMLProject.HTMLProjectItems _
        .Item(1).LoadFromFile ("C:\MyScript.txt")
Else
    MsgBox "The HTMLProjectItem is not open."
End If