वीबीए: डेटा वाले सभी सेल का चयन कैसे करें

आप किसी शीट में डेटा वाले सभी कक्षों का चयन करने के लिए VBA में निम्नलिखित विधियों का उपयोग कर सकते हैं:

विधि 1: डेटा के साथ एक सेल ग्रिड का चयन करें

 SubSelectCellsWithData ()

Range(" A1 ").CurrentRegion.Select

End Sub

यह विशेष मैक्रो वर्तमान में सक्रिय शीट के सेल A1 से शुरू होने वाले डेटा के साथ कोशिकाओं की एक ग्रिड का चयन करेगा।

विधि 2: डेटा के साथ अलग-अलग कक्षों का चयन करें

 SubSelectCellsWithData ()

Worksheets(" Sheet1 ").Activate
ActiveSheet.Cells.SpecialCells(xlCellTypeConstants).Activate

End Sub

यह विशेष मैक्रो शीट1 से डेटा वाले सभी व्यक्तिगत कक्षों का चयन करेगा।

निम्नलिखित उदाहरण दिखाते हैं कि एक्सेल में शीट1 नामक निम्नलिखित शीट के साथ व्यवहार में प्रत्येक विधि का उपयोग कैसे किया जाए:

उदाहरण 1: डेटा के साथ एक सेल ग्रिड का चयन करें

मान लीजिए हम शीट1 में डेटा वाले सेल ग्रिड का चयन करना चाहते हैं।

ऐसा करने के लिए हम निम्नलिखित मैक्रो बना सकते हैं:

 SubSelectCellsWithData ()

Range(" A1 ").CurrentRegion.Select

End Sub

जब हम इस मैक्रो को चलाते हैं, तो हम देख सकते हैं कि शीट1 में डेटा वाले संपूर्ण सेल ग्रिड का चयन किया गया है:

ध्यान दें कि यह विधि रिक्त कक्षों से घिरे कक्षों की श्रेणी का चयन करने के लिए currentRegion गुण का उपयोग करती है।

आप यहां currentRegion प्रॉपर्टी के लिए संपूर्ण दस्तावेज़ पा सकते हैं।

उदाहरण 2: डेटा के साथ अलग-अलग सेल चुनें

मान लीजिए कि हम केवल शीट1 में डेटा वाले सभी व्यक्तिगत कक्षों का चयन करना चाहते हैं।

ऐसा करने के लिए हम निम्नलिखित मैक्रो बना सकते हैं:

 SubSelectCellsWithData ()

Worksheets(" Sheet1 ").Activate
ActiveSheet.Cells.SpecialCells(xlCellTypeConstants).Activate

End Sub

जब हम इस मैक्रो को चलाते हैं, तो हम देख सकते हैं कि शीट1 में डेटा वाले प्रत्येक व्यक्तिगत सेल का चयन किया गया है:

अतिरिक्त संसाधन

निम्नलिखित ट्यूटोरियल बताते हैं कि वीबीए में अन्य सामान्य कार्य कैसे करें:

वीबीए: किसी अन्य शीट में सेल का मान कैसे सेट करें
वीबीए: सक्रिय सेल में रेंज का चयन कैसे करें
वीबीए: सेल वैल्यू के आधार पर पंक्तियों को कैसे हटाएं