Jak prepnout hyperodkaz na normalni text ? Vyřešeno

[teflondon]

kdyz z odnekad z netu zkopiruju text do wordu a je tam hodne barevnych a podrhnutych hyperodkazu,jak je mam hromadne prepnout na normalni text ?

[Reklama]

[Owner]

Klikneš na daný text pravým tlačítkem a dáš odstranit hypertextový dokaz. Toto je postup pro jednotlivé řešení.
http://diskuse.slunecnice.cz/767/ Tady někdo napsal makro, ale je pro Excel, takže by potřebovalo upravit do podoby, kterou podporuje Word.

[mike007]

1. Otevři si prostředí VBA (klávesová zkratka Alt+F11)
2. Ve VBA v menu: Insert --> Module
3. Do prázdného okna nakopíruj toto makro:

Kód: Vybrat vše

Sub smazat_hyperlinky()
Dim i As Integer
For i = ActiveDocument.Hyperlinks.Count To 1 Step -1
ActiveDocument.Hyperlinks(i).Delete
Next i
End Sub

4. Prostředí VBA zavři. Nyní spusť makro (Alt+F8 --> vyber makro --> tlačítko Spustit)

[teflondon]

ok diky