Как сохранить работоспособность всех гиперссылок при экспорте моей книги в формате PDF?

Question

Используя Excel 2016 VBA и метод Workbook.ExportAsFixedFormat , как я могу сохранить работоспособность гиперссылок между несколькими листами?

Полученный PDF-файл получает все листы и формат гиперссылок, ноони не работают.С другой стороны, тот же метод при использовании с Microsoft Word поддерживает работу гиперссылок.

Я использую следующий код, и Sheet1 имеет гиперссылки на Sheet2 и Sheet3:

Sub ExportAsPDF()
ActiveWorkbook.Sheets(Array("Sheet1", "Sheet2", "Sheet3")).Select

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, FileName:= _
    "C:\tempo.pdf", Quality:=xlQualityStandard, IncludeDocProperties:=True, _
     IgnorePrintAreas:=False, OpenAfterPublish:=True
End Sub

Answer 1

У меня была похожая проблема, и я в итоге заставил ее работать следующим образом:

1) Я переместил свои ссылки в разные ячейки, и я отформатировал ячейки ссылок как Текст .

2) Я создал ссылки, которые я хотел экспортировать, используя функцию HYPERLINK () для полей в текстовом формате.

Это должно работать для вас.