[excel] Hyperlink

[666AnGeL]

Ik zit met het volgende,
Ik heb een sheet met in kolom A hyperlinks.
(a1 t/m a500 ongeveer)

Nu zie ik alleen de naam van de link.

Ik wil dus graag de hyperlinks van kolom A naar B exporteren ,
maar dan dat ik dus in kolom B de eigenlijke links als tekst heb.

Hoe is dat mogelijk?
heb al wat geprobeerd met oa. macro's opnemen e.d.
en hier op t forum gezocht ..
Kan iemand me helpen?

[Verwijderd]

copy
past special
paste as values

[666AnGeL]

Verwijderd schreef op 22 maart 2004 @ 20:08:
copy
past special
paste as values

dat heb ik al geprobeerd, dat doet ie niet,
dan pakt ie alleen de naam van de link...

[White Feather]

Verwijderd schreef op 22 maart 2004 @ 20:08:
copy
past special
paste as values

paste as formulas

[666AnGeL]

White Feather schreef op 22 maart 2004 @ 20:35:
[...]


paste as formulas

dat doet ie ook niet..

wat raar is als ik de waarde bekijk van die velden , dan geeft ie gewoon de tekst weer en niet de link.. als ik hyperlink bewerken of dergelijk kies dan laat ie wel de goede link zien.

[Spivvi]

Je kan een macrotje maken die rechtermuisknop --> hyperlink --> edit hyperlink --> remove link
doet voor alle rijen.

Maar ik snap niet dat die copy paste methode niet werkt die doet ut hier perfect.

[666AnGeL]

ik heb dit gevonden:
http://www.techonthenet.com/excel/macros/extract_hl.htm

maar hoe voer ik dit uit?
want als ik het als macro in t document add,
en ik add de formule zoals uitgelegd , dan krijg ik een foutmelding #waarde

[White Feather]

Geef dan eens aan welke Excel je gebruikt, want in Excel 2000 werkt Paste as formulas gewoon wel!

[666AnGeL]

Ik heb t gevonden!

code:

Function GetAddress(HyperlinkCell As Range)
    GetAddress = Replace _
    (HyperlinkCell.Hyperlinks(1).Address, "mailto:", "")
End Function

1- ALT + F11 en dan Insert>Module ( invoegen>Module ) en dan de bovenstaande code pasten.
Daarna ALT + Q en dan saven.
Dan is de functie terug te vinden bij "User Defined" ( gebruiker gedefineerd )

Daarna onderstaande functie adden in een cell

code:

=GetAddress(A1)

A1 is hierin dus de cell waaruit de hyperlink moet worden gehaald

[KingRichard]

666AnGeL schreef op 22 maart 2004 @ 20:06:
[...]
heb al wat geprobeerd met oa. macro's opnemen e.d.
en hier op t forum gezocht ..
Kan iemand me helpen?