यदि आप कुछ समय के लिए माइक्रोसॉफ्ट एक्सेल के साथ काम कर रहे हैं, तो आप ऑटोफिल के महत्व को जानते हैं। पंक्ति या कॉलम में सूत्र की प्रतिलिपि बनाने के लिए, हम इस विधि का उपयोग करते हैं। अब, हम इसे माउस द्वारा मैन्युअल रूप से उपयोग कर सकते हैं। लेकिन, यदि आपके पास डेटा के साथ एक बड़ी पंक्ति है, तो किसी सूत्र को अंतिम पंक्ति या कॉलम में कॉपी करना मुश्किल होगा। आप किसी सूत्र को अंतिम पंक्ति या स्तंभ में आसानी से स्वत: भरण करने के लिए VBA कोड का उपयोग कर सकते हैं।

इस ट्यूटोरियल में, आप VBA कोड का उपयोग करके Excel में अंतिम पंक्ति में सूत्र को स्वत: भरण करना सीखेंगे। यह ट्यूटोरियल उपयुक्त उदाहरणों और उचित चित्रों के साथ प्रासंगिक होगा। तो, हमारे साथ बने रहें।

प्रैक्टिस वर्कबुक डाउनलोड करें

आखिरी पंक्ति तक ऑटोफिल फॉर्मूला।xlsm

इसमें ऑटोफिल क्या है एक्सेल?

अब, ऑटोफिल माइक्रोसॉफ्ट एक्सेल की एक अंतर्निहित सुविधा है जो उपयोगकर्ताओं को शेष पंक्तियों या स्तंभों को मूल्यों, प्रारूपों या सूत्रों के साथ स्वचालित रूप से भरने की अनुमति देती है। आप इसे तब पहचान सकते हैं जब आप कर्सर को किसी भी सेल के निचले दाएं कोने में ले जाते हैं। हम इसे एक्सेल का ऑटोफिल हैंडलर कहते हैं।

निम्नलिखित स्क्रीनशॉट पर एक नज़र डालें:

यहां, आप दो नंबर देख सकते हैं। हम एक्सेल में ऑटोफिल का उपयोग करके शेष पंक्तियों को भरेंगे।

पहले, कक्षों की श्रेणी B5:B6 चुनें। उसके बाद, आपको नीचे दाएं कोने में ऑटोफिल हैंडल दिखाई देगा।

अब, इस ऑटोफिल हैंडल को नीचे खींचें।

जैसा कि आप देख सकते हैं, एक्सेल स्वचालित रूप से भर गयाबाकी कोशिकाएँ। यह एक्सेल में ऑटोफिल का मूल उपयोग है।

एक्सेल वीबीए के साथ ऑटोफिल का उपयोग कैसे करें

यदि आपके पास दी गई श्रेणी में बड़ी संख्या में पंक्तियां या कॉलम हैं, तो आपको नीचे खींचना होगा अंतिम पंक्ति या स्तंभ के लिए स्वत: भरण हैंडल। यह बहुत व्यस्त प्रक्रिया है। शुक्र है कि आप एक्सेल में वीबीए कोड का उपयोग करके इसे कम कर सकते हैं। आप VBA कोड का उपयोग मूल्यों, सूत्रों या प्रारूपों के साथ कोशिकाओं को स्वत: भरने के लिए कर सकते हैं। ऑटोफिल डेस्टिनेशन, टाइप करें

यहां,

रेंज(“बी5”): वह सेल जिसमें शेष श्रृंखला को भरने के लिए मुख्य पैटर्न है।

गंतव्य: सेल की श्रेणी जहां आप पैटर्न श्रृंखला से भरना चाहते हैं।

xlAutoFillType के रूप में टाइप करें: श्रृंखला भरण प्रकार। आप चुन सकते हैं कि विभिन्न स्वत: भरण प्रकार हैं। वीबीए

इस खंड में, मैं कुछ प्रकार के ऑटोफिल पर चर्चा करूंगा। हम पहले ही देख चुके हैं कि xlAutoFillType का उपयोग करके हम कोई भी ऑटोफिल प्रकार चुन सकते हैं। यहाँ, मैं आपको उसके कुछ उदाहरण दिखा रहा हूँ।

1। xlFillDefault

हमने पिछले उदाहरण में इस प्रकार का ऑटोफिल पहले ही देखा था।

स्क्रीनशॉट पर एक नज़र डालें:

शेष कक्षों को स्वत: भरण करने के लिए निम्न VBA कोड टाइप करें:

7078

अब, VBA मैक्रो चलाएँ और उसके बाद, आप देखेंगेनिम्नलिखित:

यह VBA मैक्रो का उपयोग करके स्वचालित रूप से शेष कक्षों को भरता है।

2। xlFillCopy

समान मानों को कॉपी करने के लिए आप ऑटोफिल प्रकार में xlFillCopy प्रकार का उपयोग कर सकते हैं।

स्क्रीनशॉट पर एक नज़र डालें:

शेष सेल को ऑटोफिल करने के लिए निम्न VBA कोड टाइप करें:

2664

अब, VBA मैक्रो चलाएँ और उसके बाद, आप निम्नलिखित देखेंगे:

Excel बाकी सेल को वैल्‍यू के समान पैटर्न से भरता है।

3। xlFillMonths

आप xlFillMonths ऑटोफिल प्रकार का उपयोग करके भी महीने भर सकते हैं।

स्क्रीनशॉट पर एक नज़र डालें:

यहां, हमने दो महीने जनवरी और फरवरी में प्रवेश किया है।

बाकी सेल को ऑटोफिल करने के लिए निम्न VBA कोड टाइप करें:

6758

अब, VBA मैक्रो चलाएं और उसके बाद कि, आप निम्नलिखित देखेंगे:

Excel स्वचालित रूप से पैटर्न को समझता है और उन्हें उनके साथ भरता है।

4। xlFillFormats

आप VBA ऑटोफ़िल का उपयोग करके अन्य सेल में भी फ़ॉर्मैट कॉपी कर सकते हैं। उसके लिए, आपको xlFillFormats ऑटोफिल प्रकार का उपयोग करना होगा।

स्क्रीनशॉट पर एक नज़र डालें:

यहाँ, हमारे पास है दो सेल को कुछ रंगों से भर दिया।

अब, बाकी सेल को ऑटोफिल करने के लिए निम्न VBA कोड टाइप करें:

9588

अब, VBA मैक्रो चलाएँ और उसके बाद, आप देखेंगे निम्नलिखित:

जैसा कि आप देख सकते हैं, हमारा वीबीए मैक्रो ऑटोफिल का उपयोग करता हैकॉलम बी की पंक्तियों को प्रभावी ढंग से भरें।

और पढ़ें: एक्सेल में महीनों को ऑटोफिल कैसे करें

ऑटोफिल फॉर्मूला के साथ अंतिम पंक्ति में 5 उदाहरण एक्सेल VBA

1. VBA से फॉर्मूला को ऑटोफिल करने के लिए आखिरी इस्तेमाल की गई पंक्ति

इसी तरह, आप VBA का उपयोग करके फॉर्मूला को ऑटोफिल कर सकते हैं। यदि आपने पिछले अनुभागों को पढ़ लिया है, तो आप इसे आसानी से कर सकते हैं। समस्या तब उत्पन्न होती है जब आपको सूत्र को अंतिम पंक्ति तक स्वतः भरना पड़ता है। आपको पहले उपयोग की गई अंतिम पंक्ति की पहचान करनी होगी। उसके बाद, VBA कोड स्वचालित रूप से उन्हें भर देगा।

निम्नलिखित डेटासेट पर एक नज़र डालें:

यहाँ, हमारे पास कुछ सेल्सपर्सन का बिक्री डेटासेट है . हमारा लक्ष्य जनवरी और फरवरी की बिक्री को कुल कॉलम में जोड़ना है। उसके बाद, हम VBA का उपयोग करके Excel में अंतिम उपयोग की गई पंक्ति के लिए ऑटोफिल विधि का उपयोग करेंगे।

इसे निष्पादित करने के लिए, निम्न कोड टाइप करें:

4696

last_row = Cells(Rows.Count, 2).End(xlUp).Row: यह कॉलम B से उपयोग की गई अंतिम पंक्ति लौटाता है। आप अपने डेटासेट से कोई भी कॉलम चुन सकते हैं।

रेंज ("ई5")। फॉर्मूला = "= एसयूएम (सी5: डी5)": हम सेल सी5 और डी5 की बिक्री जोड़ते हैं।

अब, VBA मैक्रो चलाएँ। उसके बाद, आप निम्न आउटपुट देखेंगे:

Asआप देख सकते हैं, हमारा VBA कोड पहला परिणाम जोड़ता है और सूत्र को Excel में अंतिम पंक्ति में ऑटोफ़िल करता है।

और पढ़ें: डेटा के साथ अंतिम पंक्ति को कैसे भरें Excel

2. VBA AutoFill ActiveCell से Last Row

अब, यदि आप ऑटोफिल विधि में विशेष श्रेणी का उपयोग नहीं करना चाहते हैं, तो आप सक्रिय सेल के मानों का उपयोग कर सकते हैं , सूत्र, या प्रारूप। जब आप किसी सेल पर क्लिक करते हैं और शेष पंक्तियों को सक्रिय सेल के सूत्र से स्वत: भरना चाहते हैं, तो इस विधि का उपयोग करें।

यह पिछले उदाहरण के समान है। हम पिछले डेटासेट का उपयोग कर रहे हैं:

अब, हम जनवरी और फरवरी की बिक्री जोड़ेंगे और एक्सेल VBA का उपयोग करके सूत्र को अंतिम पंक्ति में स्वत: भरेंगे।

अब, निम्न कोड टाइप करें:

1850

last_row = Cells(Rows.Count, 2).End(xlUp).Row: यह अंतिम बार उपयोग किया गया रिटर्न देता है कॉलम B से पंक्ति। आप अपने डेटासेट से कोई भी कॉलम चुन सकते हैं।

ActiveCell.Formula = "=SUM(C5:D5)": हम सेल C5 और D5 आपके चुने हुए सेल में।

ActiveCell.AutoFill Destination:=Range(ActiveCell.Address & “:E” & last_row): रिजल्ट मिलने के बाद हम ऑटोफिल का इस्तेमाल करते हैं। यह सक्रिय सेल से अंतिम उपयोग की गई पंक्ति तक ऑटो-फिलिंग शुरू करता है जो हमें पहले मिली थी।

अब, सेल E5 चुनें।

उसके बाद, अंतिम पंक्ति में फॉर्मूला और ऑटोफिल जोड़ने के लिए VBA मैक्रो चलाएँ।

जैसा कि आप देख सकते हैं, हमसूत्र को अंतिम पंक्ति तक स्वचालित रूप से भरने के लिए VBA मैक्रो का सफलतापूर्वक उपयोग किया गया। एक्सेल (4 तरीके)

3. एक्सेल वीबीए के साथ डायनामिक रेंज का उपयोग करके अंतिम पंक्ति में ऑटोफिल

पहले हमने आपको एक्सेल में अंतिम पंक्ति में स्वत: भरण के लिए कुछ VBA मैक्रोज़ दिखाए थे। अब, उन उदाहरणों में, हम पहले से ही गतिशील श्रेणियों का उपयोग कर चुके हैं।

स्थैतिक श्रेणियों को समझने के लिए, निम्नलिखित कोड पर एक नज़र डालें:

9313

हमने मूल रूप से एक्सेल को में एक सूत्र दर्ज करने के लिए कहा था सेल E5 और इसे सेल E5 से सेल E11 तक ऑटोफिल करें। यहां, हमने सीमा निर्दिष्ट की है। यदि आप और पंक्तियाँ जोड़ते हैं तो क्या होगा? उस स्थिति में, हमारा वीबीए उन अतिरिक्त पंक्तियों को स्वत: भरण नहीं करेगा क्योंकि हमने पहले ही इसे एक विशिष्ट श्रेणी को स्वत: भरण करने के लिए कहा था।

इस समस्या को हल करने के लिए मैं एक समाधान के साथ आया जो एक गतिशील सीमा ले सकता है:

4297

जैसा कि आप देख सकते हैं, हम पहले कोड की इस पंक्ति द्वारा अंतिम पंक्ति को ढूंढते हैं:

6177

उसके बाद, हम डायनामिक रेंज का उपयोग करके अंतिम पंक्ति को ऑटोफिल करते हैं:

1408

नहीं इससे कोई फर्क नहीं पड़ता कि आप अपने डेटासेट में कितनी पंक्तियाँ जोड़ते हैं, यह VBA कोड उनकी पहचान करने में सफल होगा। और यह उन्हें सूत्र से स्वत: भर देगा।

डाइनैमिक रेंज का मूल रूप से मतलब है कि आपको रेंज दर्ज करने की आवश्यकता नहीं हैमैन्युअल रूप से। एक्सेल इसे समय-समय पर अपडेट करेगा।

और पढ़ें: एक्सेल वीबीए: रेंज क्लास की ऑटोफिल विधि विफल

4. ऑटोफिल टू लास्ट एक्सेल में कॉलम VBA

का उपयोग करते हुए यदि आपने पिछले अनुभागों को अंतिम पंक्ति तक ऑटोफिल करने के लिए पढ़ा है, तो आप अंतिम कॉलम को आसानी से ऑटोफिल कर सकते हैं। आपको केवल अंतिम कॉलम संख्या ढूंढनी है और इसे एक्सेल VBA के साथ ऑटोफिल करना है।

निम्न डेटासेट पर एक नज़र डालें:

यहां, हमारे पास एक डेटासेट जो किसी व्यक्ति के 3 महीने के बजट का प्रतिनिधित्व करता है। अब, हम सभी महीनों के खर्चों को जोड़ेंगे और एक्सेल VBA का उपयोग करके सूत्र को अंतिम कॉलम में ऑटोफिल करेंगे।

अब, निम्न कोड टाइप करें:

2071

last_column = Cells(6, Columns.Count).End(xlToLeft).Column: यह पंक्ति 6 ​​से उपयोग किया गया अंतिम कॉलम लौटाता है। आप अपने डेटासेट से शुरू करने के लिए कोई भी पंक्ति चुन सकते हैं।

Range(“D9”).AutoFill Destination:=Range(“D9”, Cells(9, last_column)): परिणाम मिलने के बाद, हम ऑटोफिल का उपयोग करते हैं। यहाँ, हमारी मुख्य पंक्ति पंक्ति संख्या 9 है। हमारा सारा डेटा इसी पंक्ति में होगा। यह कॉलम D से अंतिम उपयोग किए गए कॉलम तक ऑटो-फिलिंग शुरू करता है जो हमें last_column द्वारा पहले मिला था।

मैक्रो चलाने के बाद, आप निम्न आउटपुट देखेंगे :

जैसा कि आप देख सकते हैं, हमने सफलतापूर्वक VBA का उपयोग ऑटोफिल करने के लिए कियाएक्सेल में अंतिम कॉलम के लिए सूत्र।

और पढ़ें: एक्सेल में कॉलम को ऑटोफिल कैसे करें

5. ऑटोफिल अनुक्रमिक संख्या अंतिम पंक्ति तक एक्सेल में वीबीए

का उपयोग करके आप वीबीए में ऑटोफिल का उपयोग करके अनुक्रमिक संख्याओं को ऑटोफिल भी कर सकते हैं। यहाँ पर आपको xlFillSeries autofill type में इस्तेमाल करना है। एक्सेल पैटर्न को समझेगा और उन्हें इससे भरेगा।

निम्नलिखित स्क्रीनशॉट पर एक नज़र डालें:

यहाँ, हमारे पास कुछ नाम हैं। और हम उन्हें क्रमबद्ध तरीके से एक आईडी देना चाहते हैं। ऐसा करने के लिए, हम VBA ऑटोफिल का उपयोग करेंगे।

स्टेटिक रेंज के साथ ऑटोफिल अनुक्रमिक संख्या:

8200

कोड रन करने के बाद, आप आउटपुट देखेंगे:<1

यदि आप डायनामिक रेंज का उपयोग करना चाहते हैं, तो निम्न कोड का उपयोग करें:

2718

last_row = Cells(Rows. गणना, 2).End(xlUp).Row: यह कॉलम B से अंतिम उपयोग की गई पंक्ति लौटाता है।

Range(“C5”).AutoFill Destination:=Range(“C5) :C” & last_row), Type:=xlFillSeries: यह Cell C5 की आईडी ले लेगा और कॉलम C में <6 का उपयोग करके अंतिम उपयोग की गई पंक्ति में स्वतः भरण करेगा।>xlFillSeries ,

दोनों ही मामलों में, आपको समान आउटपुट मिलेगा:

जैसा कि आप देख सकते हैं, हमने सफलतापूर्वक VBA कोड का उपयोग किया एक्सेल में ऑटोफिल अनुक्रमिक संख्या।

और पढ़ें: अनुक्रम संख्याओं को भरने के लिए एक्सेल सूत्र छिपी हुई पंक्तियों को छोड़ दें

💬 याद रखने योग्य बातें

✎ आप ऑटोफिल को बंद कर सकते हैंयदि आप इसे नहीं चाहते हैं तो विभिन्न तरीके ।

✎ आप एक साथ कई पंक्तियों और स्तंभों को स्वत: भर नहीं सकते। इसे एक-एक करके करें।

निष्कर्ष

समाप्त करने के लिए, मुझे आशा है कि इस ट्यूटोरियल ने आपको VBA कोड का उपयोग करके सूत्र को अंतिम पंक्ति में स्वत: भरने के लिए उपयोगी ज्ञान प्रदान किया है। हम अनुशंसा करते हैं कि आप इन सभी निर्देशों को सीखें और अपने डेटासेट पर लागू करें। अभ्यास कार्यपुस्तिका डाउनलोड करें और इन्हें स्वयं आजमाएँ। साथ ही, टिप्पणी अनुभाग में प्रतिक्रिया देने के लिए स्वतंत्र महसूस करें। आपकी बहुमूल्य प्रतिक्रिया हमें इस तरह के ट्यूटोरियल बनाने के लिए प्रेरित करती है।

एक्सेल से संबंधित विभिन्न समस्याओं और समाधानों के लिए हमारी वेबसाइट Exceldemy.com को देखना न भूलें।

नए तरीके सीखते रहें और बढ़ते रहें!