是否可以使用 vbscript 在 Excel 中打开 .htm 文件？

Question

Is it possible in vbscript to do something like the following?

Set xlApp = CreateObject("Excel.Application")
set xlBook = xlApp.WorkBooks.Open("filename.htm")

I looked at the api for WorkBooks.Open, but couldn't see any restrictions on the filename arg. Does it have to be a .xls or .xlsx file?

(I can't get to a work today because of an earthquake so I can't really try it out from where I am, but would be good to know in advanced if this is possible.)

• I want to programmatically open reports htm generated by winmerge in excel and save them as .xlsx files.

Answer 1

two answer... short answer yes you can... long answer, you can, but not gonna show the html file in excel but in Internet Explorer.

Logics: 1 - On excel, create a button to execute the VBA... 2 - create object as IE... set objIE = CreateObjcet("InternetExplorer.Application") 2.1 - Navigate to the objIE.Navigate "filename.htm" 2.2 - put it visible objIE.Visible true ...

this is an Example:

Function openIE(webPage)

Set openIE = CreateObject("InternetExplorer.Application")

With openIE

    If not .StatusBar then .StatusBar = True
    If not .Visible then .Visible = True
    If not .LocationURL = webPage then  .Navigate webPage
    If not .FullScreen then .FullScreen = True

End With

' Do Until is here because, the script is more faster then object.
' So, we need to make this script "talk" to the Internet Explorer.
Do Until openIE.ReadyState = 4

    WScript.Sleep 250

Loop

End Function