Izbrišite vse hiperpovezave z lista
Naslednja koda izbriše vse hiperpovezave iz lista 1:
| 12345 | Sub DeleteHyperLinks ()List 1. Hiperpovezave.IzbrišiEnd Sub |
In če ne potrebujete podprograma za večkratno uporabo, temveč enkratne popravke, uporabite takojšnje okno:
1. Izberite list, s katerega želite odstraniti hiperpovezave
2. Pritisnite Alt+F11, da odprete VBE
3. V glavnem meniju VBE izberite Pogled-> Takojšnje okno
4. V takojšnje okno prilepite naslednjo kodo in pritisnite Enter
| 1 | ActiveSheet.Hyperlinks.Delete |
