Question

我们有一个例程，它创建一个使用VisualBasic运行的文件，然后创建一个Excel电子表格。该方法相对简单，但我遇到了一个问题，试图创建一个可点击的URL到外部网站。以下是代码片段：

xlApp.Cells(14,1).Value="3. Here is some valid sample text:"
xlApp.Cells(14,1).WrapText=True
xlApp.Cells(14,1).Font.FontStyle="Plain"
xlApp.Cells(14,1).HorizontalAlignment=-4131
xlApp.Cells(14,1).IndentLevel = 3

***这是不起作用的部分 xlApp.Cells（15,1）。选择 xlApp.ActiveSheet.Hyperlinks.Add Anchor =选择，地址：= _ “http://www.testedu.edu/”，TextToDisplay =“www.testedu.edu”

xlApp.Cells(16,1).WrapText=True
xlApp.Cells(16,1).Font.FontStyle="Plain"
xlApp.Cells(16,1).HorizontalAlignment=-4131
xlApp.Cells(16,1).IndentLevel = 3
xlApp.ActiveWorkbook.Saved=True

我已经尝试了各种选项来创建一个活动的URL，但我似乎无法使语法正确。我曾尝试使用= HYPERLINK语法，但没有成功，尝试了各种其他的东西，但找不到密钥。我希望有人可以找出问题并让我直截了当。

谢谢！

麦克

Answer 1

添加超链接的代码正在使用＆＃34; =＆＃34;什么时候应该使用＆＃34;：=＆＃34;。试试这个。

ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="http://www.testedu.edu/", TextToDisplay:="www.testedu.edu"

史蒂夫

VBS脚本以在Excel中创建外部网站的热链接

1 个答案: