Σε αυτό το άρθρο, θα μάθουμε πώς να εξάγουμε υπερσύνδεσμο από URL στο Excel χρησιμοποιώντας τρεις διαφορετικές μεθόδους. Συχνά εργαζόμαστε με δεδομένα από διάφορες πηγές που περιέχουν URL. θα μπορούσε επίσης να συμβεί σε περιπτώσεις που αντιγράφουμε έναν πίνακα ή μια λίστα από έναν ιστότοπο. Ας διαβάσουμε το άρθρο για να μάθουμε πώς να παίρνουμε τους υπερσυνδέσμους από αυτά τα URL.

Κατεβάστε το βιβλίο ασκήσεων

Κατεβάστε αυτό το τετράδιο ασκήσεων για να εξασκηθείτε ενώ διαβάζετε αυτό το άρθρο.

3 Μέθοδοι για την εξαγωγή υπερσυνδέσμου από τη διεύθυνση URL στο Excel

Σε αυτό το άρθρο, για να δείξουμε πώς να εξαγωγή υπερσυνδέσμων από το URLs θα χρησιμοποιήσουμε μια σειρά από URLs από το Ιστοσελίδα Exceldemy Αυτοί οι σύνδεσμοι αντιπροσωπεύουν κανονικά ονόματα συναρτήσεων.

1. Δημιουργήστε μια λειτουργία που ορίζεται από το χρήστη για την εξαγωγή υπερσυνδέσμου από τη διεύθυνση URL στο Excel

Προς εξαγωγή υπερσυνδέσμων από το URLs, μπορούμε define a προσαρμοσμένη λειτουργία στο Κώδικας VBA και στη συνέχεια χρησιμοποιήστε το ως κανονική λειτουργία . δεν παρέχει οποιοδήποτε χτισμένο - στο συνάρτηση έτσι ώστε να μπορούμε να πάρουμε απευθείας υπερσυνδέσμους. Ας ακολουθήσουμε τα βήματα για να το πετύχουμε.

Βήματα:

• Από το Κορδέλα Excel, πηγαίνετε στο Καρτέλα Developer .
• Κάντε κλικ στο στο Visual Basic επιλογή για να ανοιχτό το Visual Basic Editor .

• Προς δημιουργήστε το a νέα ενότητα, επιλέξτε το Επιλογή ενότητας από το Καρτέλα Εισαγωγή .

• Τώρα, αντίγραφο τον ακόλουθο κώδικα στον επεξεργαστή κώδικα.

 Function EXTRACTHYPELINK(Rng As Range) As String EXTRACTHYPELINK = Rng.Hyperlinks(1).Address End Function 

Με αυτόν τον κώδικα, χρησιμοποιήσαμε τον κατασκευαστή Hyperlinks για να δημιουργήσουμε ένα προσαρμοσμένη λειτουργία με το όνομα EXTRACTHYPELINK που μπορεί να χρησιμοποιηθεί ως κανονική λειτουργία στο φύλλο εργασίας μας.

• Στο σύνολο δεδομένων μας, έχουμε 5 URLs σε κελιά B5:B9.

• Στο κελί C5 , όταν προσπαθήσαμε να τύπος η συνάρτηση με το όνομα EXTRACTHYPELINK, Το Excel μας παρέχει καθορισμένο από τον χρήστη λειτουργία ως αυτόματη πρόταση . Τύπος το Καρτέλα πλήκτρο για να αποδέχομαι την πρόταση και να θέσει B5 ως το όρισμα λειτουργίας .

• Διαφορετικά, τύπος το πλήρες όνομα λειτουργίας Γράψτε τον τύπο στο κελί C5 και πατήστε Μπείτε μέσα.

Ως αποτέλεσμα, μπορούμε να δούμε το εξαχθείσα διεύθυνση URL στο κελί C5.

• Για να πάρετε το άλλο URLs , εντοπίστε το το Χειρολαβή πλήρωσης στο αριστερή κάτω γωνία του κυττάρου C5 και drag it κάτω .

Διαβάστε περισσότερα: Πώς να αφαιρέσετε τον υπερσύνδεσμο για ολόκληρη τη στήλη στο Excel (5 τρόποι)

2. Κώδικας VBA του Excel για να λάβετε υπερσύνδεσμο από το Url

Εφαρμογή Κώδικας VBA εξοικονομεί χρόνο και κόπο όταν θέλουμε να εξάγουμε υπερσυνδέσμους από έναν αριθμό διευθύνσεων URL. Ας πούμε ότι έχουμε 7 διαφορετικό URLs σε κύτταρα B5:B11 από το οποίο υπερσύνδεσμοι πρέπει να εξαχθούν.

Βήματα:

• Τοποθετήστε τον ακόλουθο κώδικα στον Visual Code Editor:

 Sub ExtractHLinksUrls() Dim Rng As Range Dim SelectRange As Range On Error Resume Next xTitleId = "Exceldemy" Set SelectRange = Application.Selection Set SelectRange = Application.InputBox("Range", xTitleId, SelectRange.Address, Type:=8) For Each Rng In SelectRange If Rng.Hyperlinks.Count> 0 Then Rng.Value = Rng.Hyperlinks.Item(1).Address End If Next End Sub 

• Τύπος F5 στο τρέχει ο κώδικας. παράθυρο διαλόγου άνοιξε για να επιλέξτε το εύρος κυττάρων.
• Τώρα, επιλέξτε κύτταρα B5:B11 για να γεμίσει το Πλαίσιο εισαγωγής εύρους και στη συνέχεια κάντε κλικ στο

• Ακολουθεί ο κατάλογος των εξαγόμενους υπερσυνδέσμους.

Διαβάστε περισσότερα: Πώς να λάβετε υπερσύνδεσμο από ένα κελί του Excel με VBA (3 μέθοδοι)

Παρόμοιες αναγνώσεις

• [Διορθώθηκε!] Αυτό το βιβλίο εργασίας περιέχει συνδέσμους προς μία ή περισσότερες εξωτερικές πηγές που μπορεί να είναι επικίνδυνες
• Πώς να δημιουργήσετε μια αναπτυσσόμενη λίστα υπερσύνδεσης σε ένα άλλο φύλλο στο Excel
• Πώς να δημιουργήσετε υπερσύνδεση πολλαπλών κελιών στο Excel (3 τρόποι)
• Γιατί οι συνδέσεις μου στο Excel συνεχίζουν να σπάνε; (3 λόγοι με λύσεις)
• [Διορθώθηκε!] "Αυτό το βιβλίο εργασίας περιέχει συνδέσμους σε άλλες πηγές δεδομένων" Σφάλμα στο Excel

3. Απόσπασμα υπερσύνδεσης από Url χρησιμοποιώντας τη δυνατότητα επεξεργασίας υπερσύνδεσης στο Excel

Χρησιμοποιώντας το Επεξεργασία υπερσυνδέσμου για την εξαγωγή υπερσυνδέσμων είναι ένα χειροκίνητη διαδικασία που θα κόστιζε πολύτιμο χρόνο και προσπάθεια. Παρόλα αυτά, είναι μια χρήσιμη μέθοδος για να τη γνωρίζετε. Ας δούμε πώς μπορούμε να εξάγουμε έναν υπερσύνδεσμο από μια διεύθυνση URL χρησιμοποιώντας αυτή την τεχνική. Τα βήματα δίνονται παρακάτω.

Βήματα:

• Κάντε κλικ στο στο κύτταρο που περιέχει το URL να είναι εκχυλισμένο Εδώ, επιλέξαμε κύτταρο B5 .
• Κάντε δεξί κλικ στο το ποντίκι θα ανοίξτε το μενού περιβάλλοντος και στη συνέχεια επιλέξτε το Επεξεργασία υπερσυνδέσμου.

• Τα παραπάνω βήματα άνοιξε το μέχρι το Επεξεργασία παραθύρου υπερσυνδέσμου . Πλαίσιο εισαγωγής διεύθυνσης δείχνει το υπερσύνδεσμος.

• Τύπος Ctrl + C στο αντίγραφο τον υπερσύνδεσμο και κάντε κλικ στο OK για να κλείσετε το παράθυρο, επικόλληση το αντιγραμμένος σύνδεσμος στο επιθυμητό κελί. Επικολλήσαμε το υπερσύνδεσμος που σχετίζονται με κύτταρο Β5 στο κύτταρο C5.

• Ακολουθώντας αυτή τη διαδικασία, μπορούμε να πάρουμε όλους τους άλλους υπερσυνδέσμους έναν προς έναν.

Διαβάστε περισσότερα: Πώς να επεξεργαστείτε τον υπερσύνδεσμο στο Excel (5 γρήγοροι και εύκολοι τρόποι)

Πράγματα που πρέπει να θυμάστε

• Παρόλο που η χρήση VBA κώδικας είναι σπουδαίο για να πετύχουμε το στόχο μας. Αλλά μόλις ο κώδικας εκτελεστεί, χάνουμε την ιστορία Σημαίνει ότι δεν μπορούμε πλέον να αναιρέσουμε την αλλαγή.
• Σε περίπτωση που χρειαστεί να αλλαγή το μας δεδομένα πηγής από καιρό σε καιρό, είναι προτιμότερο να χρησιμοποιείτε μεθόδους που χρησιμοποιούν λειτουργίες όπως χρησιμοποιήσαμε στο μέθοδος 1 Στην περίπτωση αυτή, η έξοδος είναι δυναμικό με την αλλαγή του δεδομένα πηγής .

Συμπέρασμα

Τώρα, γνωρίζουμε αρκετές μεθόδους για την εξαγωγή υπερσυνδέσμων από διευθύνσεις URL στο Excel. Ελπίζουμε ότι θα σας ενθαρρύνει να χρησιμοποιήσετε αυτές τις μεθόδους με μεγαλύτερη αυτοπεποίθηση. Οποιεσδήποτε ερωτήσεις ή προτάσεις μην ξεχάσετε να τις βάλετε στο πλαίσιο σχολίων παρακάτω.