Lang L: none (table-of-contents)
Kustutage lehelt kõik hüperlingid
Järgmine kood kustutab lehelt 1 kõik hüperlingid:
12345 | Sub DeleteHyperLinks ()Leht 1. Hüperlingid. KustutaEnd Sub |
Ja kui te ei vaja korduvkasutatavat alamrutiini, vaid ühekordset parandust, kasutage vahetu akent:
1. Valige leht, millelt hüperlingid eemaldada
2. VBE avamiseks vajutage klahvikombinatsiooni Alt+F11
3. Valige VBE peamenüüst Vaade-> Kohene aken
4. Kleepige vahetu aknas järgmine kood ja vajutage sisestusklahvi
1 | ActiveSheet.Hüperlingid.Delete |