|
jak ve Visual Basicu automaticky odebrat hypertextové odkazy.
Automatické odebrání hypertextových odkazu v MS Word pomocí VBA (programu ve Visual Basicu).
Možností jak daný problém vyřešit je mnoho. Popsané řešení je funkčí.
Důležité: Před experimentováním s následujících maker si prosím zálohujte upravovaný text. Zalohování dokumentu před pokusy s makry určitě berete jako samozdřejmost, ale upozornění se hodí.
Sub Odebrat_Hypertextovy_Odkaz()
Dim oDoc As Document
Dim oStory As Range
Dim oHlink As Hyperlink
For Each oStory In ActiveDocument.StoryRanges
For Each oHlink In oStory.Hyperlinks
oHlink.Delete
Next
Next
End Sub
Sub Odebrat_Hypertextovy_Odkaz_I_S_Textem()
Dim oDoc As Document
Dim oStory As Range
Dim oHlink As Hyperlink
For Each oStory In ActiveDocument.StoryRanges
For Each oHlink In oStory.Hyperlinks
oHlink.Range.Delete
Next
Next
End Sub
Článek byl aktualizován: 19.09.2020 10:38
Ušetřil vám tento web čas, peníze? Pomohl vyřešit problém? Jste ochotni poskytnout symbolickou odměnu na další rozvoj? Vybrte si formu odměny, která vám vyhovuje.
Microsoft Office (Word, Excel, Google tabulky, PowerPoint) se věnuji od roku 2000 (od 2004 na této doméně) - V roce 2017 jsem od Microsoft získal prestižní ocenění MVP (zatím jsem jediný z ČR v kategorií Excel). Své vědomosti a zkušenosti dávám k dispozici i on-line ve videích pro SEDUO. Ve firmách školím a konzultuji, učím na MUNI. Tento web již tvořím přes 15 let. Zdarma je zde přes 1.000 návodu, tipů a triků, včetně přes 250 různých šablon, sešitů.
Přidáno: 14.04.10 09:31
Mám dotaz: Lze ve Wordu po spuštění souboru automaticky spustit makro ? Jak ?
Přidáno: 14.04.10 17:44
To Josef: LZE :) Podobně jako v MS Excel, jen deklaruješ, že při otevíraní dokumentu se má provést požadovaná akce:
Private Sub Document_Open()
MsgBox "office.lasakovi.com"
End Sub
Přidáno: 17.09.10 18:02
Ahoj a dobrý den, když už se to tu motá kolem mazání hypertextového odkazu, mám menší problém. Potřeboval bych vytvořit relativní hypertextový odkaz pomocí VBA. Problém je v tom, že formulář, který by měl uživatel používat, má obsahovat CommandButton, který by měl zobrazit dialog pro uložení hypertextového odkazu do určité buňky na určitém listě. Předem ale nevím, jak se tato složka bude jmenovat. Děkuji všem za případnou pomoc.
Přidáno: 20.09.10 17:55
To Míra: Takže hypertextový odkaz bude zaviset na znění složky ve které je výsledný soubor umistěn? Adresa buňky i název listu budou vždy stejné?
Přidáno: 30.10.15 13:34
Zatímco v Excelu mě makra hodně ulehčují práci, ve Wordu nevím jak např. uzamknout dokument tak, abych nemusel tuto akci provádět složitě přes neustálé vypisování hesla. Odemčení mi funguje obdobně, jak v Excelu, ale se zamčením jsem nepochodil.
Pomohl Vám návod? Sdílejte na Facebooku, G+ |
||
LinkedIn... |
Stránky o MS Office (Excel) produktu společnosti Microsoft. Neslouží jako technická podpora.
| Email na autora: pavel.lasak@gmail.com | Copyright © : Pavel Lasák 2004 - 2021 |