Skip to main content

Conas il-hipearnasc a oscailt ag an am céanna in Excel?

Údar: Xiaoyang Athraithe Deiridh: 2024-03-19

Má tá go leor hipearnasc agat i scarbhileog, de ghnáth bheadh ​​ort iad a oscailt ceann ar cheann, rud a d’fhéadfadh a bheith tedious. Go fortunately, tá roinnt bealaí simplí ann chun na hipearnasc roghnaithe go léir a oscailt ag an am céanna. Trí na modhanna a thuairiscítear thíos a leanúint, is féidir leat an tasc seo a chur i gcrích go héasca.


Oscail hipearnasc iolrach ag an am céanna le cód VBA

Chun do hipearnasc roghnaithe de raon a oscailt ag an am céanna, is féidir leis an gcód VBA seo a leanas cabhrú leat, déan mar seo le do thoil:

1. Coinnigh síos an ALT + F11 eochracha, agus osclaíonn sé an Fuinneog Microsoft Visual Basic for Applications.

2. Cliceáil Ionsáigh > Modúil, agus greamaigh an cód seo a leanas sa Fuinneog an Mhodúil.

Cód VBA: Oscail hipearnasc iolrach ag an am céanna

Sub OpenHyperLinks()
'Updateby Extendoffice
	Dim xHyperlink As Hyperlink
	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 xHyperlink In WorkRng.Hyperlinks
		xHyperlink.Follow
	Next
End Sub

3. Ansin brúigh F5 eochair chun an cód seo a rith, agus tiocfaidh bosca pras amach le cur i gcuimhne duit raon a roghnú lena n-áirítear hipearnasc a theastaíonn uait a oscailt ag an am céanna, féach an scáileán:

doc-open-multip-hyperlinks-1

4. Agus ansin cliceáil OK, osclaítear na hipearnasc go léir ag an am céanna gan iad a chliceáil.


Oscail hipearnasc iolracha ag an am céanna le Kutools AI Aide

Díghlasáil an chumhacht éifeachtúlacht le Kutools AI Aide! Slán a fhágáil leis an hassle a bhaineann le hipearnasc a oscailt ceann ar cheann nó cód casta. Le Kutools AI Aide, is féidir leat hipearnasc iolracha a oscailt go comhuaineach gan ach cliceáil. Do shreabhadh oibre a shruthlíniú agus am luachmhar a shábháil tríd an uirlis nuálaíoch seo a úsáid. Taithí brabhsáil gan uaim agus feabhas a chur ar do tháirgiúlacht le Kutools AI Aide inniu!

nótaí: Chun seo a úsáid Kutools AI Aide of Kutools le haghaidh Excel, Le do thoil Íoslódáil agus a shuiteáil Kutools do Excel an chéad.

Tar éis Kutools a shuiteáil le haghaidh Excel, cliceáil le do thoil Kutools AI > AI Aide a oscailt Kutools AI Aide pána:

  1. Roghnaigh an liosta sonraí, ansin clóscríobh do riachtanas isteach sa bhosca comhrá, agus cliceáil Seol cnaipe nó brúigh Iontráil eochair chun an cheist a sheoladh;
    msgstr "Oscail gach hipearnasc ag an am céanna sa rogha:"
  2. Tar éis anailís a dhéanamh, cliceáil Rith cnaipe a rith. Déanfaidh Kutools AI Aide d'iarratas a phróiseáil ag baint úsáide as AI agus osclaíonn sé gach hipearnasc den roghnú go díreach in Excel.

doc-open-multip-hyperlinks-1


Earraí gaolmhara:

  • Athraigh cosáin hipearnasc iolracha 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?
  • Tiontaigh seoltaí ríomhphoist iolracha go hipearnasc in Excel
  • Má tá liosta de sheoltaí ríomhphoist gnáth-théacs agat i mbileog oibre, agus anois, ba mhaith leat seoltaí ríomhphoist tráchtais a thiontú go hipearnasc gur féidir leat ríomhphoist a sheoladh agus na seoltaí á gcliceáil. Ar ndóigh, is féidir leat iad a thiontú go seoltaí ríomhphoist hipearnasctha, ach, beidh an modh seo leadránach má tá seoltaí iolracha ag teastáil chun iad a thiontú. San alt seo, labhróidh mé faoi roinnt cleasanna maithe chun déileáil leis an tasc seo.
  • Lean hipearnasc chuig an mbileog i bhfolach in Excel
  • Mar shampla, tá leabhar oibre agam ina bhfuil bileoga oibre iolracha, tá hipearnasc ag an gcéad mháistir-bhileog le bileoga eile, agus anois, folaím gach bileog ach amháin an chéad cheann. Sa chás seo, níl na hipearnasc a nascann le bileoga ceilte ar fáil. Ach, conas a d'fhéadfá na hipearnaisc seo a oibriú go rathúil? Nuair a chliceálann tú hipearnasc amháin, osclófar an leathán i bhfolach nasctha láithreach.

Uirlisí Táirgiúlachta Oifige is Fearr

🤖 Kutools AI Aide: anailís sonraí a réabhlóidiú bunaithe ar: Forghníomhú Chliste   |  Gin Cód  |  Cruthaigh Foirmlí Saincheaptha  |  Anailís a dhéanamh ar Sonraí agus Cairteacha a Ghin  |  Feidhmeanna Kutools a agairt...
Gnéithe Coitianta: Faigh, Aibhsigh nó Aithnigh Dúblaigh   |  Scrios Sraitheanna Bána   |  Comhcheangail Colúin nó Cealla gan Sonraí a Chailleadh   |   Babhta gan Foirmle ...
Cuardaigh Super: Ilchritéir VLookup    VLookup Illuachanna  |   VLookup Trasna Ilbhileoga   |   Amharc doiléir ....
Liosta anuas Casta: Go tapa Cruthaigh Liosta Anuas   |  Liosta anuas Cleithiúnach   |  Liosta Buail Isteach Ilroghnacha ....
Bainisteoir Colún: Cuir Líon Sonrach Colún leis  |  Colúin Bog  |  Scoránaigh Stádas Infheictheachta na gColún Ceilte  |  Déan comparáid idir Raonta & Colúin ...
Gnéithe Réadmhaoin: Fócas Eangaí   |  Amharc Dearaidh   |   Barra Mór na Foirmle    Leabhar Oibre & Bainisteoir Bileog   |  Leabharlann Acmhainní (Uaththéacs)   |  Piocálaí Dáta   |  Comhcheangail Bileoga Oibre   |  Criptigh/Díchriptigh Cealla    Seol Ríomhphost trí Liosta   |  Scagaire Super   |   Scagaire Speisialta (scagaire trom/iodálach/stailc tríd...) ...
Barr 15 Uirlisí12 Téacs uirlisí (Cuir Téacs, Bain Carachtair,...)   |   50 + Cairt cineálacha (Cairt Gantt,...)   |   40+ Praiticiúil Foirmlí (Ríomh aois bunaithe ar lá breithe,...)   |   19 Insertion uirlisí (Cuir isteach Cód QR, Ionsáigh Pictiúr ón gCosán,...)   |   12 Tiontú uirlisí (Uimhreacha le Focail, Comhshó Airgeadra,...)   |   7 Cumaisc & Scoilt uirlisí (Sraitheanna Comhcheangail Casta, Cealla Scoilt,...)   |   ... agus eile

Supercharge Do Scileanna Excel le Kutools le haghaidh Excel, agus Éifeachtúlacht Taithí Cosúil Ná Roimhe. Kutools le haghaidh Excel Tairiscintí Níos mó ná 300 Ardghnéithe chun Táirgiúlacht a Treisiú agus Sábháil Am.  Cliceáil anseo chun an ghné is mó a theastaíonn uait a fháil ...

Tuairisc


Tugann Tab Oifige comhéadan Tabbed chuig Office, agus Déan Do Obair i bhfad Níos Éasca

  • Cumasaigh eagarthóireacht agus léamh tabbed i Word, Excel, PowerPoint, Foilsitheoir, Rochtain, Visio agus Tionscadal.
  • Oscail agus cruthaigh cáipéisí iolracha i gcluaisíní nua den fhuinneog chéanna, seachas i bhfuinneoga nua.
  • Méadaíonn do tháirgiúlacht 50%, agus laghdaíonn sé na céadta cad a tharlaíonn nuair luch duit gach lá!
Comments (20)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Thanks for the code.
Could make it work for a "https link instead a hyperlink?
This comment was minimized by the moderator on the site
Got a compile error on Microsoft Visual Basic for Applications 7.1 on Mac High Sierra
This comment was minimized by the moderator on the site
This works fine, except for a problem, how can I make it that it only opens filtered cells?

Thank you
This comment was minimized by the moderator on the site
Can i select which browser the links need to open
This comment was minimized by the moderator on the site
Hi, it worked perfectly, thanks! Is there a way to copy the text from the pages of these links in the cell next to each of them?
That would save me hundreds of hours of work!
This comment was minimized by the moderator on the site
Its works awesome.
This comment was minimized by the moderator on the site
When I use this on a column of hyperlinks generated by the =HYPERLINK() formula, it doesn't seem to work. When I copy/paste the values into a new column and run it there, it doesn't work. When I go to each individual cell, go to the end of text, and hit enter (causing it to become a hyperlink) it DOES work.


This didn't work for my needs, unfortunately. I have thousands of rows and clicking enter at the end of each line of text is pretty much what I'm having to do anyway.
This comment was minimized by the moderator on the site
Found a solution?
This comment was minimized by the moderator on the site
@James @Johan - Select the text you wish to convert into hyperlink, then use this code to convert the text into hyperlink directly. Then run the code above, works like a charm.


Sub HyperAdd()

'Converts each text hyperlink selected into a working hyperlink

For Each xCell In Selection
ActiveSheet.Hyperlinks.Add Anchor:=xCell, Address:=xCell.Formula
Next xCell

End Sub
This comment was minimized by the moderator on the site
Hello! What I did was to copy/paste the values from the =HYPERLINK code into a different column, and then I used @SimpleDude's code to convert the pasted text into the hyperlinks that worked with the original hyperlink-opening code. Thank you for the help!
This comment was minimized by the moderator on the site
Thanks!
Works exactly as expected. Must be sure that the links are already valid URLs.
I opened 15 at one time.
This comment was minimized by the moderator on the site
Freezes excel - links never open
This comment was minimized by the moderator on the site
Please let me know hpw does it work in Mac
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations