Jak skrýt adresy hypertextových odkazů v aplikaci Excel?
Když v aplikaci Excel umístíte ukazatel myši na buňku, která obsahuje hypertextový odkaz, adresa hypertextového odkazu se zobrazí okamžitě. Ale v určitých případech byste chtěli skrýt nebo odstranit adresu hypertextového odkazu, jak je znázorněno na následující obrazovce. Jak byste mohli tuto práci vyřešit co nejsnadněji?
![]() |
![]() |
![]() |
Skrýt adresu hypertextového odkazu úpravou hypertextového odkazu
Skrýt všechny adresy hypertextových odkazů pomocí kódu VBA
Skrýt adresu hypertextového odkazu úpravou hypertextového odkazu
Ve skutečnosti můžete skrýt nebo odebrat adresu hypertextového odkazu úpravou hypertextového odkazu následujícím způsobem:
1. Vyberte buňku hypertextového odkazu, kterou chcete skrýt.
b. Klikněte pravým tlačítkem a vyberte Upravit hypertextový odkaz z kontextové nabídky viz screenshot:
3. V Upravit hypertextový odkaz , klepněte na tlačítko OK ScreenTip tlačítko, viz screenshot:
4. Pak vyskočil Nastavit hypertextový odkaz V dialogovém okně zadejte do mezery znak na klávesnici ScreenTip textové pole, viz screenshot:
5. A pak klikněte na tlačítko OK > OK zavřete dialogy a nyní, když umístíte kurzor na buňku hypertextového odkazu, byla adresa hypertextového odkazu skrytá.
Poznámka: Pokud je v listu potřeba odstranit více adres hypertextových odkazů, musíte je skrýt jednu po druhé pomocí výše uvedené metody.
Skrýt všechny adresy hypertextových odkazů pomocí kódu VBA
Pokud chcete z listu odebrat všechny adresy hypertextových odkazů, výše uvedená metoda bude zdlouhavá a časově náročná. Zde mohu mluvit o kódu VBA, který by tento úkol vyřešil.
1. zmáčkni ALT + F11 klíče společně a otevře Okno Microsoft Visual Basic pro aplikace.
2, klikněte Vložit > Modula vložte následující kód do Okno modulu.
Kód VBA: Skrýt všechny adresy hypertextových odkazů
Sub ClearHyperlinksTip()
'Update 20140923
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
If Rng.Hyperlinks.Count > 0 Then
Rng.Hyperlinks(1).ScreenTip = " "
End If
Next
End Sub
3. Pak stiskněte tlačítko F5 klíč ke spuštění tohoto kódu, zobrazí se okno s výzvou, které vám připomene, že vyberte rozsah obsahující hypertextové odkazy, viz screenshot:
4. A pak klikněte na tlačítko OK, všechny vybrané adresy hypertextových odkazů byly z tipu na obrazovce odstraněny najednou.
Poznámka: Podle výše uvedených dvou metod, ačkoli se adresy hypertextových odkazů nezobrazují na obrazovce, hypertextové odkazy fungují dobře.
Související články:
Jak vložit více hypertextových odkazů do buňky v aplikaci Excel?
Jak zabránit hypertextovým odkazům ve změně barvy v aplikaci Excel?
Jak změnit více cest hypertextových odkazů v aplikaci Excel?
Jak odstranit nebo odstranit všechny nebo více hypertextových odkazů v aplikaci Excel?
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své excelentní dovednosti pomocí Kutools for Excela zažijte efektivitu jako nikdy předtím. Kutools for Excel Nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
Office Tab Přináší rozhraní s kartami do Office a usnadňuje vám práci
- Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
- Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
- Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!
