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

Excel में हाइपरलिंक से वास्तविक पते कैसे निकालें?

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

मान लीजिए कि आपके पास सेल की एक श्रृंखला है जिसमें हाइपरलिंक हैं, और अब आपको हाइपरलिंक का वास्तविक गंतव्य देखना है और उन्हें हाइपरलिंक से निकालना है जैसा कि स्क्रीनशॉट में दिखाया गया है। क्या इस समस्या को शीघ्र हल करने का कोई आसान तरीका है? यह आलेख आपको एकाधिक हाइपरलिंक से वास्तविक पते निकालने में मार्गदर्शन करेगा।


तीर नीला दायां बुलबुला हाइपरलिंक संपादित करें सुविधा के साथ हाइपरलिंक से वास्तविक पते निकालें

यहां ही हाइपरलिंक संपादित करें फ़ंक्शन आपको इनमें से प्रत्येक हाइपरलिंक के लिए अंतर्निहित यूआरएल निकालने और उस वास्तविक पते को एक अलग सेल में रखने में मदद कर सकता है। आप इस प्रकार कर सकते हैं:

1. हाइपरलिंक वाले सेल का चयन करें और संदर्भ मेनू से राइट-क्लिक करें, चुनें हाइपरलिंक संपादित करें, स्क्रीनशॉट देखें:

2। और एक हाइपरलिंक संपादित करें डायलॉग बॉक्स दिखाई देगा, चुनें और कॉपी करें (Ctrl + सी) से संपूर्ण URL पता संवाद बॉक्स का क्षेत्र.

3. फिर डायलॉग बॉक्स बंद करें और वास्तविक पता अपने इच्छित किसी भी सेल में पेस्ट करें।

नोट:इस पद्धति से, आप हर बार केवल एक हाइपरलिंक पता निकाल सकते हैं, लेकिन यदि आपको एकाधिक हाइपरलिंक निकालने की आवश्यकता है, तो आपको इस फ़ंक्शन को बार-बार लागू करने की आवश्यकता है।


तीर नीला दायां बुलबुला वीबीए कोड के साथ हाइपरलिंक से वास्तविक पते निकालें

बहुत सारे हाइपरलिंक के लिए, उपरोक्त विधि थकाऊ और समय लेने वाली होगी, इसलिए निम्नलिखित वीबीए कोड आपको हाइपरलिंक से एक साथ कई पते जल्दी से निकालने में मदद कर सकता है।

1. दबाए रखें ALT + F11 कुंजी को खोलने के लिए अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.

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

Sub Extracthyperlinks()
'Updateby Extendoffice
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.Value = Rng.Hyperlinks.Item(1).Address
    End If
Next
End Sub

3। फिर दबायें F5 कोड चलाने के लिए कुंजी, और आपके लिए हाइपरलिंक का चयन करने के लिए एक संवाद पॉप आउट होता है जिसे आप वास्तविक पते निकालना चाहते हैं, स्क्रीनशॉट देखें:

4। तब दबायें OK, और चयनित सेल सामग्री को मूल श्रेणी में वास्तविक हाइपरलिंक पतों में परिवर्तित कर दिया गया है। स्क्रीनशॉट देखें:


तीर नीला दायां बुलबुला यूजर डिफाइंड फ़ंक्शन के साथ हाइपरलिंक से वास्तविक पते निकालें

निम्नलिखित उपयोगकर्ता परिभाषित फ़ंक्शन हाइपरलिंक से वास्तविक यूआरएल भी निकाल सकता है।

1. दबाए रखें ALT + F11 कुंजी को खोलने के लिए अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.

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

Function GetURL(pWorkRng As Range) As String
'Updateby Extendoffice
    GetURL = pWorkRng.Hyperlinks(1).Address
End Function

3. कोड सहेजें और विंडो बंद करें, इस सूत्र को टाइप करने के लिए एक रिक्त कक्ष का चयन करें = GetURL(A2) (A2 वह सेल है जिसमें हाइपरलिंक है), और दबाएँ दर्ज बटन। आप देख सकते हैं कि वास्तविक हाइपरलिंक पता निकाला गया है।


तीर नीला दायां बुलबुला एक्सेल के लिए कुटूल के साथ हाइपरलिंक से वास्तविक पते जल्दी और आसानी से निकालें

यहाँ एक उपयोगी उपकरण है, जिसे कहा जाता है एक्सेल के लिए कुटूल, के साथ अपने हाइपरलिंक कनवर्ट करें सुविधा, आप निम्नलिखित परिचालनों से शीघ्रता से निपट सकते हैं:

  • हाइपरलिंक से वास्तविक पते निकालें;
  • यूआरएल टेक्स्ट को क्लिक करने योग्य हाइपरलिंक में बदलें.
एक्सेल के लिए कुटूल : 300 से अधिक उपयोगी एक्सेल ऐड-इन्स के साथ, 30 दिनों में बिना किसी सीमा के आज़माने के लिए निःशुल्क.

यदि आपने स्थापित किया है एक्सेल के लिए कुटूल, कृपया निम्नानुसार करें:

1. उस श्रेणी का चयन करें जिसमें हाइपरलिंक निकालने की आवश्यकता है।

2। क्लिक करें कुटूल > संपर्क > हाइपरलिंक कनवर्ट करें, स्क्रीनशॉट देखें:

3. में हाइपरलिंक कनवर्ट करें संवाद बॉक्स में, चयन करें हाइपरलिंक पते सेल सामग्री को प्रतिस्थापित करते हैं विकल्प, और क्लिक करें दस्तावेज़-बटन1 से बटन परिणाम सीमा परिणाम डालने के लिए एक सेल निर्दिष्ट करना।

4। और फिर क्लिक करें OK, वास्तविक पते हाइपरलिंक से निकाले गए हैं। स्क्रीनशॉट देखें:

नोट: यदि आप वास्तविक पते को मूल श्रेणी में रखना चाहते हैं, तो कृपया जांचें स्रोत श्रेणी परिवर्तित करें.

क्लिक करें हाइपरलिंक कनवर्ट करें इस सुविधा के बारे में अधिक जानने के लिए।

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


तीर नीला दायां बुलबुला डेमो: एक्सेल के लिए कुटूल के साथ हाइपरलिंक से वास्तविक पते निकालें

एक्सेल के लिए कुटूल: 300 से अधिक उपयोगी एक्सेल ऐड-इन्स के साथ, 30 दिनों में बिना किसी सीमा के आज़माने के लिए निःशुल्क। अभी डाउनलोड करें और निःशुल्क परीक्षण करें!

संबंधित लेख:

एक्सेल में यूआरएल टेक्स्ट को क्लिक करने योग्य हाइपरलिंक में कैसे बदलें?

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

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

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

Description


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

  • Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
  • नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
  • आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!
Comments (44)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Bonjour
Auriez vous une solution pour mettre en place le fonctionnement par la formule sur Excel 365 sur Mac ?
This comment was minimized by the moderator on the site
Hello, Edouard,
Sorry, the methods in this article are only applied to Microsoft Excel.
Thank you!
This comment was minimized by the moderator on the site
Ola colegas ,

Tenho uma planilha com mais de 2000 linhas, preciso exportar o documento que esta no hiperlink estas celulas, para um diretório da maquina, alguém sabe como fazer ?

agradeço a atenção

at..
cássia
This comment was minimized by the moderator on the site
Thank you it solve my problem
This comment was minimized by the moderator on the site
Thank you, the VBA code worked like a charm :)
This comment was minimized by the moderator on the site
Thank you for the tip to Extract Actual Addresses From Hyperlinks in Excel With VBA Code. It was exactly what I needed!
This comment was minimized by the moderator on the site
How does this apply to Excel on Mac?
This comment was minimized by the moderator on the site
I think it's nice to have an option that doesn't require macros since so many haven't used VBA at all.
This comment was minimized by the moderator on the site
If you're not comfortable with VBA, the key step to getting this done is the FORMULATEXT() formula that is included with excel. For example, if cell A1 has this...
=HYPERLINK("https://www.google.com","Google Homepage")
...then it would display "Google Homepage" but you want to extract "https://www.google.com". You can use =FORMULATEXT(A1) to get the output of "=HYPERLINK("https://google.com","Google Homepage")".

Then you use the find and mid functions to find the double quotes (which is CHAR(34)) and pull the string between the first two double quotes. Nesting it all together, you can use this formula to get the URL without any VBA required...
=MID(FORMULATEXT(A1),FIND(CHAR(34),FORMULATEXT(A1))+1,FIND(CHAR(34),FORMULATEXT(A1),FIND(CHAR(34),FORMULATEXT(A1))+1)-FIND(CHAR(34),FORMULATEXT(A1))-1)
This comment was minimized by the moderator on the site
Thankyou for an easy method to extract the complete URL from a weblink. I looked at other methods that were too nebulous but yours was straightforward and easy. Thanks.
This comment was minimized by the moderator on the site
Thanks for the " Extract actual addresses from hyperlinks with VBA code" VBA and clear instructions. It worked great for me.
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