Innehållsförteckning
Ta bort alla hyperlänkar från ett ark
Följande kod raderar alla hyperlänkar från Sheet1:
| 12345 | Sub DeleteHyperLinks ()Ark1.Hyperlänkar.RaderaAvsluta Sub |
Och om du inte behöver en återanvändbar underrutin, snarare en engångsreparation, använd fönstret Omedelbart:
1. Välj det blad du vill ta bort hyperlänkar från
2. Tryck på Alt+F11 för att öppna VBE
3. Välj på VBE huvudmeny Visa-> Omedelbart fönster
4. Klistra in följande kod i det omedelbara fönstret och tryck sedan på Retur
| 1 | ActiveSheet.Hyperlinks.Delete |
