अनुप्रयोग के लिए विजुअल बेसिक, संक्षेप में वीबीए, माइक्रोसॉफ्ट ऑफिस प्रोग्राम्स में एकीकृत विजुअल बेसिक 6 का एक रूप है। कोडिंग के माध्यम से, वीबीए आपको एक्सेल सहित कार्यालय कार्यक्रमों में कार्यों को स्वचालित करने की अनुमति देता है। कुछ मामलों में, आप VBA का उपयोग करके एक्सेल में नई सुविधाएँ भी जोड़ सकते हैं।
यद्यपि आपको VBA का उपयोग करने के लिए कोड के साथ काम करने की आवश्यकता है, इसका मतलब यह नहीं है कि VBA सभी अक्षर और संख्याएँ हैं। Excel में VBA के साथ, आप एक मैक्रो बना सकते हैं जो आपको सेल या सेल की श्रेणी में चित्र सम्मिलित करने की अनुमति देता है। इसके बारे में सब कुछ जानने के लिए आगे पढ़ें!
Excel में VBA का उपयोग करके सेल में चित्र कैसे सम्मिलित करें I
वीबीए का उपयोग करके एक्सेल सेल में चित्र डालने के लिए मैक्रो बनाने के लिए, आपको वास्तव में किसी भी उन्नत विज़ुअल बेसिक ज्ञान की आवश्यकता नहीं है। आपको बस इतना करना है कि डेवलपर टूल को सक्षम करें, मैक्रो बनाएं और सही कोड पेस्ट करें।
हालाँकि, यदि आप किसी दिन VBA सीखने और अपना स्वयं का कोड लिखने में रुचि रखते हैं, तो हमने VBA कोड को तीसरे खंड में विभाजित कर दिया है। बेशक, आप भी कर सकते हैं
वीबीए का उपयोग किए बिना एक्सेल में चित्र डालें. लेकिन यह लेख इसे वीबीए के माध्यम से पूरा करने के बारे में है। चलो पहले कारोबार करें!एक्सेल में वीबीए का उपयोग करने के लिए, आपको एक्सेल में डेवलपर टूल्स को सक्षम करने की आवश्यकता है। यह रिबन में डेवलपर टैब को सक्षम करेगा, जो डिफ़ॉल्ट रूप से अक्षम होता है।
- एक्सेल खोलें।
- पर जाएँ फ़ाइल मेन्यू।
- पर क्लिक करें विकल्प स्क्रीन के नीचे। यह एक्सेल विकल्प विंडो खोलेगा।
- एक्सेल विकल्प में, पर जाएँ रिबन को अनुकूलित करें टैब।
- अंतर्गत मुख्य टैब्स, जाँच करना डेवलपर.
अब VBA तक पहुंच सहित डेवलपर टूल आपके लिए सक्षम हैं। हर बार जब आप एक्सेल में वीबीए का उपयोग करना चाहते हैं तो आपको ऐसा करने की ज़रूरत नहीं है। डेवलपर टूल तब तक सक्षम रहेंगे, जब तक कि आप उन्हें अक्षम नहीं कर देते.
2. मैक्रो बनाना और कोड डालना
अब मैक्रो बनाने के लिए नीचे उतरने का समय आ गया है। वैकल्पिक रूप से, आप भी कर सकते हैं वीबीए का उपयोग कर एक बटन बनाएं इस कार्य के लिए, लेकिन हम मैक्रोज़ के साथ बने रहेंगे।
- एक्सेल में, पर जाएँ डेवलपर टैब।
- में कोड अनुभाग, चयन करें मैक्रो.
- नई विंडो में, अपने मैक्रो के लिए एक नाम दर्ज करें मैक्रो नाम. हम प्रयोग करने जा रहे हैं फोटो मैक्रो डालें.
- क्लिक बनाएं.
एक बार जब आप क्रिएट पर क्लिक करते हैं, तो VBA विंडो खुल जाएगी और आपके मैक्रो के लिए कोड प्रदर्शित करेगी। अभी, कोड में दो पंक्तियाँ होंगी: A विषय मैक्रो आरंभ करने के लिए, और एक अंत उप इसे समाप्त करने के लिए।
चलिए इस मैक्रो में कुछ कोड जोड़ते हैं। दो पंक्तियों के बीच निम्न कोड जोड़ें:
मंद फोटोनाम और पथ जैसा प्रकार
मंद फोटो जैसा चित्र
photoNameAndPath = एप्लिकेशन। GetOpenFilename (शीर्षक:="चुनना तस्वीर कोडालना")
अगर फोटोनाम और पथ = असत्य तब बाहर निकलना विषय
तय करना फोटो = एक्टिवशीट. चित्रों। सम्मिलित करें (फोटोनाम और पथ)
साथ तस्वीर
वाम = एक्टिवशीट। श्रेणी("ए 1")।बाएं
टॉप = एक्टिवशीट। श्रेणी("ए 1")।ऊपर
चौड़ाई = एक्टिवशीट। श्रेणी("ए 1")।चौड़ाई
हाइट = एक्टिवशीट। श्रेणी("ए 1")।ऊंचाई
प्लेसमेंट = 1
अंतसाथ
आपका अंतिम कोड नीचे जैसा कुछ होना चाहिए:
आपको अपनी प्रगति को बचाने के बारे में चिंता करने की आवश्यकता नहीं है। VBA में आपके द्वारा किया गया प्रत्येक परिवर्तन तुरंत सहेज लिया जाता है।
अब काम पर कोड देखने का समय आ गया है।
- वीबीए विंडो बंद करें।
- पर जाएँ डेवलपर एक्सेल में टैब।
- चुनना मैक्रो से कोड अनुभाग।
- आपके द्वारा अभी बनाए गए मैक्रो को हाइलाइट करें।
- क्लिक दौड़ना.
अब एक प्रॉम्प्ट खुलेगा जो आपसे उस छवि फ़ाइल का पता लगाने के लिए कहेगा जिसे आप सम्मिलित करना चाहते हैं। अपनी छवि का चयन करें और फिर क्लिक करें खुला. अब आपको A1 सेल में अपना फोटो देखना चाहिए!
ध्यान दें कि डाला गया चित्र सेल A1 में फ़िट होने के लिए छोटा है। आप इसे बदल सकते हैं, और चित्र को अन्य कक्षों या यहाँ तक कि कक्षों की एक श्रेणी में सम्मिलित करने के लिए कोड भी बदल सकते हैं। अगले भाग में, हम कोड को विभाजित करने जा रहे हैं और काम पर मापदंडों की व्याख्या करेंगे।
3. कोड को तोड़ना
इस VBA कोड को अपने मनचाहे तरीके से अपने लिए काम करने के लिए, आपको इसे समझने की आवश्यकता है। एक बार ऐसा करने के बाद, आप किसी भी सेल में किसी भी आकार में फोटो डालने के लिए कोड को बदल सकते हैं। इसे समझने में आसान बनाने के लिए हम कोड को थोड़ा-थोड़ा करके देखेंगे।
सब इन्सर्ट फोटो मैक्रो ()
मंद फोटोनाम और पथ जैसा प्रकार
मंद फोटो जैसा चित्र
photoNameAndPath = एप्लिकेशन। GetOpenFilename (शीर्षक:="चुनना तस्वीर कोडालना")
अगर फोटोनाम और पथ = असत्य तब बाहर निकलना विषय
तय करना फोटो = एक्टिवशीट. चित्रों। सम्मिलित करें (फोटोनाम और पथ)
साथ तस्वीर
वाम = एक्टिवशीट। श्रेणी("ए 1")।बाएं
टॉप = एक्टिवशीट। श्रेणी("ए 1")।ऊपर
चौड़ाई = एक्टिवशीट। श्रेणी("ए 1")।चौड़ाई
हाइट = एक्टिवशीट। श्रेणी("ए 1")।ऊंचाई
प्लेसमेंट = 1
अंतसाथ
अंत विषय
कोड शुरू होने के बाद, हम इसका उपयोग करते हैं धुंधला चर के प्रकार को निर्धारित करने के लिए कथन। हमारे यहाँ दो चर हैं: photoNameAndPath और तस्वीर अपने आप। हमने पूर्व को एक के रूप में निर्धारित किया है प्रकार और बाद वाला एक के रूप में तस्वीर.
वहां से, photoNameAndPath वेरिएबल चलता है और यह चित्र फ़ाइल के ठिकाने को प्राप्त करने के लिए एक एप्लिकेशन खोलता है। इसके माध्यम से किया जाता है आवेदन पत्र। GetOpenFileName. शीर्षक पैरामीटर वैकल्पिक है, और इसमें मौजूद सामग्री को विंडो नाम के रूप में प्रदर्शित किया जाता है।
का उपयोग करते हुए अगर photoNameAndPath = False तो उप से बाहर निकलें, हम निर्दिष्ट करते हैं कि यदि कोई अमान्य या रिक्त पता दिया गया है, तो प्रक्रिया को समाप्त कर दिया जाना चाहिए। हालांकि, अगर एक उचित फाइल खिलाई जाती है, तो फोटो सेट करें = ActiveSheet. चित्रों। सम्मिलित करें (फोटोनाम और पथ) इंगित करता है कि तस्वीर को फोटो वेरिएबल के रूप में सेट किया जाना चाहिए जिसे हमने पहले परिभाषित किया था, और इसे सक्रिय स्प्रेडशीट में डाला जाना चाहिए।
अंत में उपयोग कर रहा हूँ फोटो के साथ और इसके बाद की पांच पंक्तियां, हम इमेज की स्थिति के बारे में विस्तार से बताते हैं। ।बाएं और ।ऊपर प्रारंभ स्थानों को इंगित करें, जबकि ।चौड़ाई और ।ऊंचाई अंत स्थानों को इंगित करें। यदि आप छवि को अन्य कक्षों में, या किसी श्रेणी में सम्मिलित करना चाहते हैं, तो ये वे पंक्तियाँ हैं जिन्हें आपको बदलना चाहिए।
प्लेसमेंट इंगित करता है कि चित्र को कोशिकाओं के साथ आकार दिया जाना चाहिए या मुक्त रूप में डाला जाना चाहिए। इसे सेट करना 1 इसे कोशिकाओं के साथ आकार देंगे।
अंतत: हम उपयोग करते हैं के साथ समाप्त करना और तब अंत उप मैक्रो को बंद करने के लिए। ध्यान दें कि आप बदल सकते हैं photoNameAndPath और तस्वीर आप जो भी अन्य नाम पसंद करते हैं, उसके लिए चर। बस नामों को पूरे कोड में सुसंगत रखना याद रखें।
वीबीए के साथ एक्सेल में और काम करें
एक्सेल वास्तव में डेटा को व्यवस्थित और विश्लेषण करने के लिए एक अद्भुत उपकरण है, लेकिन इसका मतलब यह नहीं है कि जब ग्राफिक्स की बात आती है तो एक्सेल अयोग्य है। हालांकि तस्वीरें और बिटमैप्स एक्सेल के सबसे मजबूत सूट नहीं हैं, फिर भी एक्सेल उन्हें संभालने में पूरी तरह सक्षम है।
यद्यपि आप अन्य Office ऐप्स की तरह इंटरफ़ेस का उपयोग करके Excel में चित्र सम्मिलित कर सकते हैं, आप इसे VBA का उपयोग करके भी कर सकते हैं। VBA के साथ, आप इस कार्य को स्वचालित कर सकते हैं और इसे एक साथ चलाने के लिए अन्य कार्यों के साथ जोड़ भी सकते हैं। एक्सेल में वीबीए के साथ संभावनाएं अनंत हैं।