Hogyan lehet elrejteni a hiperhivatkozásokat az Excelben? 

Az Excel alkalmazásban, amikor az egeret a hiperhivatkozást tartalmazó cellára viszi, a hiperhivatkozás címe azonnal megjelenik. Bizonyos esetekben azonban el szeretné rejteni vagy eltávolítani a hiperhivatkozás címét a következő képernyőn látható módon. Hogyan oldhatná meg ezt a munkát a lehető legkönnyebben?

A hiperhivatkozás címének elrejtése a hivatkozás szerkesztésével

Az összes hiperhivatkozási cím elrejtése VBA kóddal

A hiperhivatkozás címének elrejtése a hivatkozás szerkesztésével

Valójában elrejtheti vagy eltávolíthatja a hiperhivatkozás címét a hivatkozás az alábbiak szerint történő szerkesztésével:

1. Válassza ki az elrejteni kívánt hiperhivatkozási cellát.

b. Kattintson a jobb gombbal, és válassza a lehetőséget Hiperhivatkozás szerkesztése a helyi menüből lásd a képernyőképet:

3. Az Hiperhivatkozás szerkesztése párbeszédpanelen kattintson a gombra Képernyőtipp gomb, lásd a képernyőképet:

4. Aztán beugrott Állítsa be a hiperhivatkozás képernyőtippjét párbeszédpanelen írjon be egy szóközt a billentyűzeten a Képernyőtipp szövegmező, lásd a képernyőképet:

5. Kattintson a gombra OK > OK a párbeszédpanelek bezárásához, és amikor a kurzort a hiperhivatkozás cellájára helyezi, a hiperhivatkozás címe el lett rejtve.

Megjegyzések: Ha a munkalapon több hiperhivatkozás van, akkor ezeket a fenti módszerrel egyenként el kell rejteni.

Az összes hiperhivatkozási cím elrejtése VBA kóddal

Az összes hiperhivatkozás címének eltávolításához egy munkalapról a fenti módszer unalmas és időigényes lesz. Itt egy VBA kódról beszélhetek a feladat végrehajtása érdekében.

1. megnyomni a ALT + F11 gombokat, és ez megnyitja a Microsoft Visual Basic for Applications ablak.

2. Kattints betétlap > Modulok, és illessze be a következő kódot a Modul ablak.

VBA-kód: Az összes hiperhivatkozási cím elrejtése

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. Ezután nyomja meg a gombot F5 kulcs a kód futtatásához, megjelenik egy prompt doboz, amely emlékezteti Önt, hogy válassza ki a tartományt tartalmaz hiperhivatkozásokat, lásd a képernyőképet:

4. Kattintson a gombra OK, az összes kiválasztott hiperhivatkozási címet egyszerre eltávolítottuk a képernyőről.

Megjegyzések: Két fenti módszerrel, bár a hiperhivatkozások címei nem jelennek meg a képernyő csúcsán, a hiperhivatkozások jól működnek.

Kapcsolódó cikkek:

Hogyan lehet több hiperhivatkozást beszúrni az Excel cellájába?

Hogyan lehet megakadályozni a hiperhivatkozások színváltozását az Excelben?

Hogyan lehet egyszerre több hiperhivatkozási utat módosítani az Excelben?

Hogyan lehet eltávolítani / törölni az összes vagy több hiperhivatkozást az Excel programban?