VBA 文档另存为 PDF 时超链接不起作用
VBA Hyperlinks don't work when document is saved as a PDF
我的电子表格有很多选项卡,我需要将它们转换为一个 PDF 文件以及一个包含指向其他页面的超链接的索引页。我有代码可以创建在 Excel 内或在我手动保存 PDF 时有效的链接,但在我通过代码执行时却无效。
For Each s In Sheets
If s.Name Like printNames Then
s.Select False
End If
Next s
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
path & filename & ".pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True
链接的制作方式如下:
TOCTab.Hyperlinks.Add anchor:=anchRange, Address:="", _
SubAddress:="'" & s.Name & "'!A1", TextToDisplay:=linkText
知道我可以做些什么来让它在 PDF 导出中工作吗?谢谢
那是因为 VBA 本身无法在 pdf 文件中工作。 VBA是微软专有的编程语言,只能在Office等部分微软产品中使用,pdf格式不是微软出品,不支持VBA。
我的电子表格有很多选项卡,我需要将它们转换为一个 PDF 文件以及一个包含指向其他页面的超链接的索引页。我有代码可以创建在 Excel 内或在我手动保存 PDF 时有效的链接,但在我通过代码执行时却无效。
For Each s In Sheets
If s.Name Like printNames Then
s.Select False
End If
Next s
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
path & filename & ".pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True
链接的制作方式如下:
TOCTab.Hyperlinks.Add anchor:=anchRange, Address:="", _
SubAddress:="'" & s.Name & "'!A1", TextToDisplay:=linkText
知道我可以做些什么来让它在 PDF 导出中工作吗?谢谢
那是因为 VBA 本身无法在 pdf 文件中工作。 VBA是微软专有的编程语言,只能在Office等部分微软产品中使用,pdf格式不是微软出品,不支持VBA。