Conas ilbhealaí hipearnasc a athrú ag an am céanna in Excel?

Chun críche éigin, féadfaidh tú iliomad hipearnasc a chruthú le haghaidh do chuid sonraí sa bhileog oibre, agus tá na hipearnasc uile nasctha leis an gcosán nó an seoladh comhaid céanna, ach anois, ní mór duit seoladh eile a chur in ionad an chosáin hipearnasc seo ag an am. D’fhéadfadh sé go gcuirfeadh sé go leor ama amú cosán na hipearnasc a athrú ina aonar, an bhfuil bealach gasta ann chun an fhadhb seo a réiteach?

Athraigh ilbhealaí hipearnasc ag an am céanna i mbileog oibre le cód VBA

Athraigh ilbhealaí hipearnasc ag an am céanna i mbileog oibre / leabhar oibre / ilbhileoga / roghnú le gné iontach

Athraigh ilbhealaí hipearnasc ag an am céanna i mbileog oibre le cód VBA

Má cheaptar go bhfuil liosta sonraí agat leis na hipearnasc céanna agus a thaispeántar ar an scáileán a thaispeántar, agus le cód VBA, is féidir leat ceann nua a chur in áit an tseanbhealaigh nó an seoladh comhaid i mbileog oibre go tapa.

1. Coinnigh síos an ALT + F11 eochracha, agus osclaíonn sé an Fuinneog Microsoft Visual Basic d’Fheidhmchláir.

2. cliceáil Ionsáigh > Modúil, agus greamaigh an macra seo a leanas sa Fuinneog an mhodúil.

Cód VBA: athraigh ilbhealaí hipearnasc ag an am céanna

Sub ReplaceHyperlinks()
'Updateby Extendoffice
Dim Ws As Worksheet
Dim xHyperlink As Hyperlink
Dim xOld As String, xNew As String
xTitleId = "KutoolsforExcel"
Set Ws = Application.ActiveSheet
xOld = Application.InputBox("Old text:", xTitleId, "", Type:=2)
xNew = Application.InputBox("New text:", xTitleId, "", Type:=2)
Application.ScreenUpdating = False
For Each xHyperlink In Ws.Hyperlinks
    xHyperlink.Address = Replace(xHyperlink.Address, xOld, xNew)
Next
Application.ScreenUpdating = True
End Sub

3. Ansin brúigh F5 eochair chun an cód seo a rith, agus bosca pras chun ligean duit do sheansheoladh hipearnasc a ionchur sa Sean-téacs bosca. Féach an pictiúr:

4. Cliceáil OK, agus tá bosca pras eile popped amach chun a mheabhrú duit dul isteach sa seoladh nua hipearnasc a theastaíonn uait a úsáid.

5. Agus ansin cliceáil OK, tá an ceann nua curtha in ionad na sean-seoltaí hipearnasc céanna ag an am céanna. Féach screenshots:

Athraigh ilbhealaí hipearnasc ag an am céanna i mbileog oibre / leabhar oibre / ilbhileoga / roghnú le gné iontach

Más mian leat na cosáin hipearnasc a chur in ionad rogha, bileoga iolracha, bosca oibre reatha nó iliomad leabhar oibre, conas a d’fhéadfá a dhéanamh? Le Aimsigh agus Ionadaigh gné de Kutools le haghaidh Excel, is féidir leat déileáil go tapa leis an tasc seo.

Tar éis a shuiteáil Kutools le haghaidh Excel, déan mar seo le do thoil:

1. Cliceáil Kutools > Nascleanúint, féach ar an scáileán:

2. San oscailt Nascleanúint pane, cliceáil Aimsigh agus cuir in ionad tab, sa Aimsigh agus Ionadaigh pane, cliceáil Ionadaigh cluaisín, agus ansin déan na hoibríochtaí seo a leanas:

• Cuir isteach an sean-téacs hipearnasc a theastaíonn uait a fháil isteach sa Aimsigh cad bosca téacs, agus ansin clóscríobh an téacs nua hipearnasc a theastaíonn uait a chur isteach sa Ionadaigh le Bosca téacs;
• Sonraigh an scóip inar mian leat an cosán hipearnasc a aimsiú agus a athsholáthar ón Laistigh de liosta anuas;
• Ansin, roghnaigh Hipearnasc ón roghchlár Féach isteach;
• Faoi dheireadh, cliceáil Faigh Gach cnaipe, tá na cealla comhfhreagracha uile ina bhfuil an téacs hipearnasc sonrach liostaithe sa bhosca bunliosta.

3. Ansin, cliceáil Ionadaigh uile cnaipe, athraíodh na seanbhealaí hipearnasc go dtí na cinn nua ag an am céanna, féach an scáileán:

Cliceáil chun Kutools a íoslódáil le haghaidh Excel le Triail In Aisce!

Earraí níos coibhneasta: