1 Ανοίξτε το Excel ή το Microsoft Word πρόγραμμα της Microsoft που θέλετε να αλλάξετε . Μόλις το πρόγραμμα ανοίγει , πιέστε το πλήκτρο " Alt " και " F11 " για να ανοίξετε την κονσόλα VBA . 2
Κάντε κλικ στο "Εισαγωγή" μενού στο πάνω μέρος της κονσόλας και επιλέξτε " Ενότητα " από το drop -down μενού . Κάντε κλικ στο μεγάλο λευκό κουτί στη δεξιά πλευρά της κονσόλας για να τοποθετήσετε τον κέρσορα στο πλαίσιο
εικόνων 3
Πληκτρολογήστε την ακόλουθη γραμμή στο παράθυρο , χωρίς εισαγωγικά : . " Sub RemoveLinks ( ) . " Πατήστε το πλήκτρο " Enter" και VBA θα τεθεί αυτόματα την εντολή " End Sub " κάτω γραμμή " Sub"
Η 4
Εισάγετε τον παρακάτω κωδικό , χωρίς εισαγωγικά , αν θέλετε να αφαιρέσετε υπερσυνδέσμους από ένα υπολογιστικό φύλλο του Excel . : " Range ( " X1 : Υ2 " ) Hyperlinks.delete . ». Αλλαγή " X1 " στο επάνω αριστερό κελί της περιοχής που θέλετε να αφαιρέσετε υπερσυνδέσμους από και αλλάξτε " Υ2 " στο κάτω δεξιά κελί . Εισάγετε τον παρακάτω κωδικό , χωρίς εισαγωγικά , αν αντί για την αφαίρεση υπερσυνδέσμους από ένα έγγραφο του Word : " Selection.Range.Hyperlinks ( 1 ) Διαγραφή. ". Αυτό θα αφαιρέσει υπερσυνδέσμους από οποιαδήποτε επιλογή .
5
Κάντε κλικ στο " Χ " στο πάνω μέρος της οθόνης για να κλείσετε την κονσόλα VBA . Αλλαγές στον κώδικα σας είναι ένα μέρος του εγγράφου ή του υπολογιστικού φύλλου , έτσι ώστε να μην χρειάζεται να τους σώσει . Για να εκτελέσετε τον κώδικα , κάντε κλικ στο κουμπί " Μακροεντολές " κάτω από την καρτέλα "Προγραμματιστής " . Επιλέξτε " RemoveLinks " και κάντε κλικ στο " Run".
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα