Slet hyperlinks - eksempler på VBA -kode

Indholdsfortegnelse

Slet alle hyperlinks fra et ark

Følgende kode sletter alle hyperlinks fra Sheet1:

12345 Sub DeleteHyperLinks ()Ark1.Hyperlinks.SletAfslut Sub

Og hvis du ikke har brug for en genanvendelig underrutine, snarere en engangsreparation, skal du bruge vinduet Umiddelbart:

1. Vælg det ark, du vil fjerne hyperlinks fra

2. Tryk på Alt+F11 for at åbne VBE

3. Vælg i hovedmenuen i VBE Vis-> Umiddelbart vindue

4. Indsæt følgende kode i det umiddelbare vindue, og tryk derefter på Enter

1 ActiveSheet.Hyperlinks.Delete

wave wave wave wave wave