Excel VBA (20 उदाहरण) के साथ तालिका संदर्भ का उपयोग कैसे करें

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

ListObject प्रॉपर्टी वाली किसी तालिका का संदर्भ लें

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

उदाहरण के लिए, एक्सेल वर्कशीट में संपूर्ण तालिका का चयन करने के लिए आपको निम्नलिखित VBA कोड लिखना होगा।

ActiveSheet.ListObjects("Table_ref_1").Range.Select

कोड की यह पंक्ति तालिका का चयन करेगी ("Table_ref_1" हमारे डेटासेट में तालिका का नाम है)।

VBA कोड के साथ एक्सेल में टेबल संदर्भ का उपयोग करने के लिए 20 उपयुक्त उदाहरण

निम्नलिखित खंड एक्सेल में एक तालिका को संदर्भित करने के लिए बीस प्रभावी और मुश्किल उदाहरणों का उपयोग करेगा। कार्य करने के लिए, आपको VBA कोड का उपयोग करना होगा। यह माइक्रोसॉफ्ट की इवेंट-संचालित प्रोग्रामिंग भाषा है जिसे विजुअल बेसिक फॉर एप्लिकेशन (वीबीए) कहा जाता है। इस सुविधा का उपयोग करने के लिए सबसे पहले आपके पास डेवलपर . होना चाहिए आपके रिबन पर दिखाई देने वाला टैब। यह देखने के लिए यहां क्लिक करें कि आप अपने रिबन पर डेवलपर टैब कैसे दिखा सकते हैं . यह खंड इन विधियों पर विस्तृत विवरण प्रदान करता है। आपको अपनी सोचने की क्षमता और एक्सेल ज्ञान को बेहतर बनाने के लिए इन्हें सीखना और लागू करना चाहिए। हम Microsoft Office 365 . का उपयोग करते हैं संस्करण यहाँ है, लेकिन आप अपनी पसंद के अनुसार किसी अन्य संस्करण का उपयोग कर सकते हैं।

यहां, हम प्रदर्शित करेंगे कि एक संपूर्ण तालिका का चयन कैसे करें। सबसे पहले, एक्सेल में पहले से बनाई गई तालिका को संदर्भित करने के लिए, आपको पहले तालिका को लिस्टऑब्जेक्ट के रूप में घोषित करना होगा। फिर एक्सेल में उपलब्ध नाम के साथ तालिका देखें। प्रदर्शन उद्देश्यों के लिए, हम निम्नलिखित डेटासेट का उपयोग करेंगे।

ऐसा करने के लिए, आपको निम्नलिखित प्रक्रिया का पालन करना होगा।

📌 चरण:

• VBA के पास काम करने के लिए अपनी अलग विंडो है। आपको इस विंडो में भी कोड डालना है। VBA विंडो खोलने के लिए, डेवलपर . पर जाएं अपने रिबन पर टैब। फिर विजुअल बेसिक . चुनें कोड . से समूह।

• VBA मॉड्यूल विजुअल बेसिक एडिटर में कोड रखते हैं। इसमें a.bcf फ़ाइल एक्सटेंशन है। हम वीबीए संपादक विंडो के माध्यम से आसानी से एक बना या संपादित कर सकते हैं। कोड के लिए एक मॉड्यूल सम्मिलित करने के लिए, सम्मिलित करें . पर जाएं VBA संपादक पर टैब। फिर मॉड्यूल . पर क्लिक करें ड्रॉप-डाउन से।

• परिणामस्वरूप, एक नया मॉड्यूल बनाया जाएगा। अब मॉड्यूल का चयन करें यदि यह पहले से चयनित नहीं है। फिर उसमें निम्नलिखित कोड लिख लें।

Sub Select_whole_Table()
ActiveSheet.ListObjects("Table_ref_1").Range.Select
End Sub

• अगला, कोड सहेजें।
• अब, F5 दबाएं अपने कीबोर्ड पर या मेनू बार से रन -> सब/यूजरफॉर्म चलाएं . चुनें . आप बस छोटे चलाएं . पर भी क्लिक कर सकते हैं मैक्रो चलाने के लिए उप-मेनू बार में आइकन।

• इसलिए, यह नीचे दिखाए गए अनुसार संपूर्ण तालिका का चयन करेगा।

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

आइए एक्सेल में संपूर्ण तालिका की प्रतिलिपि बनाने के लिए निम्न चरणों का पालन करें।

📌 चरण:

• VBA के पास काम करने के लिए अपनी अलग विंडो है। आपको इस विंडो में भी कोड डालना है। VBA विंडो खोलने के लिए, डेवलपर . पर जाएं अपने रिबन पर टैब। फिर विजुअल बेसिक . चुनें कोड . से समूह।

• VBA मॉड्यूल विजुअल बेसिक एडिटर में कोड रखते हैं। इसमें a.bcf फ़ाइल एक्सटेंशन है। हम वीबीए संपादक विंडो के माध्यम से आसानी से एक बना या संपादित कर सकते हैं। कोड के लिए एक मॉड्यूल सम्मिलित करने के लिए, सम्मिलित करें . पर जाएं VBA संपादक पर टैब। फिर मॉड्यूल . पर क्लिक करें ड्रॉप-डाउन से।

• परिणामस्वरूप, एक नया मॉड्यूल बनाया जाएगा। अब मॉड्यूल का चयन करें यदि यह पहले से चयनित नहीं है। फिर उसमें निम्नलिखित कोड लिख लें।

Sub copy_whole_Table()
ActiveSheet.ListObjects("Table_ref_18").Range.Copy
End Sub

• अगला, कोड सहेजें।
• अब, F5 दबाएं अपने कीबोर्ड पर, या मेनू बार से चलाएं -> उप/उपयोगकर्ता प्रपत्र चलाएं . चुनें . मैक्रो चलाने के लिए आप सब-मेनू बार में छोटे प्ले आइकन पर भी क्लिक कर सकते हैं।

• इसलिए, यह नीचे दिखाए गए अनुसार संपूर्ण तालिका की प्रतिलिपि बनाएगा।

यहां, हम प्रदर्शित करेंगे कि किसी कॉलम की तालिका को कैसे संदर्भित किया जाए। निम्नलिखित एक डेटासेट है जिसका उपयोग हम एक्सेल वीबीए के साथ एक तालिका को संदर्भित करने के लिए अपनी बात प्रदर्शित करने के लिए करेंगे।

आइए एक्सेल में किसी तालिका के कॉलम को संदर्भित करने के लिए निम्नलिखित चरणों का पालन करें।

📌 चरण:

• VBA के पास काम करने के लिए अपनी अलग विंडो है। आपको इस विंडो में भी कोड डालना है। VBA विंडो खोलने के लिए, डेवलपर . पर जाएं अपने रिबन पर टैब। फिर विजुअल बेसिक . चुनें कोड . से समूह।

• VBA मॉड्यूल विजुअल बेसिक एडिटर में कोड रखते हैं। इसमें a.bcf फ़ाइल एक्सटेंशन है। हम वीबीए संपादक विंडो के माध्यम से आसानी से एक बना या संपादित कर सकते हैं। कोड के लिए एक मॉड्यूल सम्मिलित करने के लिए, सम्मिलित करें . पर जाएं VBA संपादक पर टैब। फिर मॉड्यूल . पर क्लिक करें ड्रॉप-डाउन से।

• परिणामस्वरूप, एक नया मॉड्यूल बनाया जाएगा। अब मॉड्यूल का चयन करें यदि यह पहले से चयनित नहीं है। फिर उसमें निम्नलिखित कोड लिख लें।

Sub ReferenceEntireColumn()
ActiveSheet.ListObjects("Table_ref").ListColumns("Seller").Range.Select
End Sub

• अगला, कोड सहेजें।
• अब, F5 दबाएं अपने कीबोर्ड पर या मेनू बार से रन -> सब/यूजरफॉर्म चलाएं . चुनें . आप बस छोटे चलाएं . पर भी क्लिक कर सकते हैं मैक्रो चलाने के लिए उप-मेनू बार में आइकन।

• इसलिए, यह नीचे दिखाए गए अनुसार तालिका के संपूर्ण कॉलम का चयन करेगा।

यहां, हम प्रदर्शित करेंगे कि किसी तालिका से किसी सेल से मान कैसे प्राप्त किया जाए। अपनी बात को प्रदर्शित करने के उद्देश्य से, हमने नीचे एक डेटासेट प्रदान किया है।

आइए Excel में किसी तालिका से किसी सेल से मान प्राप्त करने के लिए निम्न चरणों का पालन करें।

📌 चरण:

• VBA के पास काम करने के लिए अपनी अलग विंडो है। आपको इस विंडो में भी कोड डालना है। VBA विंडो खोलने के लिए, डेवलपर . पर जाएं अपने रिबन पर टैब। फिर विजुअल बेसिक . चुनें कोड . से समूह।

• VBA मॉड्यूल विजुअल बेसिक एडिटर में कोड रखते हैं। इसमें a.bcf फ़ाइल एक्सटेंशन है। हम वीबीए संपादक विंडो के माध्यम से आसानी से एक बना या संपादित कर सकते हैं। कोड के लिए एक मॉड्यूल सम्मिलित करने के लिए, सम्मिलित करें . पर जाएं VBA संपादक पर टैब। फिर मॉड्यूल . पर क्लिक करें ड्रॉप-डाउन से।

• परिणामस्वरूप, एक नया मॉड्यूल बनाया जाएगा। अब मॉड्यूल का चयन करें यदि यह पहले से चयनित नहीं है। फिर उसमें निम्नलिखित कोड लिख लें।

Sub get_Value()
Dim Table1 As ListObject
Set Table1 = ActiveSheet.ListObjects("Table_ref_2")
Set Value = Table1.DataBodyRange.Columns(1).Find("Sam", LookAt:=xlWhole)
MsgBox Value
End Sub

• अगला, कोड सहेजें।
• अब, F5 दबाएं अपने कीबोर्ड पर या मेनू बार से रन -> सब/यूजरफॉर्म चलाएं . चुनें . मैक्रो चलाने के लिए आप सब-मेनू बार में छोटे प्ले आइकन पर भी क्लिक कर सकते हैं।

• इसलिए, यह नीचे दिखाए गए तालिका से एक सेल से एक मान प्राप्त करेगा।

5. एक पंक्ति में प्रवेश करना

अब, हम यह बताएंगे कि किसी मौजूदा तालिका में एक नई पंक्ति कैसे दर्ज करें। प्रदर्शन उद्देश्यों के लिए, हम निम्नलिखित डेटासेट का उपयोग करेंगे।

आइए Excel में मौजूदा तालिका में एक नई पंक्ति दर्ज करने के लिए निम्न चरणों का पालन करें।

📌 चरण:

• VBA के पास काम करने के लिए अपनी अलग विंडो है। आपको इस विंडो में भी कोड डालना है। VBA विंडो खोलने के लिए, डेवलपर . पर जाएं अपने रिबन पर टैब। फिर विजुअल बेसिक . चुनें कोड . से समूह।

• VBA मॉड्यूल विजुअल बेसिक एडिटर में कोड रखते हैं। इसमें a.bcf फ़ाइल एक्सटेंशन है। हम वीबीए संपादक विंडो के माध्यम से आसानी से एक बना या संपादित कर सकते हैं। कोड के लिए एक मॉड्यूल सम्मिलित करने के लिए, सम्मिलित करें . पर जाएं VBA संपादक पर टैब। फिर मॉड्यूल . पर क्लिक करें ड्रॉप-डाउन से।

• परिणामस्वरूप, एक नया मॉड्यूल बनाया जाएगा। अब मॉड्यूल का चयन करें यदि यह पहले से चयनित नहीं है। फिर उसमें निम्नलिखित कोड लिख लें।

Sub Entering_row()
Dim Table1 As ListObject
Set Table1 = ActiveSheet.ListObjects("Table_ref_3")
Table1.ListRows.Add
End Sub

• अगला, कोड सहेजें।
• अब, F5 दबाएं अपने कीबोर्ड पर, या मेनू बार से चलाएं -> उप/उपयोगकर्ता प्रपत्र चलाएं . चुनें . मैक्रो चलाने के लिए आप सब-मेनू बार में छोटे प्ले आइकन पर भी क्लिक कर सकते हैं।

• इसलिए, यह मौजूदा तालिका में एक नई पंक्ति दर्ज करेगा जैसा कि नीचे दिखाया गया है।

निम्नलिखित प्रदर्शन में मौजूदा तालिका में एक नया कॉलम जोड़ा जाएगा। प्रदर्शन उद्देश्यों के लिए, हम निम्नलिखित डेटासेट का उपयोग करेंगे।

आइए मौजूदा तालिका में एक नया कॉलम दर्ज करने के लिए निम्नलिखित चरणों का पालन करें।

📌 चरण:

• VBA के पास काम करने के लिए अपनी अलग विंडो है। आपको इस विंडो में भी कोड डालना है। VBA विंडो खोलने के लिए, डेवलपर . पर जाएं अपने रिबन पर टैब। फिर विजुअल बेसिक . चुनें कोड . से समूह।

• VBA मॉड्यूल विजुअल बेसिक एडिटर में कोड रखते हैं। इसमें a.bcf फ़ाइल एक्सटेंशन है। हम वीबीए संपादक विंडो के माध्यम से आसानी से एक बना या संपादित कर सकते हैं। कोड के लिए एक मॉड्यूल सम्मिलित करने के लिए, सम्मिलित करें . पर जाएं VBA संपादक पर टैब। फिर मॉड्यूल . पर क्लिक करें ड्रॉप-डाउन से।

• परिणामस्वरूप, एक नया मॉड्यूल बनाया जाएगा। अब मॉड्यूल का चयन करें यदि यह पहले से चयनित नहीं है। फिर उसमें निम्नलिखित कोड लिख लें।

Sub Entering_Column()
Dim Table1 As ListObject
Set Table1 = ActiveSheet.ListObjects("Table_ref_4")
Table1.ListColumns.Add
End Sub

• अगला, कोड सहेजें।
• अब, F5 दबाएं अपने कीबोर्ड पर, या मेनू बार से चलाएं -> उप/उपयोगकर्ता प्रपत्र चलाएं . चुनें . मैक्रो चलाने के लिए आप सब-मेनू बार में छोटे प्ले आइकन पर भी क्लिक कर सकते हैं।

• इसलिए, यह मौजूदा तालिका में एक नया कॉलम दर्ज करेगा जैसा कि नीचे दिखाया गया है।

निम्न उदाहरण दर्शाता है कि Excel में किसी तालिका को कैसे फ़िल्टर किया जाए। अपनी बात को प्रदर्शित करने के उद्देश्य से, हमने नीचे एक डेटासेट प्रदान किया है।

आइए Excel में किसी तालिका को फ़िल्टर करने के लिए निम्न चरणों का पालन करें।

📌 चरण:

• VBA के पास काम करने के लिए अपनी अलग विंडो है। आपको इस विंडो में भी कोड डालना है। VBA विंडो खोलने के लिए, डेवलपर . पर जाएं अपने रिबन पर टैब। फिर विजुअल बेसिक . चुनें कोड . से समूह।

• VBA मॉड्यूल विजुअल बेसिक एडिटर में कोड रखते हैं। इसमें a.bcf फ़ाइल एक्सटेंशन है। हम वीबीए संपादक विंडो के माध्यम से आसानी से एक बना या संपादित कर सकते हैं। कोड के लिए एक मॉड्यूल सम्मिलित करने के लिए, सम्मिलित करें . पर जाएं VBA संपादक पर टैब। फिर मॉड्यूल . पर क्लिक करें ड्रॉप-डाउन से।

• परिणामस्वरूप, एक नया मॉड्यूल बनाया जाएगा। अब मॉड्यूल का चयन करें यदि यह पहले से चयनित नहीं है। फिर उसमें निम्नलिखित कोड लिख लें।

Sub Select_AutoFiltered_VisibleRows_NewSheet()
 ActiveSheet.ListObjects("Table_25").Range.AutoFilter _
    Field:=2, Criteria1:="=Texas"
End Sub

• अगला, कोड सहेजें।
• अब, F5 दबाएं अपने कीबोर्ड पर, या मेनू बार से चलाएं -> उप/उपयोगकर्ता प्रपत्र चलाएं . चुनें . मैक्रो चलाने के लिए आप सब-मेनू बार में छोटे प्ले आइकन पर भी क्लिक कर सकते हैं।

• इसलिए, यह नीचे दिखाए गए अनुसार "टेक्सास" टेक्स्ट के आधार पर तालिका को फ़िल्टर करेगा।

8. तालिका से पंक्तियों और स्तंभों को हटाना

हम यहां एक तालिका से पंक्तियों और स्तंभों को हटाने का तरीका प्रदर्शित करेंगे। निम्नलिखित डेटासेट का उपयोग करके, हम अपनी बात प्रदर्शित करेंगे।

आइए Excel में किसी तालिका से पंक्तियों और स्तंभों को हटाने के लिए निम्न चरणों का पालन करें।

📌 चरण:

• VBA के पास काम करने के लिए अपनी अलग विंडो है। आपको इस विंडो में भी कोड डालना है। VBA विंडो खोलने के लिए, डेवलपर . पर जाएं अपने रिबन पर टैब। फिर विजुअल बेसिक . चुनें कोड . से समूह।

• VBA मॉड्यूल विजुअल बेसिक एडिटर में कोड रखते हैं। इसमें a.bcf फ़ाइल एक्सटेंशन है। हम वीबीए संपादक विंडो के माध्यम से आसानी से एक बना या संपादित कर सकते हैं। कोड के लिए एक मॉड्यूल सम्मिलित करने के लिए, सम्मिलित करें . पर जाएं VBA संपादक पर टैब। फिर मॉड्यूल . पर क्लिक करें ड्रॉप-डाउन से।

• परिणामस्वरूप, एक नया मॉड्यूल बनाया जाएगा। अब मॉड्यूल का चयन करें यदि यह पहले से चयनित नहीं है। फिर उसमें निम्नलिखित कोड लिख लें।

Sub delete_row_column()
ActiveSheet.ListObjects("Table_ref_9").ListRows(2).Delete
ActiveSheet.ListObjects("Table_ref_9").ListColumns(2).Delete
End Sub

• अगला, कोड सहेजें।
• अब, F5 दबाएं अपने कीबोर्ड पर, या मेनू बार से चलाएं -> उप/उपयोगकर्ता प्रपत्र चलाएं . चुनें . मैक्रो चलाने के लिए आप सब-मेनू बार में छोटे प्ले आइकन पर भी क्लिक कर सकते हैं।

• इसलिए, यह नीचे दिखाए गए तालिका से पंक्तियों और स्तंभों को हटा देगा।

9. बिना कॉलम हैडर वाली तालिका से डेटा चुनना

यहां, हम प्रदर्शित करेंगे कि कॉलम हेडर के बिना तालिका से डेटा का चयन कैसे करें। डेटासेट इस तरह दिखता है:

आइए एक्सेल में कॉलम हेडर के बिना तालिका से डेटा का चयन करने के लिए निम्नलिखित चरणों का पालन करें।

📌 चरण:

• VBA के पास काम करने के लिए अपनी अलग विंडो है। आपको इस विंडो में भी कोड डालना है। VBA विंडो खोलने के लिए, डेवलपर . पर जाएं अपने रिबन पर टैब। फिर विजुअल बेसिक . चुनें कोड . से समूह।

• VBA मॉड्यूल विजुअल बेसिक एडिटर में कोड रखते हैं। इसमें a.bcf फ़ाइल एक्सटेंशन है। हम वीबीए संपादक विंडो के माध्यम से आसानी से एक बना या संपादित कर सकते हैं। कोड के लिए एक मॉड्यूल सम्मिलित करने के लिए, सम्मिलित करें . पर जाएं VBA संपादक पर टैब। फिर मॉड्यूल . पर क्लिक करें ड्रॉप-डाउन से।

• परिणामस्वरूप, एक नया मॉड्यूल बनाया जाएगा। अब मॉड्यूल का चयन करें यदि यह पहले से चयनित नहीं है। फिर उसमें निम्नलिखित कोड लिख लें।

Sub ReferenceEntireColumnWithoutHeader()
ActiveSheet.ListObjects("Table_ref_6").ListColumns("Seller").DataBodyRange.Select
End Sub

• अगला, कोड सहेजें।
• अब, F5 दबाएं अपने कीबोर्ड पर या मेनू बार से रन -> सब/यूजरफॉर्म चलाएं . चुनें . मैक्रो चलाने के लिए आप सब-मेनू बार में छोटे प्ले आइकन पर भी क्लिक कर सकते हैं।

• इसलिए, यह नीचे दिखाए गए कॉलम हेडर के बिना तालिका से डेटा का चयन करेगा।

इस खंड में, हम आपको दिखाएंगे कि कॉलम हेडर का चयन कैसे करें। अपनी बात को प्रदर्शित करने के लिए, हमने नीचे डेटासेट प्रदान किया है।

आइए एक्सेल में कॉलम हेडर चुनने के लिए निम्नलिखित चरणों पर चलते हैं।

📌 चरण:

• VBA के पास काम करने के लिए अपनी अलग विंडो है। आपको इस विंडो में भी कोड डालना है। VBA विंडो खोलने के लिए, डेवलपर . पर जाएं अपने रिबन पर टैब। फिर विजुअल बेसिक . चुनें कोड . से समूह।

• VBA मॉड्यूल विजुअल बेसिक एडिटर में कोड रखते हैं। इसमें a.bcf फ़ाइल एक्सटेंशन है। हम वीबीए संपादक विंडो के माध्यम से आसानी से एक बना या संपादित कर सकते हैं। कोड के लिए एक मॉड्यूल सम्मिलित करने के लिए, सम्मिलित करें . पर जाएं VBA संपादक पर टैब। फिर मॉड्यूल . पर क्लिक करें ड्रॉप-डाउन से।

• परिणामस्वरूप, एक नया मॉड्यूल बनाया जाएगा। अब मॉड्यूल का चयन करें यदि यह पहले से चयनित नहीं है। फिर उसमें निम्नलिखित कोड लिख लें।

Sub Selecting_Column_Header()
ActiveSheet.ListObjects("Table_ref_7").HeaderRowRange(4).Select
End Sub

• अगला, कोड सहेजें।
• अब, F5 दबाएं अपने कीबोर्ड पर या मेनू बार से रन -> सब/यूजरफॉर्म चलाएं . चुनें . मैक्रो चलाने के लिए आप सब-मेनू बार में छोटे प्ले आइकन पर भी क्लिक कर सकते हैं।

• इसलिए, यह नीचे दिखाए गए अनुसार कॉलम हेडर का चयन करेगा।

11. पूरी पंक्ति चुनें

यहां, हम प्रदर्शित करेंगे कि एक संपूर्ण पंक्ति का चयन कैसे करें। . निम्नलिखित एक डेटासेट है जिसका उपयोग हम अपनी बात को प्रदर्शित करने के लिए करेंगे।

आइए एक्सेल में पूरी पंक्ति का चयन करने के लिए निम्नलिखित चरणों का पालन करें।

📌 चरण:

• VBA के पास काम करने के लिए अपनी अलग विंडो है। आपको इस विंडो में भी कोड डालना है। VBA विंडो खोलने के लिए, डेवलपर . पर जाएं अपने रिबन पर टैब। फिर विजुअल बेसिक . चुनें कोड . से समूह।

• VBA मॉड्यूल विजुअल बेसिक एडिटर में कोड रखते हैं। इसमें a.bcf फ़ाइल एक्सटेंशन है। हम वीबीए संपादक विंडो के माध्यम से आसानी से एक बना या संपादित कर सकते हैं। कोड के लिए एक मॉड्यूल सम्मिलित करने के लिए, सम्मिलित करें . पर जाएं VBA संपादक पर टैब। फिर मॉड्यूल . पर क्लिक करें ड्रॉप-डाउन से।

• परिणामस्वरूप, एक नया मॉड्यूल बनाया जाएगा। अब मॉड्यूल का चयन करें यदि यह पहले से चयनित नहीं है। फिर उसमें निम्नलिखित कोड लिख लें।

Sub Selecting_row_entire()
ActiveSheet.ListObjects("Table_ref_8").ListRows(3).Range.Select
End Sub

• अगला, कोड सहेजें।
• अब, F5 दबाएं अपने कीबोर्ड पर, या मेनू बार से चलाएं -> उप/उपयोगकर्ता प्रपत्र चलाएं . चुनें . आप बस छोटे चलाएं . पर भी क्लिक कर सकते हैं मैक्रो चलाने के लिए उप-मेनू बार में आइकन।

• इसलिए, यह नीचे दिखाए गए अनुसार पूरी पंक्ति का चयन करेगा।

अब, हम वर्णन करेंगे कि किसी तालिका के परिसर का आकार कैसे बदला जाए। अपनी बात को प्रदर्शित करने के उद्देश्य से, हमने नीचे एक डेटासेट प्रदान किया है।

आइए Excel में तालिका की श्रेणी का आकार बदलने के लिए निम्न चरणों का पालन करें।

📌 चरण:

• VBA के पास काम करने के लिए अपनी अलग विंडो है। आपको इस विंडो में भी कोड डालना है। VBA विंडो खोलने के लिए, डेवलपर . पर जाएं अपने रिबन पर टैब। फिर विजुअल बेसिक . चुनें कोड . से समूह।

• VBA मॉड्यूल विजुअल बेसिक एडिटर में कोड रखते हैं। इसमें a.bcf फ़ाइल एक्सटेंशन है। हम वीबीए संपादक विंडो के माध्यम से आसानी से एक बना या संपादित कर सकते हैं। कोड के लिए एक मॉड्यूल सम्मिलित करने के लिए, सम्मिलित करें . पर जाएं VBA संपादक पर टैब। फिर मॉड्यूल . पर क्लिक करें ड्रॉप-डाउन से।

• परिणामस्वरूप, एक नया मॉड्यूल बनाया जाएगा। अब मॉड्यूल का चयन करें यदि यह पहले से चयनित नहीं है। फिर उसमें निम्नलिखित कोड लिख लें।

Sub resize()
Dim Table1 As ListObject
Set Table1 = ActiveSheet.ListObjects("Table_ref_5")
Dim Rng As Range
Set Rng = Range("B4:C8")
Table1.Resize Rng
End Sub

• अगला, कोड सहेजें।
• अब, F5 दबाएं अपने कीबोर्ड पर, या मेनू बार से चलाएं -> उप/उपयोगकर्ता प्रपत्र चलाएं . चुनें . मैक्रो चलाने के लिए आप सब-मेनू बार में छोटे प्ले आइकन पर भी क्लिक कर सकते हैं।

• इसलिए, यह नीचे दिखाए गए अनुसार तालिका की सीमा का आकार बदल देगा।

13. तालिका शैली बदलना

हम यहां प्रदर्शित करेंगे कि तालिका की शैली को कैसे बदला जाए। निम्नलिखित एक डेटासेट है जिसका उपयोग हम एक्सेल वीबीए के साथ एक तालिका को संदर्भित करने के लिए अपनी बात प्रदर्शित करने के लिए करेंगे।

आइए एक्सेल में टेबल स्टाइल बदलने के लिए निम्नलिखित चरणों का पालन करें।

📌 चरण:

• VBA के पास काम करने के लिए अपनी अलग विंडो है। आपको इस विंडो में भी कोड डालना है। VBA विंडो खोलने के लिए, डेवलपर . पर जाएं अपने रिबन पर टैब। फिर विजुअल बेसिक . चुनें कोड . से समूह।

• VBA मॉड्यूल विजुअल बेसिक एडिटर में कोड रखते हैं। इसमें a.bcf फ़ाइल एक्सटेंशन है। हम वीबीए संपादक विंडो के माध्यम से आसानी से एक बना या संपादित कर सकते हैं। कोड के लिए एक मॉड्यूल सम्मिलित करने के लिए, सम्मिलित करें . पर जाएं VBA संपादक पर टैब। फिर मॉड्यूल . पर क्लिक करें ड्रॉप-डाउन से।

• परिणामस्वरूप, एक नया मॉड्यूल बनाया जाएगा। अब मॉड्यूल का चयन करें यदि यह पहले से चयनित नहीं है। फिर उसमें निम्नलिखित कोड लिख लें।

Sub ChangingTable1_Style()
ActiveSheet.ListObjects("Table_ref_12").TableStyle = "TableStyleLight15"
End Sub

• अगला, कोड सहेजें।
• अब, F5 दबाएं अपने कीबोर्ड पर, या मेनू बार से चलाएं -> उप/उपयोगकर्ता प्रपत्र चलाएं . चुनें . मैक्रो चलाने के लिए आप सब-मेनू बार में छोटे प्ले आइकन पर भी क्लिक कर सकते हैं।

• इसलिए, यह नीचे दिखाए गए अनुसार तालिका शैली को बदल देगा।

डिफ़ॉल्ट तालिका शैली यहां प्रदर्शित की जाएगी। निम्नलिखित एक डेटासेट है जिसका उपयोग हम एक्सेल वीबीए के साथ एक तालिका को संदर्भित करने के लिए अपनी बात प्रदर्शित करने के लिए करेंगे।

आइए Excel में डिफ़ॉल्ट तालिका शैली सेट करने के लिए निम्न चरणों का पालन करें।

📌 चरण:

• VBA के पास काम करने के लिए अपनी अलग विंडो है। आपको इस विंडो में भी कोड डालना है। VBA विंडो खोलने के लिए, डेवलपर . पर जाएं अपने रिबन पर टैब। फिर विजुअल बेसिक . चुनें कोड . से समूह।

• VBA मॉड्यूल विजुअल बेसिक एडिटर में कोड रखते हैं। इसमें a.bcf फ़ाइल एक्सटेंशन है। हम वीबीए संपादक विंडो के माध्यम से आसानी से एक बना या संपादित कर सकते हैं। कोड के लिए एक मॉड्यूल सम्मिलित करने के लिए, सम्मिलित करें . पर जाएं VBA संपादक पर टैब। फिर मॉड्यूल . पर क्लिक करें ड्रॉप-डाउन से।

• परिणामस्वरूप, एक नया मॉड्यूल बनाया जाएगा। अब मॉड्यूल का चयन करें यदि यह पहले से चयनित नहीं है। फिर उसमें निम्नलिखित कोड लिख लें।

Sub Setting_Default_Table1_Style()
ActiveWorkbook.DefaultTableStyle = "TableStyleMedium2"
End Sub

• अगला, कोड सहेजें।
• अब, F5 दबाएं अपने कीबोर्ड पर, या मेनू बार से चलाएं -> उप/उपयोगकर्ता प्रपत्र चलाएं . चुनें . आप बस छोटे चलाएं . पर भी क्लिक कर सकते हैं मैक्रो चलाने के लिए उप-मेनू बार में आइकन।

• इसलिए, यह नीचे दिखाए गए अनुसार डिफ़ॉल्ट तालिका शैली सेट करेगा।

इस उदाहरण में, हम दिखाएंगे कि तालिका में सभी कक्षों के माध्यम से लूप कैसे करें। VBA वाली तालिका की प्रत्येक पंक्ति को लूप करने के लिए, ListRows.Count . का उपयोग करें संपत्ति। एक्सेल वीबीए के साथ एक तालिका को संदर्भित करने के लिए हमारे बिंदु को प्रदर्शित करने के उद्देश्य से, हमने नीचे एक डेटासेट प्रदान किया है।

आइए Excel में तालिका में सभी कक्षों के माध्यम से लूप करने के लिए निम्न चरणों के माध्यम से चलते हैं।

📌 चरण:

• VBA के पास काम करने के लिए अपनी अलग विंडो है। आपको इस विंडो में भी कोड डालना है। VBA विंडो खोलने के लिए, डेवलपर . पर जाएं अपने रिबन पर टैब। फिर विजुअल बेसिक . चुनें कोड . से समूह।

• VBA मॉड्यूल विजुअल बेसिक एडिटर में कोड रखते हैं। इसमें a.bcf फ़ाइल एक्सटेंशन है। हम वीबीए संपादक विंडो के माध्यम से आसानी से एक बना या संपादित कर सकते हैं। कोड के लिए एक मॉड्यूल सम्मिलित करने के लिए, सम्मिलित करें . पर जाएं VBA संपादक पर टैब। फिर मॉड्यूल . पर क्लिक करें ड्रॉप-डाउन से।

• परिणामस्वरूप, एक नया मॉड्यूल बनाया जाएगा। अब मॉड्यूल का चयन करें यदि यह पहले से चयनित नहीं है। फिर उसमें निम्नलिखित कोड लिख लें।

Sub Loopingthrough()
Dim Table1 As ListObject
Set Table1 = ActiveSheet.ListObjects("Table_ref_14")
For i = 1 To Table1.ListRows.Count
    Table1.ListRows(i).Range.Select
Next i
End Sub

• अगला, कोड सहेजें।
• अब, F5 दबाएं अपने कीबोर्ड पर, या मेनू बार से चलाएं -> उप/उपयोगकर्ता प्रपत्र चलाएं . चुनें . आप बस छोटे चलाएं . पर भी क्लिक कर सकते हैं मैक्रो चलाने के लिए उप-मेनू बार में आइकन।

• इसलिए, जैसा कि नीचे दिखाया गया है, यह तालिका में सभी कक्षों के माध्यम से लूप करेगा।

16. टेबल हैडर को दृश्यमान बनाएं

अब, हम बताएंगे कि टेबल हेडर को कैसे दृश्यमान बनाया जाए। एक्सेल वीबीए के साथ एक तालिका को संदर्भित करने के लिए हमारे बिंदु को प्रदर्शित करने के उद्देश्य से, हमने नीचे एक डेटासेट प्रदान किया है।

आइए एक्सेल में टेबल हेडर को दृश्यमान बनाने के लिए निम्नलिखित चरणों का पालन करें।

📌 चरण:

• VBA के पास काम करने के लिए अपनी अलग विंडो है। आपको इस विंडो में भी कोड डालना है। VBA विंडो खोलने के लिए, डेवलपर . पर जाएं अपने रिबन पर टैब। फिर विजुअल बेसिक . चुनें कोड . से समूह।

• VBA मॉड्यूल विजुअल बेसिक एडिटर में कोड रखते हैं। इसमें a.bcf फ़ाइल एक्सटेंशन है। हम वीबीए संपादक विंडो के माध्यम से आसानी से एक बना या संपादित कर सकते हैं। कोड के लिए एक मॉड्यूल सम्मिलित करने के लिए, सम्मिलित करें . पर जाएं VBA संपादक पर टैब। फिर मॉड्यूल . पर क्लिक करें ड्रॉप-डाउन से।

• परिणामस्वरूप, एक नया मॉड्यूल बनाया जाएगा। अब मॉड्यूल का चयन करें यदि यह पहले से चयनित नहीं है। फिर उसमें निम्नलिखित कोड लिख लें।

Sub Table_header_visible()
ActiveSheet.ListObjects("Table_ref_15").ShowHeaders = True
End Sub

• अगला, कोड सहेजें।
• अब, F5 दबाएं अपने कीबोर्ड पर, या मेनू बार से चलाएं -> उप/उपयोगकर्ता प्रपत्र चलाएं . चुनें . मैक्रो चलाने के लिए आप सब-मेनू बार में छोटे प्ले आइकन पर भी क्लिक कर सकते हैं।

• इसलिए, यह तालिका शीर्षलेख को नीचे दिखाए अनुसार दृश्यमान बना देगा।

17. पंक्तियों और स्तंभों की गिनती करना

Our next step is to demonstrate how to count the rows and columns from a table. Following is a dataset that we will use to demonstrate our point.

Let’s walk through the following steps to count rows and columns from a table in Excel.

📌 Steps:

• VBA has its own separate window to work with. You have to insert the code in this window too. To open the VBA window, go to the Developer tab on your ribbon. Then select Visual Basic from the Code group.

• VBA modules hold the code in the Visual Basic Editor. It has a.bcf file extension. We can create or edit one easily through the VBA editor window. To insert a module for the code, go to the Insert tab on the VBA editor. Then click on Module from the drop-down.

• As a result, a new module will be created. Now select the module if it isn’t already selected. Then write down the following code in it.

Sub counting_rows_columns()
 rowNumber = ActiveSheet.ListObjects("Table_ref_16").ListRows.Count
columnNumber = ActiveSheet.ListObjects("Table_ref_16").ListColumns.Count
MsgBox "Number of Rows: " & rowNumber & vbCrLf & _
        "Number of Columns: " & columnNumber
End Sub

• Next, save the code.
• Now, press F5 on your keyboard, or from the menu bar select Run -> Run Sub/UserForm . You can also just click on the small Play icon in the sub-menu bar to run the macro.

• Therefore, this will count rows from a table as shown below.
• This will count rows from a table as shown below.

18. Check If There Is Any Table in Worksheet

Here, we will demonstrate how to check if there is any table in the worksheet. For the purpose of demonstrating our point to reference a table with Excel VBA, we have provided a dataset below.

Let’s walk through the following steps to check if there is any table in the worksheet in Excel.

📌 Steps:

• VBA has its own separate window to work with. You have to insert the code in this window too. To open the VBA window, go to the Developer tab on your ribbon. Then select Visual Basic from the Code group.

• VBA modules hold the code in the Visual Basic Editor. It has a.bcf file extension. We can create or edit one easily through the VBA editor window. To insert a module for the code, go to the Insert tab on the VBA editor. Then click on Module from the drop-down.

• As a result, a new module will be created. Now select the module if it isn’t already selected. Then write down the following code in it.

Sub Checking_If1_Table1_Exists()
Dim ws1 As Worksheet
Dim tbl1 As ListObject
Dim tbl1Name As String
Dim tbl1Exists As Boolean
tbl1Name = "Table_ref_17"
For Each ws1 In ActiveWorkbook.Worksheets
    For Each tbl1 In ws1.ListObjects
        If tbl1.Name = tb1lName Then
            tb1lExists = True
        End If
    Next tbl1
Next ws1
If tbl1Exists = True Then
    MsgBox "Table " & tb1lName & " Doesn’t Exists."
Else
    MsgBox "Table " & tbl1Name & " Exists."
End If
End Sub

• Next, save the code.
• Now, press F5 on your keyboard, or from the menu bar select Run -> Run Sub/UserForm . You can also just click on the small Play icon in the sub-menu bar to run the macro.

• Therefore, this will check if there is any table in the worksheet as shown below.

19. Convert a Table to Normal Range

Here is an example of how a table can be converted into a normal range. Following is a dataset that we will use to demonstrate our point to reference a table with Excel VBA.

Let’s walk through the following steps to convert a table to a normal range in Excel.

📌 Steps:

• VBA has its own separate window to work with. You have to insert the code in this window too. To open the VBA window, go to the Developer tab on your ribbon. Then select Visual Basic from the Code group.

• VBA modules hold the code in the Visual Basic Editor. It has a.bcf file extension. We can create or edit one easily through the VBA editor window. To insert a module for the code, go to the Insert tab on the VBA editor. Then click on Module from the drop-down.

• As a result, a new module will be created. Now select the module if it isn’t already selected. Then write down the following code in it.

Sub Converting_Table1_To_NormalRange()
ActiveSheet.ListObjects("Table_ref_11").Unlist
End Sub

• Next, save the code.
• Now, press F5 on your keyboard, or from the menu bar select Run -> Run Sub/UserForm . You can also just click on the small Play icon in the sub-menu bar to run the macro.

• Therefore, this will convert a table to a normal range as shown below.

20. Delete a Table

Here, we will demonstrate how to delete a table. Following is a dataset that we will use to demonstrate our point to reference a table with Excel VBA.

Let’s walk through the following steps to delete a table in Excel with VBA code.

📌 Steps:

• VBA has its own separate window to work with. You have to insert the code in this window too. To open the VBA window, go to the Developer tab on your ribbon. Then select Visual Basic from the Code group.

• VBA modules hold the code in the Visual Basic Editor. It has a.bcf file extension. We can create or edit one easily through the VBA editor window. To insert a module for the code, go to the Insert tab on the VBA editor. Then click on Module from the drop-down.

• As a result, a new module will be created. Now select the module if it isn’t already selected. Then write down the following code in it.

Sub delete_table_entire()
Dim Table1 As ListObject
Set Table1 = ActiveSheet.ListObjects("Table_ref_10")
Table1.Delete
End Sub

• Next, save the code.
• Now, press F5 on your keyboard, or from the menu bar select Run -> Run Sub/UserForm . You can also just click on the small Play icon in the sub-menu bar to run the macro.

• Therefore, this will delete a table as shown below.

निष्कर्ष

That’s the end of today’s session. I strongly believe that from now, you may be able to reference a table with Excel VBA. If you have any queries or recommendations, please share them in the comments section below.

Don’t forget to check our website Exceldemy.com for various Excel-related problems and solutions. Keep learning new methods and keep growing!

Read More…

Changing Case using Worksheet Functions and Excel VBA

[8 Tips] How to Make Excel Tables Look Good!