एक्सेल में किसी सेल में चित्र है या नहीं इसकी जांच कैसे करें?
एक्सेल में सक्रिय वर्कशीट में सभी चित्रों को ढूंढना और चयन करना आसान है। लेकिन क्या आप जानते हैं कि एक्सेल में किसी सेल में कोई चित्र है या नहीं इसकी जांच कैसे करें? इस लेख में दी गई एक विधि आपकी सहायता कर सकती है.
जांचें कि क्या किसी सेल में VBA कोड वाला चित्र है
जांचें कि क्या किसी सेल में VBA कोड वाला चित्र है
नीचे दिया गया VBA कोड आपको यह जांचने में मदद कर सकता है कि किसी सेल में कोई चित्र है या नहीं। कृपया निम्नानुसार करें.
1. वर्कशीट खोलें, आपको यह जांचना है कि चित्र किसी निर्दिष्ट सेल में मौजूद है या नहीं, फिर दबाएं ऑल्ट + F11 कुंजी को खोलने के लिए अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.
2। में अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की, क्लिक करें सम्मिलित करें > मॉड्यूल. फिर VBA कोड को कॉपी करके कोड विंडो में पेस्ट करें।
वीबीए कोड: जांचें कि एक्सेल में किसी सेल में चित्र है या नहीं
Sub CellHasPicture()
Dim xRg As Range
Dim xShape As Shape
Dim xFlag As Boolean
On Error Resume Next
Set xRg = Application.InputBox("Please enter the cell address:", "KuTools For Excel", Selection.Address, , , , , 8)
If xRg Is Nothing Then Exit Sub
xFlag = False
For Each xShape In ActiveSheet.Shapes
If xShape.TopLeftCell.Address = xRg.Address Then
xFlag = True
End If
Next
If xFlag Then
MsgBox "Image exists!"
Else
MsgBox "Image does not exist"
End If
End Sub
3। दबाएं F5 कोड चलाने की कुंजी. पॉप अप में एक्सेल के लिए कुटूल संवाद बॉक्स में, कृपया वह सेल दर्ज करें जिसे आप जांचना चाहते हैं कि इसमें कोई चित्र है या नहीं, और फिर क्लिक करें OK बटन। स्क्रीनशॉट देखें:
4. फिर नीचे दिए गए स्क्रीनशॉट के अनुसार एक डायलॉग बॉक्स पॉप अप होगा, जिसमें दिखाया गया है कि निर्दिष्ट सेल में कोई चित्र मौजूद है या नहीं।
संबंधित आलेख:
- एक्सेल में सेलों के साथ सभी चित्रों को स्थानांतरित करने और आकार देने के लिए स्वचालित रूप से कैसे बदलें?
- एक्सेल सेल में किसी चित्र को केन्द्रित कैसे करें?
- एक्सेल में सेल वैल्यू के आधार पर सेल में गतिशील रूप से छवि या चित्र कैसे डालें?
- Excel में छवि पर क्लिक करने पर उसे बड़ा कैसे करें?
सर्वोत्तम कार्यालय उत्पादकता उपकरण
एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है। वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...
ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है
- Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
- नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
- आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!