Съдържание
Изтрийте всички хипервръзки от лист
Следният код изтрива всички хипервръзки от Sheet1:
| 12345 | Sub DeleteHyperLinks ()Лист 1. ХипервръзкиEnd Sub |
И ако не се нуждаете от подпрограма за многократна употреба, по -скоро еднократно коригиране, използвайте непосредствения прозорец:
1. Изберете листа, от който да премахнете хипервръзки
2. Натиснете Alt+F11, за да отворите VBE
3. В главното меню на VBE изберете Изглед-> Незабавен прозорец
4. В непосредствения прозорец поставете следния код, след което натиснете Enter
| 1 | ActiveSheet.Hyperlinks.Delete |
