मुख्य सामग्री पर जाएं

Excel में एक साथ एकाधिक हाइपरलिंक पथ कैसे बदलें?

लेखक: ज़ियाओयांग अंतिम संशोधित: 2020-09-04

किसी उद्देश्य के लिए, आप वर्कशीट में अपने डेटा के लिए एकाधिक हाइपरलिंक बना सकते हैं, और सभी हाइपरलिंक एक ही फ़ाइल पथ या पते से जुड़े हुए हैं, लेकिन अब, आपको इस हाइपरलिंक पथ को एक समय में किसी अन्य पते से बदलने की आवश्यकता है। हाइपरलिंक का पथ व्यक्तिगत रूप से बदलने में बहुत समय बर्बाद हो सकता है, क्या इस समस्या को हल करने का कोई त्वरित तरीका है?

VBA कोड के साथ वर्कशीट में एक साथ कई हाइपरलिंक पथ बदलें

एक अद्भुत सुविधा के साथ किसी कार्यपत्रक/कार्यपुस्तिका/एकाधिक पत्रक/चयन में एक साथ कई हाइपरलिंक पथ बदलें


VBA कोड के साथ वर्कशीट में एक साथ कई हाइपरलिंक पथ बदलें

मान लीजिए कि आपके पास दिखाए गए स्क्रीनशॉट के समान हाइपरलिंक के साथ डेटा की एक सूची है, और वीबीए कोड के साथ, आप वर्कशीट में पुराने फ़ाइल पथ या पते को एक नए के साथ तुरंत बदल सकते हैं।

1. नीचे पकड़ो ALT + F11 कुंजियाँ, और यह खुल जाती है एप्लीकेशन विंडो के लिए माइक्रोसॉफ्ट विजुअल बेसिक.

2. क्लिक करें सम्मिलित करें > मॉड्यूल, और निम्नलिखित मैक्रो को इसमें पेस्ट करें मॉड्यूल विंडो.

वीबीए कोड: एक साथ कई हाइपरलिंक पथ बदलें

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। फिर दबायें F5 इस कोड को चलाने के लिए कुंजी, और आपको अपना पुराना हाइपरलिंक पता इनपुट करने के लिए एक प्रॉम्प्ट बॉक्स पुराना पाठ डिब्बा। स्क्रीनशॉट देखें:

4। क्लिक करें OK, और एक अन्य प्रॉम्प्ट बॉक्स आपको उस नए हाइपरलिंक पते को दर्ज करने की याद दिलाने के लिए पॉप आउट हो जाता है जिसका आप उपयोग करना चाहते हैं।

5। और फिर क्लिक करें OK, सभी पुराने हाइपरलिंक पतों को एक ही बार में नए से बदल दिया गया है। स्क्रीनशॉट देखें:


एक अद्भुत सुविधा के साथ किसी कार्यपत्रक/कार्यपुस्तिका/एकाधिक पत्रक/चयन में एक साथ कई हाइपरलिंक पथ बदलें

यदि आप किसी चयन, एकाधिक शीट, वर्तमान वर्ककुक या एकाधिक कार्यपुस्तिकाओं से हाइपरलिंक पथों को बदलना चाहते हैं, तो आप कैसे कर सकते हैं? साथ ढूँढें और बदलें का लक्षण एक्सेल के लिए कुटूल, आप इस कार्य को शीघ्रता से निपटा सकते हैं।

नोट:इसे लागू करने के लिए ढूँढें और बदलें उपयोगिता, सबसे पहले, आपको डाउनलोड करना चाहिए एक्सेल के लिए कुटूल, और फिर सुविधा को जल्दी और आसानी से लागू करें।

स्थापित करने के बाद एक्सेल के लिए कुटूल, कृपया ऐसा करें:

1। क्लिक करें कुटूल > पथ प्रदर्शन, स्क्रीनशॉट देखें:

2. खुले में पथ प्रदर्शन फलक, क्लिक करें ढूँढें और बदलें टैब में ढूँढें और बदलें फलक, क्लिक करें बदलें टैब, और फिर निम्नलिखित कार्य करें:

  • वह पुराना हाइपरलिंक टेक्स्ट दर्ज करें जिसे आप ढूंढना चाहते हैं क्या पता टेक्स्ट बॉक्स, और फिर नया हाइपरलिंक टेक्स्ट टाइप करें जिसे आप बदलना चाहते हैं साथ बदलें पाठ बॉक्स;
  • वह दायरा निर्दिष्ट करें जहां आप हाइपरलिंक पथ ढूंढना और बदलना चाहते हैं अंदर ड्रॉप डाउन सूची;
  • फिर, लुक इन ड्रॉप डाउन से हाइपरलिंक्स चुनें;
  • अंत में, क्लिक करें सब ढूँढ़ो बटन, विशिष्ट हाइपरलिंक टेक्स्ट वाले सभी संबंधित कक्षों को निचले सूची बॉक्स में सूचीबद्ध किया गया है।

3। तब दबायें सभी को बदलें बटन, पुराने हाइपरलिंक पथ को तुरंत नए में बदल दिया गया है, स्क्रीनशॉट देखें:

नि:शुल्क परीक्षण के लिए एक्सेल के लिए कुटूल डाउनलोड करने के लिए क्लिक करें!


अधिक संबंधित लेख:

  • हाइपरलिंक से वास्तविक पते निकालें
  • मान लीजिए कि आपके पास सेल की एक श्रृंखला है जिसमें हाइपरलिंक हैं, और अब आपको हाइपरलिंक का वास्तविक गंतव्य देखना है और उन्हें हाइपरलिंक से निकालना है जैसा कि स्क्रीनशॉट में दिखाया गया है। क्या इस समस्या को शीघ्र हल करने का कोई आसान तरीका है?
  • एक्सेल में छवि यूआरएल को वास्तविक छवियों में बदलें
  • यदि आपके पास कॉलम ए में छवि यूआरएल पतों की एक सूची है, और अब, आप यूआरएल से संबंधित चित्रों को डाउनलोड करना चाहते हैं और उन्हें बाएं स्क्रीनशॉट में दिखाए गए अनुसार आसन्न कॉलम बी में प्रदर्शित करना चाहते हैं। एक्सेल में, आप छवि यूआरएल से वास्तविक चित्र कैसे जल्दी और आसानी से निकाल सकते हैं?
  • एक्सेल में यूआरएल टेक्स्ट को क्लिक करने योग्य हाइपरलिंक में बदलें
  • मान लीजिए कि आपकी वर्कशीट में कई यूआरएल हैं, लेकिन वे लिंक नहीं हैं, और अब आपको सभी अनलिंक किए गए यूआरएल को क्लिक करने योग्य हाइपरलिंक में बदलने की जरूरत है, जैसा कि निम्नलिखित स्क्रीनशॉट में दिखाया गया है। बेशक, आप उन्हें क्लिक करने योग्य बनाने के लिए एक-एक करके उन पर डबल क्लिक कर सकते हैं, लेकिन यदि बहुत सारे यूआरएल होंगे तो इसमें समय लगेगा। आप एक्सेल में एकाधिक अनलिंक किए गए यूआरएल को स्वचालित रूप से क्लिक करने योग्य हाइपरलिंक में कैसे परिवर्तित कर सकते हैं?
  • एक्सेल हाइपरलिंक से पीडीएफ दस्तावेज़ का एक विशिष्ट पृष्ठ खोलें
  • जब आप किसी सेल को पीडीएफ फाइल से लिंक करते हैं, तो आम तौर पर, जब आप हाइपरलिंक खोलने के लिए क्लिक करते हैं तो आप पीडीएफ फाइल के पहले पृष्ठ पर जाएंगे। यदि आपको हाइपरलिंक पर क्लिक करके सीधे पीडीएफ फ़ाइल के एक विशिष्ट पृष्ठ पर जाने की आवश्यकता है, तो यह लेख आपके लिए उपयोगी हो सकता है।

सर्वोत्तम कार्यालय उत्पादकता उपकरण

🤖 कुटूल्स एआई सहयोगी: निम्न के आधार पर डेटा विश्लेषण में क्रांति लाएं: बुद्धिमान निष्पादन   |  कोड जनरेट करें  |  कस्टम फ़ॉर्मूले बनाएं  |  डेटा का विश्लेषण करें और चार्ट बनाएं  |  कुटूल फ़ंक्शंस का आह्वान करें...
लोकप्रिय सुविधाएँ: डुप्लिकेट ढूंढें, हाइलाइट करें या पहचानें   |  रिक्त पंक्तियाँ हटाएँ   |  डेटा खोए बिना कॉलम या सेल को संयोजित करें   |   फॉर्मूला के बिना गोल ...
सुपर लुकअप: एकाधिक मानदंड VLookup    मल्टीपल वैल्यू वीलुकअप  |   अनेक शीटों में VLookup   |   फजी लुकअप ....
उन्नत ड्रॉप-डाउन सूची: शीघ्रता से ड्रॉप डाउन सूची बनाएं   |  आश्रित ड्रॉप डाउन सूची   |  बहु-चयन ड्रॉप डाउन सूची ....
स्तम्भ प्रबंधक: कॉलमों की एक विशिष्ट संख्या जोड़ें  |  कॉलम ले जाएँ  |  छिपे हुए कॉलम की दृश्यता स्थिति टॉगल करें  |  रेंज और कॉलम की तुलना करें ...
फीचर्ड फीचर्स: ग्रिड फोकस   |  डिजाइन देखें   |   बड़ा फॉर्मूला बार    कार्यपुस्तिका एवं शीट प्रबंधक   |  संसाधन लाइब्रेरी (ऑटो टेक्स्ट)   |  खजूर बीनने वाला   |  कार्यपत्रकों को संयोजित करें   |  एन्क्रिप्ट/डिक्रिप्ट सेल    सूची के अनुसार ईमेल भेजें   |  सुपर फ़िल्टर   |   विशेष फ़िल्टर (फ़िल्टर बोल्ड/इटैलिक/स्ट्राइकथ्रू...) ...
शीर्ष 15 टूलसेट12 टेक्स्ट टूल्स (पाठ जोड़ें, अक्षर हटाएँ, ...)   |   50 + चार्ट प्रकार (गैन्ट चार्ट, ...)   |   40+ प्रैक्टिकल सूत्र (जन्मदिन के आधार पर आयु की गणना करें, ...)   |   19 निवेशन टूल्स (QR कोड डालें, पथ से चित्र सम्मिलित करें, ...)   |   12 रूपांतरण टूल्स (शब्दों को संख्याएँ, मुद्रा रूपांतरण, ...)   |   7 विलय और विभाजन टूल्स (उन्नत संयोजन पंक्तियाँ, विभाजन कोशिकाओं, ...)   |   ... और अधिक

एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है।  वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...

Description


ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है

  • Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
  • नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
  • आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!
Comments (47)
Rated 5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
This might be an older article, but was exactly what I needed. Thank you!
This comment was minimized by the moderator on the site
hi
thanks man you helped me a lot
This comment was minimized by the moderator on the site
I downloaded this and gave it a try and it did nothing. My hyperlinks look like this: file///\\server\shared\PO\CY2021\25079.pdf. I'm trying to change "server" to "server1" after a migration. I do the find/replace and choose Hyperlink, execute it, and... nothing happens. 
Any ideas?
This comment was minimized by the moderator on the site
Hello John,Sorry to hear that. The reason why the find/replace function didn't work is that your hyperlink file///\\server\shared\PO\CY2021\25079.pdf is not valid. According to the Excel dialog box, it shows the address of this site is not valid. Check the address and try again.
Then when I change your hyperlink to http://file///\\server\shared\PO\CY2021\25079.pdf, the find/replace function works perfectly. Please have a try. Have a nice day.
Sincerely,Mandy
This comment was minimized by the moderator on the site
Muchas gracias, me ahorraste mucho tiempo actualizando hipervinculos!
This comment was minimized by the moderator on the site
Muito obrigado! Você me salvou dezenas de horas de sono que seriam perdidas atualizando links.
This comment was minimized by the moderator on the site
Would it be possible to have a version to set a macro in power point for update links to excel, happens that monthly we need to link the power point presentation to a new excel in a new location. I have to do it one by one and it takes hours! MANY THANKS!!!!

This comment was minimized by the moderator on the site
Thankyou so much for the vba fix. I knew there had to be an easy way to fix my hyperlink problem and you provided it :) I am extremely grateful.
This comment was minimized by the moderator on the site
Many thanks for the VBA code to change multiple hyperlink paths at once. Would it be possible to have a version that would go through the different tabs (worksheets) of the xls workbook, as the current version only seems to change the links in the active worksheet? Would be highly appreciated!

Thanks,

Schweppy
This comment was minimized by the moderator on the site
Hello, Schweppy,
The below code can help you to replace the hyperlinks in all sheets, please try.

Sub ReplaceHyperlinks()
Dim xWs As Worksheet
Dim xWss As Sheets
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
Set xWss = Application.ActiveWorkbook.Worksheets
For Each xWs In xWss
For Each xHyperlink In xWs.Hyperlinks
xHyperlink.Address = Replace(xHyperlink.Address, xOld, xNew)
Next
Next xWs
Application.ScreenUpdating = True
End Sub
This comment was minimized by the moderator on the site
This is amazing!!! Thank you for posting the code that works for all of the worksheets. I had the hardest time finding this and couldn't figure out how to create it myself. Thank you so much for sharing your code with the world!!!
Rated 5 out of 5
This comment was minimized by the moderator on the site
Your code helped me update hundreds of hyperlinks in a blink of an eye. Thank you soo much for you help.
This comment was minimized by the moderator on the site
Thanks a lot, works perfectly fine. Highly appreciated.
This comment was minimized by the moderator on the site
Glad it helps. Any questions, please feel free to contact us. Have a nice day!
This comment was minimized by the moderator on the site
Many thanks for the VBA code to change multiple hyperlink paths at once. Would it be possible to have a version that would go through the different tabs (worksheets) of the xls workbook, as the current version only seems to change the links in the active worksheet? Would be highly appreciated!

Thanks,

Schweppy
This comment was minimized by the moderator on the site
Had a spreadsheet with over 200 items that had hyperlinks that needed to be edited. This just saved me SO MUCH TIME. THANK YOU!!
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