Ga naar inhoud

Hyperlinks automatisch aanmaken


GeertD

Aanbevolen berichten

Ik heb een excel-document waarbij ik:

- in een kolom typenummers heb staan van bepaalde producten

- in een tweede kolom artikelnummers heb staan van deze zelfde producten

- nu zou ik achter de typenummers een hyperlink willen plaatsen, deze hyperlink bestaat uit een website waarin het artikelnummer terug komt.

 

De hyperlink krijg ik zonder problemen automatisch aangemaakt in een derde kolom (hier met Ctrl+E), maar nu zou ik de hyperlink nog achter het typenummer willen krijgen.

Dit lukt me helaas niet.
Iemand een idee hoe ik dit best kan aanpakken?

In bijlage een bestand met het voorbeeld

Link naar webpagina.xlsx

Link naar reactie
Delen op andere sites

Hey EmielDS, de macro blijkt niet te werken.
Maar ik zou dit eigenlijk gewoon eenvoudig met knippen en plakken willen doen.
Dit is maar een éénmalige actie die moet worden uitgevoerd.

Ik had eerst gedacht om te werken met plakken-speciaal.
Eerst de hyperlink laten aan te maken, en dan de zichtbare tekst te overschrijven met "plakken speciaal > waardes". Maar dan verdwijnt de hyperlink helaas.

Link naar reactie
Delen op andere sites

Ja, ik heb je macro aan de praat gekregen, maar weet toch niet of het dat is wat ik wil...

Ik zou toch liefst op één of andere manier zonder Macro willen werken. Ook omdat ik niet helemaal thuis ben in die materie 😉

Link naar reactie
Delen op andere sites

Mmm, mooie oplossing. De functie "hyperlink" kende ik nog niet.
Dit is inderdaad al iets bruikbaars.
Maar nog beter zou zijn, wanneer ik de link toch gewoon achter de cel zou kunnen kopiëren.
Misschien toch eens even in de Macro verdiepen...

 

PS: ik had mijn bovenstaande reactie geschreven, maar blijkbaar vergeten te posten. Dus ik begrijp dat het een beetje frustrerend is dat er geen reactie was gekomen...

Link naar reactie
Delen op andere sites

Hey Emiel, ik ben me er nog even verder in gaan verdiepen en heb de macro op mijn bestand kunnen uitvoeren.
Ik ben een leek in het gebruik van Macro's en de uitleg die je er bij hebt gezet was een grote hulp!
Is er ook nog een mogelijkheid om de volgende 3 regels zo te schrijven dat ze naar een vaste kolom verwijzen (absolute verwijzing) en niet naar 2 cellen verder (relatieve verwijzing)?

    If cl.Offset(, 2) <> "" Then      ' als de cel 2 cellen naar rechts tekst bevat dan
    ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=cl.Offset(, 2).Value, TextToDisplay:=cl.Value 'maak in de actieve cel een hyperlink
    cl.Offset(, 2) = ""  ' maak dee cel 2 celle naar rechts leeg

 

En misschien gaat het ook nog om die absolute verwijzing maar 1x in te moeten voegen, want momenteel moet de relatieve verwijzing in de drie regels worden gewijzigd.

Het is namelijk zo dat ik deze macro op een x-aantal plaatsen in mijn document wil laten lopen, en dan moet ik hem meermaals gaan aanpassen.

Maar Emiel, ge zijt tot nu toe al een grote hulp geweest en hebt me al veel werk bespaard met deze Macro!

Link naar reactie
Delen op andere sites

Doe mee aan dit gesprek

Je kunt dit nu plaatsen en later registreren. Indien je reeds een account hebt, log dan nu in om het bericht te plaatsen met je account.

Gast
Reageer op dit topic

×   Geplakt als verrijkte tekst.   Plak in plaats daarvan als platte tekst

  Er zijn maximaal 75 emoji toegestaan.

×   Je link werd automatisch ingevoegd.   Tonen als normale link

×   Je vorige inhoud werd hersteld.   Leeg de tekstverwerker

×   Je kunt afbeeldingen niet direct plakken. Upload of voeg afbeeldingen vanaf een URL in

×
×
  • Nieuwe aanmaken...

Belangrijke informatie

We hebben cookies geplaatst op je toestel om deze website voor jou beter te kunnen maken. Je kunt de cookie instellingen aanpassen, anders gaan we er van uit dat het goed is om verder te gaan.