एक्सेल VBA डू लूप
VBA Do लूप , यह एक उप प्रक्रिया के अंदर निर्देशों का एक सेट है जहां कोड विशिष्ट समय तक चलता है जब तक कि वांछित मानदंड नहीं मिलते हैं या किसी भी सीमा को पार कर लिया जाता है या यह कहना सुरक्षित है कि जब तक एक आवश्यक डेटा प्राप्त नहीं होता है।
जबकि लूप तार्किक परिणामों पर काम करता है, यह लूप को आगे और पीछे चलाता रहता है जबकि परीक्षण की स्थिति TRUE है। जिस क्षण परीक्षण की स्थिति FALSE लौटाती है, यह लूप से बाहर निकल जाएगी। लूप्स किसी भी प्रोग्रामिंग भाषा का दिल हैं। हमारे लेखों में, हम छोरों के महत्व और उन्हें कोड करने के तरीकों का प्रदर्शन करते हैं। इस लेख में, हम आपको Do Loop का उपयोग करने का तरीका दिखा रहे हैं।
VBA Do Loop का उपयोग कैसे करें?
उदाहरण # 1 - लूप के अंत में स्थिति
हमने लूप की शुरुआत में स्थिति परीक्षण देखा है। पहले के कोड में, हमने सीरियल नंबर डालने का उदाहरण देखा है, और कोड ऐसा था।
कोड:
उप Do_While_Loop_Example1 () Dim k As Long k = 1 Do k k = 10 कक्ष (k, 1) .Value = kk = k + 1 लूप अंत उप।
अब आप इस कोड को मैन्युअल रूप से या शॉर्टकट कुंजी F5 के माध्यम से परिणाम देखने के लिए चला सकते हैं।
यह कोड 1 से 10 तक सीरियल नंबर डालेगा।
लेकिन हम लूप के अंत में भी स्थिति का परीक्षण कर सकते हैं। हमें "लोप" शब्द का उपयोग करने की आवश्यकता है और लूप शब्द के बाद अंत में स्थिति परीक्षण।
यहाँ केवल परिवर्तन अंत में परीक्षण को लागू करने के लिए है, जैसा कि नीचे दिखाया गया है।
कोड:
Sub Do_While_Loop_Example1 () Dim k As Long k = 1 Do Cells (k, 1) .Value = kk = k + 1 लूप जबकि k <= 10 End उप
इस तरह, हम लूप स्टेटमेंट के अंत में भी स्थिति का परीक्षण कर सकते हैं।
नोट: कोड चलेगा, फिर यह एक बार फिर लूप में जाने के लिए स्थिति का परीक्षण करता है या नहीं। इसका मतलब है कि यह पहले चलेगा और फिर बाद में स्थिति का प्रयास करेगा।उदाहरण # 2 - लूप का उपयोग करते हुए योग
मान लें कि आपके पास एक्सेल शीट में बिक्री और लागत डेटा है। नीचे गणना के लिए मेरे द्वारा बनाए गए डमी डेटा का सेट है।
अब हमें कॉलम सी में लाभ का मूल्य प्राप्त करने की आवश्यकता है। मैंने पहले ही एक कोड बनाया है जो मेरे लिए एक काम करेगा।
कोड:
Sub Do_While_Loop_Example2 () Dim k As Long Dim LR, Long k = 2 LR = Cell (Rows.Count, 1) .End (xlUp) .Row Do k k <= LR product (k, 3) .Value = Cells (k) , 1) + कक्ष (k, 2) k = k + 1 लूप अंत उप
एलआर = कोशिकाएं (पंक्तियाँ। 1, 1)। और (xlUp)
यह कोड पहले कॉलम में अंतिम उपयोग की गई पंक्ति की पहचान करेगा। यह कोड को गतिशील बनाता है क्योंकि यदि डेटा का कोई जोड़ या विलोपन होता है, तो यह लूप को चलाने के लिए मेरे अनुक्रम समय को समायोजित करेगा।
के = २
हम चाहते हैं कि गणना दूसरी सेल से की जाए। तो k का प्रारंभिक मूल्य 2 है।
करो जबकि के <= एलआर
जैसा कि मैंने बताया, LR पहले कॉलम में अंतिम उपयोग की गई पंक्ति को खोजेगा। इसका मतलब यह है कि एलआर के मान के लिए k = <है, जबकि लूप चलेगा। इस मामले में, मेरी 10 पंक्तियाँ हैं, इसलिए LR = 10।
Loop will run until the k value reaches 10. Once the amount has passed 10 loops, it will stop.
Now you can run this code using shortcut key F5 or manually to see the result.
Example #3 - Exit Statement in Do While Loop
We can also exit the loop while the condition is still TRUE only. For example, take the above data here as well.
Assume you don’t want to do the full calculation, but you only need to calculate the first 5 rows of profit, and as soon as it reaches the 6th row, you want to come out of the loop. This can be done by using the IF function in excel. The below code includes the exit statement.
Code:
Sub Do_While_Loop_Example3() Dim k As Long Dim LR As Long k = 2 LR = Cells(Rows.Count, 1).End(xlUp).Row Do While k 6 Then Exit Do Cells(k, 3).Value = Cells(k, 1) + Cells(k, 2) k = k + 1 Loop End Sub
“If k> 6 Then Exit Do”
This line of code will initiate the exit process. Loop will keep running until the value of k reaches 6. The moment it exceeds 6, If condition will execute the code, “Exit Do.”
Now you can run this code using shortcut key F5 or manually to see the result.
Things to Remember
- Do. The loop works on logical results, and it keeps running the loop back and forth while the test condition is TRUE. The moment the test condition returns FALSE, it will exit the loop.
- We can exit the loop at any given time by adjusting one more logical test inside the circle by using the IF function.
- If the condition or test is supplied at the top of the loop, it will first check the test and progress further only if it is TRUE.
- यदि लूप के अंत में स्थिति या परीक्षण की आपूर्ति की जाती है, तो यह पहले लूप स्टेटमेंट के अंदर कोड के ब्लॉक को निष्पादित करेगा, और भविष्य में, यह इस स्थिति का परीक्षण करेगा कि यह तय किया जाए कि लूप को एक बार चलाने के लिए वापस जाना है या नहीं या नहीं।
