Odstráňte všetky hypertextové odkazy z hárka
Nasledujúci kód odstráni všetky hypertextové odkazy z hárka 1:
12345 | Sub DeleteHyperLinks ()List 1. Hypertextové odkazy. OdstrániťKoniec pod |
A ak nepotrebujete opakovane použiteľnú rutinu Sub, skôr jednorazovú opravu, použite okamžité okno:
1. Vyberte Hárok, z ktorého chcete odstrániť hypertextové odkazy
2. VBE otvoríte stlačením klávesov Alt+F11
3. V hlavnej ponuke VBE vyberte Zobraziť-> Okamžité okno
4. Do okamžitého okna prilepte nasledujúci kód a potom stlačte kláves Enter
1 | ActiveSheet.Hyperlinks.Smazať |