Excel मैक्रो में संपूर्ण कॉलम माइनस हेडर पंक्ति चुनें

Question

मैं पंक्ति 2 (जिसमें एक हेडर पंक्ति है) पर शुरू होने वाले पूरे कॉलम से मेल खाती रेंज कैसे एक्सेस करूंगा?

चयन का अंत कॉलम में अंतिम गैर-रिक्त कक्ष होना चाहिए।

Answer 1

Microsoft समर्थन आलेख देखें कि Excel में विज़ुअल बेसिक प्रक्रियाओं का उपयोग करके सेल / श्रेणी का चयन कैसे करें , # 19 ( कॉलम में संपूर्ण सेल का चयन कैसे करें )।

Comments

यह कार्यपुस्तिका में एक लाख पंक्तियों का चयन करता है, जिसका उपयोग करते हुए भी मैं 300 या उससे अधिक सब कुछ रिक्त हूं।

— डेव

कैसे के बारे में: उप LastCellBeforeBlankInCumn () / रेंज ("A1")। अंत (xldown)। चयन / अंतिम उप

Answer 2

इसे इस्तेमाल करे:

Range(Range("A2"),Range("A2").End(xldown)).Select

या यह:

Range(Range(Cells(2, 1), Cells(2, 1)), Range(Cells(65535, 1), Cells(65535, 1)).End(xlUp)).Select

Answer 3

इस एसओ उत्तर का उल्लेख करते हुए , एकमात्र सुरक्षित तरीका .find()विधि है।
यदि आप पहले कुछ कोशिकाओं को हटाते हैं तो अन्य सभी विधियाँ गलत परिणाम दे सकती हैं।

अंतिम कोशिकाओं को प्राप्त करने के लिए उदाहरण

Lastrow =  Cells.Find("*", [A1], , , xlByRows, xlPrevious).Row
Lastcol =  Cells.Find("*", [A1], , , xlByColumns, xlPrevious).Column

और आपके प्रश्न का एक विशिष्ट उत्तर (आपका डेटा कॉलम 2 में है, पंक्ति 2 से शुरू होता है)

Range([B2], [B:B].Find("*", [B1], , , xlByRows, xlPrevious)).select

Answer 4

आप एक्सेल कीबोर्ड शॉर्टकट का उपयोग कर सकते हैं। कोशिश Ctrl+ करें Home।

यह आपको सेल A1 में ले जाएगा (यदि आपने फ्रीज पेन का उपयोग नहीं किया है)। एक सेल नीचे आओ और फिर अंतिम दर्ज पंक्ति तक चयन करने के लिए Ctrl+ Shift+ Down arrowबटन का उपयोग करें।

यदि आपको कॉलम मान चुनना है, तो right arrowबटन के बजाय बटन का उपयोग down arrowकरें।

Answer 5

कोड का यह टुकड़ा सब कुछ औसत करता है लेकिन सेल "B1" में हेडर के साथ हेडर

Dim GG as Long
GG = Application.WorksheetFunction.Average(ActiveSheet.Range("B2", Range("B2").End(xlDown)))