Odstrániť hypertextové odkazy - Príklady kódu VBA

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ť

wave wave wave wave wave