Macro да се определи повредени хипервръзки в цялата книга на Excel, Excel макроси

уверете, че имате на вашия списък ли е хипервръзка (подчертана в синьо), а не формула, например?

Натиснете Ctrl + H (Намери и диалоговия прозорец Replace)
в "Какво да се замени" влиза AppData \ Local \ LocalSettings \ AppData \ Local \ LocalSettings \ Temp
в "Какво да се замени" Enter ОК!
и натиснете "Замяна на всички"

Имам нужда да пиша

Под ZamenaIsporchennihGiperssilok ()
На Грешка Resume Следваща
Дим хл Както хипервръзка, oldString Както стринга, newString Както стринга, од Като лист
"Част от хипервръзка, която искате да промените
oldString = "D: \ нормативна техническа база \ Типични материали за проектиране на \ тип серия \ AppData \ Local \ LocalSettings \ AppData \ Local \ LocalSettings \ Temp"
"За какво да се промени
newString = "D: \ нормативна техническа база \ Типични материали за проектиране на \ тип серия \ Ok"
За Всеки од В примка ActiveWorkbook.Worksheets "над всички слоеве в активната работна книга
За Всеки хл В обхождане sh.Hyperlinks "през ​​всички хипервръзки на лист
Ако hl.Address Подобно oldString "*" След това
hl.Address = Замяна (hl.Address, oldString, newString)
Крайна сметка, ако
до
Следваща од
End Sub

Въпреки това, положителните признаци на работата не е подал.

Е, можете да "изолира", тъй като струни - това е само, ако трябва да?
Ако не знаете какво е "избор" - защо го направи?
Тези параметри макро. Това, което искате макроса да се спре на всеки ред?

Код веднъж работи - тогава проблемът не е точно в него.
Потърсете проблемът е в ход хипервръзки и текст подмяна макроса.
И се премахнат всички червените точки (или ги поставете в бъдеще)

Моля, кажете ми - сценария само веднъж се зареди. След това, по някаква причина съм спрял да работи. Отидох на "Login" в макро, и е възможно да изберете всички линии на червено (червената точка и червената линия), в допълнение към Дим хл Както хипервръзка, oldString Както стринга, newString Както стринга, од Като лист. Тя просто не може да плъзнете стрелката отстраняване на грешки. Това означава, че аз разбирам, скриптът е спрял на него. Въпреки че скриптът точно една времето за зареждане. Спасих документа, а след това беше малко преместени, промених скрипта отново, ако е необходимо (т.е. целевата папка) и го спря да работи.

Благодаря ви много! Много полезна! Можем да кажем, спасени от шефа на наказание)))!

В областта "Промяна хипервръзки" в ляво има избор:
Присвояване на:
- файл, уеб страница;
- поставете в документа;
- нов инструмент;
- по електронна поща.
Ти не си наред.