用磁盘中指定文件的文字更新“Microsoft 脚本编辑器”中的文字。
expression.LoadFromFile(Filename)
expressionHTMLProjectItem 对象。
FilenameString 类型,必需。包含要载入文字的文本文件的完整合法路径。
本示例判断是否已打开了指定的工程项;如果该项目已打开,那么本示例从指定文件中载入脚本。
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