一段时间以来,Excel一直具有“ Web意识”,这意味着该程序知道如何处理超链接。您可以在文档中添加超链接,单击该链接,然后Excel将打开您的Web浏览器并在浏览器中显示该链接的内容。 (您还可以创建指向其他Office文档(包括Excel工作簿)的超链接。)您甚至可以创建指向工作表上不同对象(例如表单中的命令按钮)的超链接。

但是,如果要启动浏览器并从VBA宏中打开HTML文件怎么办?您可以通过两种方法来执行此操作。

第一种是简单地在代码中打开一个新的Internet Explorer对象。要执行此操作的宏将显示如下:

Sub DoBrowse1()

Dim ie As Object     Set ie = CreateObject("Internetexplorer.Application")

ie.Visible = True     ie.Navigate "c:\temp\MyHTMLfile.htm"

End Sub

此宏将在新的Internet Explorer窗口中打开文件c:\ temp \ MyHTMLfile.htm。如果要改为通过Internet打开网页,则只需更改要导航的位置即可。

(用URL替换文件路径。)

完成同一任务的另一种方法是依靠Excel找出您的默认浏览器是什么,然后打开HTML资源。以下宏可以解决问题:

Sub DoBrowse2()

ActiveWorkbook.FollowHyperlink _       Address:="c:\temp\MyHTMLfile.htm", _       NewWindow:=True End Sub

再次,浏览器将打开一个新窗口并显示指定的文件。

您可以将Address参数更改为所需的任何URL。

注意:

如果您想知道如何使用此页面(或_ExcelTips_网站上的任何其他页面)中描述的宏,我准备了一个特殊页面,其中包含有用的信息。

_ExcelTips_是您进行经济高效的Microsoft Excel培训的来源。

本技巧(2003)适用于Microsoft Excel 97、2000、2002和2003。可以在以下功能区中为Excel的功能区界面(Excel 2007及更高版本)找到本技巧的版本: