Salt la conținutul principal

Cum se deschid mai multe hyperlinkuri simultan în Excel?

Dacă aveți multe hyperlinkuri într-o foaie de calcul, în mod normal ar trebui să le deschideți unul câte unul, ceea ce poate fi plictisitor. Din fericire, există câteva modalități simple de a deschide toate hyperlinkurile selectate simultan. Urmând metodele descrise mai jos, puteți îndeplini cu ușurință această sarcină.


Deschideți mai multe hyperlinkuri simultan cu codul VBA

Pentru a deschide simultan hyperlinkurile selectate dintr-un interval, următorul cod VBA vă poate ajuta, vă rugăm să procedați astfel:

1. Țineți apăsat butonul ALT + F11 tastele și deschide fișierul Fereastra Microsoft Visual Basic pentru aplicații.

2. Clic Insera > Moduleși lipiți următorul cod în Fereastra modulului.

Cod VBA: deschideți mai multe hyperlinkuri simultan

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. Apoi apăsați F5 tasta pentru a rula acest cod și va apărea o casetă de prompt pentru a vă reaminti să selectați o gamă, inclusiv hyperlinkuri pe care doriți să le deschideți simultan, consultați captura de ecran:

doc-open-multiple-hyperlink-1

4. Apoi faceți clic pe OK, toate hyperlinkurile sunt deschise în același timp fără a face clic pe ele.


Deschideți mai multe hyperlinkuri simultan cu Kutools AI Aide

Deblocați puterea eficienței cu Kutools AI Aide! Spuneți la revedere necazului de a deschide hyperlinkuri unul câte unul sau cod complex. Cu Kutools AI Aide, puteți deschide fără efort mai multe hyperlinkuri simultan, cu doar un clic. Simplificați-vă fluxul de lucru și economisiți timp prețios utilizând acest instrument inovator. Experimentați navigarea fără probleme și îmbunătățiți-vă productivitatea cu ajutorul Kutools AI Aide astăzi!

notițe: Pentru a folosi asta Kutools AI Aide of Kutools pentru Excel, Vă rugăm să descărcați și instalați Kutools pentru Excel mai întâi.

După instalarea Kutools pentru Excel, faceți clic pe Kutools AI > Ajutor AI pentru a deschide Kutools AI Aide panou:

  1. Selectați lista de date, apoi introduceți cerința dvs. în caseta de chat și faceți clic Trimiteți sau apăsați Intrați cheie pentru a trimite întrebarea;
    „Deschideți toate hyperlinkurile simultan în selecție:”
  2. După analiză, faceți clic Executa butonul pentru a rula. Kutools AI Aide va procesa cererea dvs. folosind AI și va deschide toate hyperlinkurile selecției direct în Excel.

doc-open-multiple-hyperlink-1


Legate de articole:

  • Schimbați mai multe căi de hyperlink simultan în Excel
  • Într-un anumit scop, puteți crea mai multe hyperlinkuri pentru datele dvs. în foaia de lucru și toate hyperlink-urile sunt legate de aceeași cale de fișier sau adresă, dar acum, trebuie să înlocuiți această cale de hyperlink cu altă adresă la un moment dat. Dacă schimbați în mod individual calea hyperlinkurilor, puteți pierde mult timp, există o modalitate rapidă de a rezolva această problemă?
  • Convertiți mai multe adrese de e-mail în hyperlinkuri în Excel
  • Dacă aveți o listă de adrese de e-mail cu text simplu într-o foaie de lucru și acum doriți să convertiți aceste adrese de e-mail în hyperlinkuri pe care le puteți trimite e-mailuri în timp ce dați clic pe adrese. Desigur, le puteți converti în adrese de e-mail hyperlink, dar această metodă va fi plictisitoare dacă sunt necesare mai multe adrese pentru a fi convertite. În acest articol, voi vorbi despre câteva trucuri bune pentru a face față acestei sarcini.
  • Urmați hyperlinkul către foaia ascunsă în Excel
  • De exemplu, am un registru de lucru care conține mai multe foi de lucru, prima foaie principală are hyperlinkuri către alte foi, iar acum ascund toate foile, cu excepția primei. În acest caz, hyperlinkurile care leagă la foile ascunse nu sunt disponibile. Dar cum ați putea face aceste hyperlinkuri să funcționeze cu succes? Când faceți clic pe un hyperlink, foaia ascunsă legată va fi deschisă imediat.

Cele mai bune instrumente de productivitate de birou

🤖 Kutools AI Aide: Revoluționați analiza datelor pe baza: Execuție inteligentă   |  Generați codul  |  Creați formule personalizate  |  Analizați datele și generați diagrame  |  Invocați funcțiile Kutools...
Caracteristici populare: Găsiți, evidențiați sau identificați duplicatele   |  Ștergeți rândurile goale   |  Combinați coloane sau celule fără a pierde date   |   Rundă fără Formula ...
Super căutare: VLookup cu mai multe criterii    VLookup cu valori multiple  |   VLookup pe mai multe foi   |   Căutare fuzzy ....
Listă derulantă avansată: Creați rapid o listă derulantă   |  Listă drop-down dependentă   |  Listă derulantă cu selectare multiplă ....
Manager de coloane: Adăugați un număr specific de coloane  |  Mutați coloanele  |  Comutați starea vizibilității coloanelor ascunse  |  Comparați intervale și coloane ...
Caracteristici prezentate: Focus pe grilă   |  Vedere de proiectare   |   Big Formula Bar    Manager registru de lucru și foi   |  Biblioteca de resurse (Text automat)   |  Data Picker   |  Combinați foi de lucru   |  Criptare/Decriptare celule    Trimiteți e-mailuri după listă   |  Super Filtru   |   Filtru special (filtrează bold/italic/barat...) ...
Top 15 seturi de instrumente12 Text Instrumente (Adăuga text, Eliminați caractere,...)   |   50+ Diagramă Tipuri de (Gantt Chart,...)   |   40+ Practic Formule (Calculați vârsta pe baza zilei de naștere,...)   |   19 inserare Instrumente (Introduceți codul QR, Inserați imaginea din cale,...)   |   12 Convertire Instrumente (Numere la cuvinte, conversie valutara,...)   |   7 Merge & Split Instrumente (Rânduri combinate avansate, Celule divizate,...)   |   ... și altele

Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp.  Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...

Descriere


Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară

  • Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
  • Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ​​ferestrele noi.
  • Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!
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