Я делаю лист Excel, чтобы помочь мне легко отслеживать мои электронные книги и электронные книги, которые читаются. так что мой лист Excel содержит название книги и общее количество страниц, текущую страницу, которую я посетил, и% моего прогресса, статус и ссылку на книгу на локальном жестком диске.

Я хочу, чтобы автоматически, когда я нажимал на название книги (гиперссылка), он автоматически открывал файл PDF для текущей страницы, например, если я читаю книгу X и нахожусь на странице 110, я хочу, чтобы ссылка открылась X.PDF на стр. 110, в кодировке HTML X.PDF # page = 3 работает на 100%, но я хочу способ гиперссылки и включить значение в какую-то ячейку Excel.

2 ответа2

3

Похоже, что-то для VBA. Озгрид уже имел дело с этим вопросом. Здесь:http://www.ozgrid.com/forum/showthread.php?t=29376 И здесь:http://www.ozgrid.com/forum/showthread.php?t=65950&page=1

Код, который они придумали, таков:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    ThisWorkbook.FollowHyperlink "test.pdf#page=" & Target.Row
End Sub

Проблема в том, что он не открывается на определенной странице. Похоже, что Adobe Reader будет использовать этот синтаксис только для определенных страниц, когда он обрабатывается через веб-браузер. VBA должен иметь функцию для отправки этой команды в веб-браузер.

1

Я нашел решение: сначала мы используем команду Shell с этим синтаксисом

Shell Acrobat_Path & " /A page=" & Current_Page & " " & SrcFile, vbNormalFocus

а Current_Page и SrcFile - значения ячеек Excel

и назначить это кнопке с щелчком события, например

Sub Button1_Click()
...
End Sub

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .