Hoe converteer je een heleboel tekst-URL's naar actieve hyperlinks in Excel?
Als u een lijst met URL-adressen heeft die platte tekst zijn, hoe kunt u deze tekst-URL's naar de klikbare hyperlinks dan activeren zoals in het volgende screenshot wordt getoond?
Converteer een heleboel tekst-URL's naar actieve hyperlinks met formules
Converteer een aantal tekst-URL's naar actieve hyperlinks met VBA-code
Converteer een aantal tekst-URL's naar actieve hyperlinks Kutools voor Excel
Converteer een heleboel tekst-URL's naar actieve hyperlinks met formules
Dubbelklikken op de cel om de hyperlinks een voor een te activeren, zal veel tijd verspillen, hier kan ik enkele formules voor u introduceren, doe dit als volgt:
Voer deze formule in: = HYPERLINK (A2; A2) in een lege cel waar u het resultaat wilt uitvoeren en sleep vervolgens de vulgreep naar beneden om deze formule toe te passen op de cellen die u wilt, en alle tekst-URL's zijn geconverteerd naar actieve hyperlinks, zie screenshot:
Converteer een aantal tekst-URL's naar actieve hyperlinks met VBA-code
De onderstaande VBA-code kan u ook helpen om deze taak op te lossen, doe dit als volgt:
1. Houd de ALT + F11 toetsen om de te openen Microsoft Visual Basic voor toepassingen venster.
2. Klikken Invoegen > Moduleen plak de volgende code in het modulevenster.
VBA-code: converteer een aantal tekst-URL's naar actieve hyperlinks:
Sub activateHyperlinks()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
Application.ActiveSheet.Hyperlinks.Add Rng, Rng.Value
Next
End Sub
3. Druk vervolgens op F5 sleutel om deze code uit te voeren, en er verschijnt een promptvenster om u eraan te herinneren de cellen te selecteren die u naar klikbare hyperlinks wilt converteren, zie screenshot:
4. En klik vervolgens op OK knop, zijn de platte tekst-URL's geconverteerd naar actieve hyperlinks, zie screenshot:
Converteer een aantal tekst-URL's naar actieve hyperlinks Kutools voor Excel
Hier is een handig hulpmiddel-Kutools for Excel, Met Hyperlinks converteren functie, kunt u snel allebei converteer een heleboel tekst-URL's naar klikbare hyperlinks en extraheer echte hyperlinkadressen uit de hyperlinktekststring.
Kutools for Excel : met meer dan 300 handige Excel-invoegtoepassingen, gratis te proberen zonder beperking in 30 dagen. |
Na het installeren van Kutools for Excel, doe dit als volgt:
1. Selecteer de cellen die de tekst-URL's bevatten die u wilt activeren.
2. Dan klikken Kutools > Link > Hyperlinks converteren, zie screenshot:
3. In de Hyperlinks converteren dialoogvenster, selecteer Celinhoud vervangt hyperlinkadressen optie onder de Type omzetten sectie, en controleer dan Converteer de bron bereik als u de daadwerkelijke adressen in het oorspronkelijke bereik wilt plaatsen, zie screenshot:
4. Dan klikken Ok knop, en de tekst-URL's zijn in één keer geactiveerd, zie screenshot:
Note: Als u het resultaat in een andere cel wilt plaatsen in plaats van de originele cel, vink dan het selectievakje uit Converteer de bron bereik en selecteer een cel waarin u het resultaat uit het resultaatbereik moet uitvoeren zoals in de volgende schermafbeelding:
Klik om Kutools voor Excel en nu gratis uit te proberen!
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!