Dzēst hipersaites - VBA koda piemēri

Dzēst visas hipersaites no lapas

Šis kods izdzēš visas hipersaites no lapas 1:

12345 Sub DeleteHyperLinks ()1. lapa. Hipersaites. DzēstBeigu apakš

Un, ja jums nav nepieciešama atkārtoti lietojama apakšprogramma, nevis vienreizējs labojums, izmantojiet tūlītējo logu:

1. Atlasiet lapu, no kuras noņemt hipersaites

2. Nospiediet Alt+F11, lai atvērtu VBE

3. VBE galvenajā izvēlnē izvēlieties Skats-> Tūlītējs logs

4. Tūlītējā logā ielīmējiet šādu kodu un pēc tam nospiediet taustiņu Enter

1 ActiveSheet. Hipersaites. Dzēst

wave wave wave wave wave