Страницы: 1
RSS
Гиперссылки слетели, что делать?
 
Добрый день всем!  
 
Я скопировала табличку на флешку, отдала коллеге, там чуток информацию добавили и потом я заменила свою старую таблицу на новую. При этом как-то слетели все гиперссылки.  
У меня была создана специальная папка ЗАКАЗЫ. в ней были файлы и сама таблица.  
Теперь при попытке  перейти по гиперссылке появляется сообщение "произошла неожиданная ошибка", ничего не открывается. Гиперссылка теперь указывает на флешку, а не на папку ЗАКАЗЫ. Перенесла все на флешку - все стало открываться.  
Вопрос - как теперь перенести все обратно на жесткий диск (внешний) так, чтобы все снова работало?  
Или есть какой-то способ, как быстро восстановить гиперссылки в таблице (ссылки на файлы, путь ЗАКАЗЫ\область\номер\файл.  
Причем, областей у меня 3, номеров более 1000, а файлов более 3000.  
В каждом файле есть уникальный номер. Можно ли по нему как-нибудь сделать гиперссылки, но при том, чтобы искать по всей папке "ЗАКАЗЫ", включая все подпапки?
 
> Гиперссылка теперь указывает на флешку, а не на папку ЗАКАЗЫ <BR>Исправить гиперссылки можно этим макросом: http://excelvba.ru/code/replace_hyperlinks
 
http://excelvba.ru/code/replace_hyperlinks
 
{quote}{login=RAN}{date=05.09.2011 04:05}{thema=}{post}http://excelvba.ru/code/replace_hyperlinks{/post}{/quote}  
 
эм... пасиба  
а как его всунуть в книгу?  
я никогда не сталкивалась с макросами...  
у меня 2007 эксель.  
Можете с момента открытия книги рассказать куда клацнуть, чтобы тут все сработало? :) Вкладка Разработчик у меня есть, добрые люди подсказали, что без нее до макроса не добраться, но на этом познания коллег закончились...  
выручайте
 
Жмём последовательно:  
 
Alt + F11  
Ctrl + R  
Enter  
 
вставляем в появившееся большое белое поле макрос  
 
вносим необходимые изменения в код  (что на что меняем)  
 
ставим курсор в середину кода,  
и жмём F5 для запуска макроса
 
Изменения, которые надо внести в код:  
 
 
   ' часть гиперссылки, подлежащая замене  
  oldString = "E:\"  
   ' на что заменяем  
  newString = "Заказы\"  
 
(не проверял, но вроде как-то так должно получиться)
Страницы: 1
Читают тему
Наверх