Odstranit všechny hypertextové odkazy z listu
Následující kód odstraní všechny hypertextové odkazy z Sheet1:
| 12345 | Dílčí DeleteHyperLinks ()List 1. Hypertextové odkazy. OdstranitEnd Sub |
A pokud nepotřebujete opakovaně použitelnou rutinu Sub, spíše jednorázovou opravu, použijte okamžité okno:
1. Vyberte list, ze kterého chcete odebrat hypertextové odkazy
2. Stisknutím Alt+F11 otevřete VBE
3. V hlavní nabídce VBE vyberte Zobrazit-> Okamžité okno
4. V okamžitém okně vložte následující kód a poté stiskněte Enter
| 1 | ActiveSheet.Hyperlinks.Delete |
