1

Я хочу настроить гиперссылки в документе Word на файлы (jpg), которые всегда находятся в той же папке, что и документ Word

Я хочу распространить пакет документа Word и вспомогательные файлы jpg людям, которые могут разместить эти файлы в любом месте на компьютере или сервере.

Я хочу, чтобы гиперссылки работали где угодно

Может быть, код VBA что-то вроде

По гиперссылке клика определите местоположение файла документа и укажите ссылку (открыть) на указанный файл jpg в этом месте.

Большое спасибо

1 ответ1

0

С точки зрения того, что нужно вставить в Word Doc для отображения JPG, я бы использовал элементы управления формой вместо гиперссылок:

Сначала в Word включите вкладку «Разработчик» на ленте:

  1. Нажмите маленький «треугольник вниз» рядом с панелью быстрого доступа и выберите «Другие команды».'

Словечко

  1. Выберите «Настроить ленту», затем убедитесь, что флажок рядом с «Разработчик» в разделе «Настроить ленту» установлен. Нажмите OK, чтобы закрыть.

Словечко

Теперь вставьте и настройте кнопки команд:

  1. Выберите вкладку «Разработчик» на ленте, затем нажмите «Устаревшие инструменты» в блоке «Элементы управления», а затем выберите «Командная кнопка»

Словечко

  1. Нарисуйте столько кнопок, сколько у вас есть файлов JPG, чтобы открыть. Их можно перетаскивать в любое место в нужном вам документе, хотя вам, возможно, придется изменить стиль переноса текста (щелчок правой кнопкой мыши, "Управление форматами", вкладка "Макет")

  2. Чтобы изменить текст, отображаемый на каждой кнопке, а также кодовое имя для каждой, щелкните правой кнопкой мыши одну кнопку и выберите "Свойства".

  3. Поочередно щелкните левой кнопкой мыши по каждой кнопке и установите в полях «(имя)» и "Заголовок" поля "Свойства" имя кода (например, BtnThisPic и BtnThatPic) и отобразите текст (например, «Нажмите, чтобы открыть этот рисунок») и «Нажмите, чтобы открыть эту картинку»), соответственно.

  4. Дважды щелкните левой кнопкой мыши каждую кнопку по очереди и вставьте следующий код в метод обработчика событий _Click который должен генерироваться автоматически для каждого:

    Dim sh As New Shell  
    sh.ShellExecute ThisDocument.Path & "\picname.jpg"
    

Наконец, добавьте ссылку на «Microsoft Shell Controls and Automation» в файл:

  1. В редакторе VBA выберите «Инструменты»> «Ссылки»
  2. В появившемся окне «Ссылки» прокрутите (путь, путь) вниз, пока не найдете ссылку на MSCA, отметьте ее флажок и нажмите «ОК».

VBA Editor snip

Сохраните документ Word и дайте кнопкам управления щелчок. Если все прошло хорошо, соответствующие изображения должны открываться по желанию.

(Если в какой-то момент вам не удастся щелкнуть правой кнопкой мыши кнопки или иным образом отредактировать их, убедитесь, что «Режим разработки» активирован на вкладке «Разработчик» на «Ленте» в блоке «Элементы управления».)

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