एक्सेल में सेलों के साथ सभी चित्रों को स्थानांतरित करने और आकार देने के लिए स्वचालित रूप से कैसे बदलें?
आम तौर पर, एक चित्र को मूव के डिफ़ॉल्ट गुणों के साथ वर्कशीट में डाला जाता था और कोशिकाओं के साथ आकार नहीं दिया जाता था। आपको आवश्यकतानुसार अपनी वर्कशीट में इसके गुणों को मैन्युअल रूप से मूव और साइज विद सेल्स फीचर में बदलना होगा। वास्तव में, आप वर्कअराउंड के साथ स्वचालित रूप से कोशिकाओं के साथ चित्र को स्थानांतरित करने और आकार देने के लिए जल्दी से बदल सकते हैं। और यह लेख आपको इसे प्राप्त करने की विधि दिखाएगा।
वीबीए कोड के साथ कोशिकाओं के साथ स्थानांतरित करने और आकार देने के लिए सभी चित्रों को स्वचालित रूप से बदलें
नीचे दिया गया वीबीए कोड आपको वर्कशीट में कोशिकाओं के साथ स्थानांतरित करने और आकार देने के लिए सभी चित्रों के गुणों को तुरंत बदलने में मदद कर सकता है। कृपया निम्नानुसार करें.
1. उस वर्कशीट को खोलें जिसमें वे चित्र हैं जिन्हें आप कोशिकाओं के साथ ले जाकर और आकार देकर बदलना चाहते हैं, फिर खोलें अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक विंडो को दबाकर ऑल्ट + F11 चांबियाँ।
2। में अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक विंडो, कृपया क्लिक करें सम्मिलित करें > मॉड्यूल. फिर VBA कोड को कॉपी करके कोड विंडो में पेस्ट करें।
वीबीए कोड: सभी चित्रों को कोशिकाओं के साथ स्थानांतरित करने और आकार देने के लिए बदलें
Sub MoveAndSizeWithCells()
Dim xPic As Picture
On Error Resume Next
Application.ScreenUpdating = False
For Each xPic In ActiveSheet.Pictures
xPic.Placement = xlMoveAndSize
Next
Application.ScreenUpdating = True
End Sub3। दबाएं F5 कोड को चलाने के लिए कुंजी या रन बटन पर क्लिक करें।
फिर सक्रिय शीट में सभी चित्र स्वचालित रूप से कोशिकाओं के साथ स्थानांतरित और आकार में बदल जाते हैं।
संबंधित आलेख:
- एक्सेल सेल में किसी चित्र को केन्द्रित कैसे करें?
- एक्सेल में किसी सेल में चित्र है या नहीं इसकी जांच कैसे करें?
- एक्सेल में सेल वैल्यू के आधार पर सेल में गतिशील रूप से छवि या चित्र कैसे डालें?
- Excel में छवि पर क्लिक करने पर उसे बड़ा कैसे करें?
सर्वोत्तम कार्यालय उत्पादकता उपकरण
एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है। वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...
ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है
- Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
- नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
- आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!
