सेल के माध्यम से लूप - एक्सेल टिप्स

रिचर्ड लिखते हैं:

अगर मैं पूछने के लिए इतना बोल्ड हो सकता हूं, तो मुझे आभारी होना चाहिए अगर आप मुझे इस बात का जवाब दे सकें कि इस अखंडता के प्रति निष्ठा का जवाब हम निष्ठा से देते हैं:

उदाहरण के लिए "रेंज (" F3 ") के माध्यम से VisualBasic में बाहरी उपयोग के लिए एक सेल का संदर्भ देते समय" चुनें "मान लें कि मैं स्तंभ 1 के बजाय एक चर को एक लूप से निम्न अंत तक प्रतिस्थापित करना चाहता हूं:

For Scarab=3 To 15 Range("FScarab").Select ActiveCell.Value = Scarab * Scarab - 3 Next Scarab

मिसाल के तौर पर।

स्पष्ट रूप से, कोई केवल एफएसकेआरबी का उपयोग नहीं कर सकता है, जहां पहले एक एफ 3 होता था लेकिन शायद एक ऐसी विधि है जिसके माध्यम से वांछित परिणाम प्राप्त किया जा सकता है। यही है, क्या चर स्कारब के लिए कॉलम एफ और पंक्ति स्कारब में सेल को संदर्भित करने का एक तरीका है और यदि आप इस जानकारी को विभाजित कर सकते हैं।

इसे करने बहुत सारे तरीके हैं। संभवतः सबसे सहज यह विधि है जिसमें श्रेणी () संदर्भ के अंदर संख्यात्मक पंक्ति संख्या के साथ कॉलम अक्षर "एफ" को समाहित करना शामिल है।

For Scarab=3 To 15 Range("F" & Scarab).Select ActiveCell.Value = Scarab * Scarab - 3 Next Scarab

अगली विधि रेंज संदर्भ के बजाय CELLS (पंक्ति, स्तंभ) फ़ंक्शन का उपयोग करती है। इस स्थिति में, पंक्ति और स्तंभ को संख्यात्मक होना चाहिए। आपकी पंक्ति संख्या चर पहले से ही संख्यात्मक है, इसलिए आपको बस "F" को अपने सिर में 6 में बदलना होगा। आप यह भी ध्यान देंगे कि सेल का चयन करना आवश्यक नहीं है, आप बस इसके लिए एक मूल्य प्रदान कर सकते हैं।

For Scarab=3 To 15 Cells(Scarab, 6).Value = Scarab * Scarab - 3 Next Scarab

अंत में, सीमा में प्रत्येक सेल के माध्यम से बस लूप करना संभव है:

For Each cell in Range("F3:F15") Cell.Value = Cell.Row * Cell.Row - 3 Next Cell