Ștergeți hyperlinkurile - Exemple de cod VBA

Ștergeți toate hyperlinkurile dintr-o foaie

Următorul cod șterge toate hyperlinkurile din Sheet1:

12345 Sub DeleteHyperLinks ()Sheet1.Hyperlinks.EleteSfârșitul Sub

Și dacă nu aveți nevoie de o rutină subutilizabilă reutilizabilă, mai degrabă o soluție de o singură dată, utilizați fereastra imediată:

1. Selectați Foaia din care eliminați hyperlinkurile

2. Apăsați Alt + F11 pentru a deschide VBE

3. În meniul principal VBE alegeți Vizualizare-> Fereastră imediată

4. În fereastra imediată, lipiți următorul cod, apoi apăsați Enter

1 ActiveSheet.Hyperlinks.Elete

wave wave wave wave wave