एक्सेल में एकाधिक छवियों से हाइपरलिंक कैसे निकालें?
मान लीजिए, आपके पास वर्कशीट में छवियों की एक सूची है, और प्रत्येक छवि में एक हाइपरलिंक है, अब, आप इन चित्रों से वास्तविक हाइपरलिंक पते को उनके अगले सेल में निकालना चाहेंगे, जैसा कि स्क्रीनशॉट में दिखाया गया है। बेशक, आप हाइपरलिंक एड्रेस को यहां से कॉपी कर सकते हैं हाइपरलिंक संपादित करें एक-एक करके बॉक्स बनाएं, लेकिन, यदि कई हाइपरलिंक निकालने की आवश्यकता होगी तो इसमें समय लगेगा। इस लेख में, मैं एक्सेल में इस कार्य को जल्दी और आसानी से हल करने के लिए कुछ तरीकों का परिचय दूंगा।
VBA कोड के साथ एकाधिक छवियों से हाइपरलिंक निकालें
VBA कोड के साथ एकाधिक छवियों से हाइपरलिंक निकालें
निम्नलिखित वीबीए कोड आपको एक साथ कई हाइपरलिंक की गई छवियों से वास्तविक पते निकालने में मदद कर सकता है, कृपया चरण दर चरण ऐसा करें:
1. दबाए रखें ALT + F11 खोलने के लिए Excel में कुंजियाँ अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.
2। क्लिक करें सम्मिलित करें > मॉड्यूल, और मॉड्यूल विंडो में निम्नलिखित कोड पेस्ट करें।
वीबीए कोड: एकाधिक हाइपरलिंक की गई छवियों से वास्तविक पते निकालें
Sub ExtractHyperlinkFromPicture()
'updateby Extendoffice
Dim xSh As Shape
Dim xScreen As Boolean
xScreen = Application.ScreenUpdating
Application.ScreenUpdating = False
For Each xSh In ActiveSheet.Shapes
If xSh.Type = msoPicture Then
On Error Resume Next
Range(xSh.TopLeftCell.Address).Offset(0, 3).Value = xSh.Hyperlink.Address
On Error GoTo 0
End If
Next
Application.ScreenUpdating = xScreen
End Sub
3। फिर दबायें F5 इस कोड को चलाने के लिए कुंजी, और सभी हाइपरलिंक पते चित्रों के बगल में संबंधित कोशिकाओं में निकाले गए हैं, स्क्रीनशॉट देखें:
नोट: यह कोड वर्तमान वर्कशीट में सभी छवियों से वास्तविक पते निकालेगा।
सर्वोत्तम कार्यालय उत्पादकता उपकरण
एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है। वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...
ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है
- Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
- नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
- आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!
