Πίνακας περιεχομένων
Διαγραφή όλων των υπερσυνδέσεων από ένα φύλλο
Ο ακόλουθος κώδικας διαγράφει όλους τους υπερσυνδέσμους από το Sheet1:
| 12345 | Sub DeleteHyperLinks ()Φύλλο 1. Υπερσυνδέσεις. ΔιαγραφήΤέλος υπο |
Και αν δεν χρειάζεστε μια επαναχρησιμοποιήσιμη ρουτίνα Sub, αλλά μια εφάπαξ διόρθωση, χρησιμοποιήστε το άμεσο παράθυρο:
1. Επιλέξτε το φύλλο από το οποίο θα καταργήσετε τους υπερσυνδέσμους
2. Πατήστε Alt+F11 για να ανοίξετε το VBE
3. Στο κύριο μενού VBE επιλέξτε Προβολή-> Άμεσο παράθυρο
4. Στο άμεσο παράθυρο επικολλήστε τον ακόλουθο κώδικα και πατήστε Enter
| 1 | ActiveSheet.Hyperlinks.Delete |
