VBA ਵਿੱਚ ਲੂਪਸ

ਅਜਿਹੀਆਂ ਸਥਿਤੀਆਂ ਹੁੰਦੀਆਂ ਹਨ ਜਦੋਂ ਇੱਕ VBA ਪ੍ਰੋਗਰਾਮ ਨੂੰ ਇੱਕ ਕਤਾਰ ਵਿੱਚ ਕਈ ਵਾਰ ਇੱਕੋ ਜਿਹੀਆਂ ਕਾਰਵਾਈਆਂ ਕਰਨ ਦੀ ਲੋੜ ਹੁੰਦੀ ਹੈ (ਭਾਵ, ਕੋਡ ਦੇ ਇੱਕੋ ਬਲਾਕ ਨੂੰ ਕਈ ਵਾਰ ਦੁਹਰਾਓ)। ਇਹ VBA ਲੂਪਸ ਦੀ ਵਰਤੋਂ ਕਰਕੇ ਕੀਤਾ ਜਾ ਸਕਦਾ ਹੈ।

VBA ਲੂਪਸ ਵਿੱਚ ਸ਼ਾਮਲ ਹਨ:

• ਲਈ ਸਾਈਕਲ
• ਜਦਕਿ ਲੂਪ ਕਰੋ
• ਸਾਈਕਲ ਕਰੋ ਜਦ ਤੱਕ

ਅੱਗੇ, ਅਸੀਂ ਇਹਨਾਂ ਵਿੱਚੋਂ ਹਰੇਕ ਚੱਕਰ 'ਤੇ ਡੂੰਘਾਈ ਨਾਲ ਵਿਚਾਰ ਕਰਾਂਗੇ।

ਵਿਜ਼ੂਅਲ ਬੇਸਿਕ ਵਿੱਚ ਲੂਪ ਆਪਰੇਟਰ ਲਈ

ਲੂਪ ਆਪਰੇਟਰ ਦੀ ਬਣਤਰ The ਵਿਜ਼ੂਅਲ ਬੇਸਿਕ ਵਿੱਚ ਦੋ ਰੂਪਾਂ ਵਿੱਚੋਂ ਇੱਕ ਵਿੱਚ ਸੰਗਠਿਤ ਕੀਤਾ ਜਾ ਸਕਦਾ ਹੈ: ਇੱਕ ਲੂਪ ਦੇ ਰੂਪ ਵਿੱਚ ਲਈ... ਅੱਗੇ ਜਾਂ ਇੱਕ ਲੂਪ ਦੇ ਰੂਪ ਵਿੱਚ ਹਰ ਇੱਕ ਲਈ.

ਸਾਈਕਲ “ਲਈ … ਅੱਗੇ”

ਚੱਕਰ ਲਈ... ਅੱਗੇ ਇੱਕ ਵੇਰੀਏਬਲ ਦੀ ਵਰਤੋਂ ਕਰਦਾ ਹੈ ਜੋ ਕ੍ਰਮਵਾਰ ਇੱਕ ਦਿੱਤੀ ਰੇਂਜ ਤੋਂ ਮੁੱਲ ਲੈਂਦਾ ਹੈ। ਵੇਰੀਏਬਲ ਦੇ ਮੁੱਲ ਦੇ ਹਰੇਕ ਬਦਲਾਅ ਦੇ ਨਾਲ, ਚੱਕਰ ਦੇ ਸਰੀਰ ਵਿੱਚ ਬੰਦ ਕਿਰਿਆਵਾਂ ਕੀਤੀਆਂ ਜਾਂਦੀਆਂ ਹਨ। ਇਹ ਇੱਕ ਸਧਾਰਨ ਉਦਾਹਰਣ ਤੋਂ ਸਮਝਣਾ ਆਸਾਨ ਹੈ:

i = 1 ਤੋਂ 10 ਕੁੱਲ = ਕੁੱਲ + iArray(i) ਲਈ ਅੱਗੇ i

ਇਸ ਸਧਾਰਨ ਲੂਪ ਵਿੱਚ ਲਈ... ਅੱਗੇ ਵੇਰੀਏਬਲ ਦੀ ਵਰਤੋਂ ਕੀਤੀ ਜਾਂਦੀ ਹੈ i, ਜੋ ਕ੍ਰਮਵਾਰ ਮੁੱਲ 1, 2, 3, … 10 ਲੈਂਦਾ ਹੈ, ਅਤੇ ਇਹਨਾਂ ਵਿੱਚੋਂ ਹਰੇਕ ਮੁੱਲ ਲਈ, ਲੂਪ ਦੇ ਅੰਦਰ VBA ਕੋਡ ਨੂੰ ਚਲਾਇਆ ਜਾਂਦਾ ਹੈ। ਇਸ ਤਰ੍ਹਾਂ, ਇਹ ਲੂਪ ਐਰੇ ਦੇ ਤੱਤਾਂ ਨੂੰ ਜੋੜਦਾ ਹੈ। iArray ਵੇਰੀਏਬਲ ਵਿੱਚ ਕੁੱਲ.

ਉਪਰੋਕਤ ਉਦਾਹਰਨ ਵਿੱਚ, ਲੂਪ ਇੰਕਰੀਮੈਂਟ ਨਿਰਧਾਰਤ ਨਹੀਂ ਕੀਤਾ ਗਿਆ ਹੈ, ਇਸਲਈ ਵੇਰੀਏਬਲ ਨੂੰ ਵਧਾਉਣ ਲਈ i 1 ਤੋਂ 10 ਤੱਕ, ਡਿਫਾਲਟ ਇੱਕ ਵਾਧਾ ਹੈ 1… ਹਾਲਾਂਕਿ, ਕੁਝ ਮਾਮਲਿਆਂ ਵਿੱਚ ਲੂਪ ਲਈ ਵੱਖ-ਵੱਖ ਵਾਧੇ ਮੁੱਲਾਂ ਦੀ ਵਰਤੋਂ ਕਰਨਾ ਜ਼ਰੂਰੀ ਹੈ। ਇਹ ਕੀਵਰਡ ਦੀ ਵਰਤੋਂ ਕਰਕੇ ਕੀਤਾ ਜਾ ਸਕਦਾ ਹੈ ਕਦਮਜਿਵੇਂ ਕਿ ਹੇਠਾਂ ਦਿੱਤੀ ਸਧਾਰਨ ਉਦਾਹਰਣ ਵਿੱਚ ਦਿਖਾਇਆ ਗਿਆ ਹੈ।

d = 0 ਤੋਂ 10 ਪੜਾਅ ਲਈ 0.1 dTotal = dTotal + d ਅਗਲਾ d

ਕਿਉਂਕਿ ਉਪਰੋਕਤ ਉਦਾਹਰਨ ਵਿੱਚ, ਵਾਧਾ ਕਦਮ ਬਰਾਬਰ ਸੈੱਟ ਕੀਤਾ ਗਿਆ ਹੈ 0.1, ਫਿਰ ਵੇਰੀਏਬਲ d ਕੁੱਲ ਚੱਕਰ ਦੇ ਹਰੇਕ ਦੁਹਰਾਓ ਲਈ ਮੁੱਲ 0.0, 0.1, 0.2, 0.3,… 9.9, 10.0 ਲੈਂਦੇ ਹਨ।

VBA ਵਿੱਚ ਲੂਪ ਸਟੈਪ ਨੂੰ ਨਿਰਧਾਰਤ ਕਰਨ ਲਈ, ਤੁਸੀਂ ਇੱਕ ਨਕਾਰਾਤਮਕ ਮੁੱਲ ਦੀ ਵਰਤੋਂ ਕਰ ਸਕਦੇ ਹੋ, ਉਦਾਹਰਨ ਲਈ, ਇਸ ਤਰ੍ਹਾਂ:

i = 10 ਤੋਂ 1 ਸਟੈਪ -1 iArray(i) = i ਅੱਗੇ i ਲਈ

ਇੱਥੇ ਵਾਧਾ ਹੈ -1, ਇਸ ਲਈ ਵੇਰੀਏਬਲ i ਚੱਕਰ ਦੇ ਹਰੇਕ ਦੁਹਰਾਓ ਦੇ ਨਾਲ ਮੁੱਲ 10, 9, 8, … 1 ਲੈਂਦਾ ਹੈ।

ਲੂਪ "ਹਰੇਕ ਲਈ"

ਚੱਕਰ ਹਰ ਇੱਕ ਲਈ ਇੱਕ ਚੱਕਰ ਦੇ ਸਮਾਨ ਲਈ... ਅੱਗੇ, ਪਰ ਕਾਊਂਟਰ ਵੇਰੀਏਬਲ ਲਈ ਮੁੱਲਾਂ ਦੇ ਕ੍ਰਮ ਨੂੰ ਦੁਹਰਾਉਣ ਦੀ ਬਜਾਏ, ਲੂਪ ਹਰ ਇੱਕ ਲਈ ਵਸਤੂਆਂ ਦੇ ਨਿਰਧਾਰਤ ਸਮੂਹ ਵਿੱਚ ਹਰੇਕ ਵਸਤੂ ਲਈ ਕਾਰਵਾਈਆਂ ਦਾ ਇੱਕ ਸੈੱਟ ਕਰਦਾ ਹੈ। ਹੇਠ ਦਿੱਤੀ ਉਦਾਹਰਨ ਵਿੱਚ, ਇੱਕ ਲੂਪ ਦੀ ਵਰਤੋਂ ਕਰਦੇ ਹੋਏ ਹਰ ਇੱਕ ਲਈ ਮੌਜੂਦਾ ਐਕਸਲ ਵਰਕਬੁੱਕ ਵਿੱਚ ਸਾਰੀਆਂ ਸ਼ੀਟਾਂ ਦੀ ਗਿਣਤੀ ਕਰਦਾ ਹੈ:

ਵਰਕਸ਼ੀਟਾਂ ਵਿੱਚ ਹਰੇਕ wਸ਼ੀਟ ਲਈ ਵਰਕਸ਼ੀਟ ਦੇ ਤੌਰ 'ਤੇ wSheet ਨੂੰ ਮੱਧਮ ਕਰੋ MsgBox "Найден лист: " & wSheet. Name ਅਗਲੀ wSheet

ਲੂਪ ਇੰਟਰੱਪਟ ਸਟੇਟਮੈਂਟ "ਇਸ ਲਈ ਬਾਹਰ ਨਿਕਲੋ"

ਓਪਰੇਟਰ ਲਈ ਬਾਹਰ ਨਿਕਲੋ ਚੱਕਰ ਵਿੱਚ ਵਿਘਨ ਪਾਉਣ ਲਈ ਵਰਤਿਆ ਜਾਂਦਾ ਹੈ। ਜਿਵੇਂ ਹੀ ਇਹ ਕਥਨ ਕੋਡ ਵਿੱਚ ਆਉਂਦਾ ਹੈ, ਪ੍ਰੋਗਰਾਮ ਲੂਪ ਦੇ ਐਗਜ਼ੀਕਿਊਸ਼ਨ ਨੂੰ ਖਤਮ ਕਰਦਾ ਹੈ ਅਤੇ ਇਸ ਲੂਪ ਤੋਂ ਤੁਰੰਤ ਬਾਅਦ ਕੋਡ ਵਿੱਚ ਮੌਜੂਦ ਸਟੇਟਮੈਂਟਾਂ ਨੂੰ ਲਾਗੂ ਕਰਨ ਲਈ ਅੱਗੇ ਵਧਦਾ ਹੈ। ਇਹ ਵਰਤਿਆ ਜਾ ਸਕਦਾ ਹੈ, ਉਦਾਹਰਨ ਲਈ, ਇੱਕ ਐਰੇ ਵਿੱਚ ਇੱਕ ਖਾਸ ਮੁੱਲ ਦੀ ਖੋਜ ਕਰਨ ਲਈ. ਅਜਿਹਾ ਕਰਨ ਲਈ, ਲੂਪ ਦੀ ਵਰਤੋਂ ਕਰਕੇ, ਐਰੇ ਦੇ ਹਰੇਕ ਤੱਤ ਨੂੰ ਸਕੈਨ ਕੀਤਾ ਜਾਂਦਾ ਹੈ। ਜਿਵੇਂ ਹੀ ਲੋੜੀਂਦਾ ਤੱਤ ਮਿਲ ਜਾਂਦਾ ਹੈ, ਬਾਕੀ ਨੂੰ ਦੇਖਣ ਦੀ ਕੋਈ ਲੋੜ ਨਹੀਂ ਹੁੰਦੀ - ਚੱਕਰ ਵਿੱਚ ਵਿਘਨ ਪੈਂਦਾ ਹੈ।

ਆਪਰੇਟਰ ਐਪਲੀਕੇਸ਼ਨ ਲਈ ਬਾਹਰ ਨਿਕਲੋ ਹੇਠ ਦਿੱਤੀ ਉਦਾਹਰਨ ਵਿੱਚ ਦਿਖਾਇਆ ਗਿਆ ਹੈ. ਇੱਥੇ ਲੂਪ 100 ਤੋਂ ਵੱਧ ਐਰੇ ਐਂਟਰੀਆਂ ਨੂੰ ਦੁਹਰਾਉਂਦਾ ਹੈ ਅਤੇ ਵੇਰੀਏਬਲ ਦੇ ਮੁੱਲ ਨਾਲ ਹਰੇਕ ਦੀ ਤੁਲਨਾ ਕਰਦਾ ਹੈ dVal… ਜੇਕਰ ਕੋਈ ਮੇਲ ਮਿਲਦਾ ਹੈ, ਤਾਂ ਲੂਪ ਨੂੰ ਬੰਦ ਕਰ ਦਿੱਤਾ ਜਾਂਦਾ ਹੈ:

i = 1 ਤੋਂ 100 ਲਈ ਜੇਕਰ dValues(i) = dVal ਫਿਰ IndexVal = i ਅੰਤ ਲਈ ਬਾਹਰ ਜਾਓ ਜੇਕਰ ਅੱਗੇ i

ਵਿਜ਼ੂਅਲ ਬੇਸਿਕ ਵਿੱਚ ਡੂ ਵਾਇਲ ਲੂਪ

ਚੱਕਰ ਜਦਕਿ ਕਰੋ ਕੋਡ ਦੇ ਇੱਕ ਬਲਾਕ ਨੂੰ ਉਦੋਂ ਤੱਕ ਚਲਾਉਂਦਾ ਹੈ ਜਦੋਂ ਤੱਕ ਨਿਰਧਾਰਤ ਸ਼ਰਤ ਪੂਰੀ ਹੁੰਦੀ ਹੈ। ਹੇਠ ਦਿੱਤੀ ਇੱਕ ਵਿਧੀ ਦੀ ਇੱਕ ਉਦਾਹਰਨ ਹੈ ਸਬ, ਜਿਸ ਵਿੱਚ ਲੂਪ ਦੀ ਵਰਤੋਂ ਕਰਦੇ ਹੋਏ ਜਦਕਿ ਕਰੋ 1000 ਤੋਂ ਵੱਧ ਨਾ ਹੋਣ ਵਾਲੇ ਫਿਬੋਨਾਚੀ ਨੰਬਰ ਕ੍ਰਮਵਾਰ ਪ੍ਰਦਰਸ਼ਿਤ ਕੀਤੇ ਜਾਂਦੇ ਹਨ:

'ਉਪ ਵਿਧੀ 1000 ਤੋਂ ਵੱਧ ਨਾ ਹੋਣ ਵਾਲੇ ਫਿਬੋਨਾਚੀ ਸੰਖਿਆਵਾਂ ਨੂੰ ਆਉਟਪੁੱਟ ਕਰਦੀ ਹੈ ਸਬ ਫਿਬੋਨਾਚੀ() ਡਿਮ i ਐਜ਼ ਪੂਰਨ ਅੰਕ' ਕ੍ਰਮ ਵਿੱਚ ਤੱਤ ਦੀ ਸਥਿਤੀ ਨੂੰ ਦਰਸਾਉਣ ਲਈ ਡਿਮ iFib As Integer' ਕ੍ਰਮ ਦੇ ਮੌਜੂਦਾ ਮੁੱਲ ਨੂੰ ਸਟੋਰ ਕਰਦਾ ਹੈ Dim iFib_Next As Integer' ਅਗਲੇ ਮੁੱਲ ਨੂੰ ਸਟੋਰ ਕਰਦਾ ਹੈ ਕ੍ਰਮ ਦੇ ਡਿਮ iStep As Integer 'ਅਗਲੇ ਵਾਧੇ ਦੇ ਆਕਾਰ ਨੂੰ ਸਟੋਰ ਕਰਦਾ ਹੈ' ਸ਼ੁਰੂਆਤੀ ਵੇਰੀਏਬਲ i ਅਤੇ iFib_Next i = 1 iFib_Next = 0 'Do while ਲੂਪ ਉਦੋਂ ਤੱਕ ਚਲਾਇਆ ਜਾਵੇਗਾ ਜਦੋਂ ਤੱਕ 'ਮੌਜੂਦਾ ਫਿਬੋਨਾਚੀ ਨੰਬਰ ਦਾ ਮੁੱਲ 1000 ਤੋਂ ਵੱਧ ਨਹੀਂ ਹੁੰਦਾ ਜਦੋਂ ਤੱਕ iFib_Next = 1000 = 1 ਜੇ 1 ਫਿਰ 'ਪਹਿਲੇ ਤੱਤ iStep = 0 iFib = 1 ਹੋਰ ਲਈ ਵਿਸ਼ੇਸ਼ ਕੇਸ' ਓਵਰਰਾਈਟ ਕਰਨ ਤੋਂ ਪਹਿਲਾਂ ਅਗਲੇ ਵਾਧੇ ਦੇ ਆਕਾਰ ਨੂੰ ਸੁਰੱਖਿਅਤ ਕਰੋ 'ਕ੍ਰਮ ਦੇ ਮੌਜੂਦਾ ਮੁੱਲ iStep = iFib iFib = iFib_Next End If' ਕਾਲਮ A ਵਿੱਚ ਮੌਜੂਦਾ ਫਿਬੋਨਾਚੀ ਨੰਬਰ ਪ੍ਰਿੰਟ ਕਰੋ। ਸੂਚਕਾਂਕ i ਸੈੱਲ (i , 1) ਵਾਲੀ ਕਤਾਰ ਵਿੱਚ ਕਿਰਿਆਸ਼ੀਲ ਵਰਕਸ਼ੀਟ '। ਮੁੱਲ = iFib' ਅਗਲੇ ਫਿਬੋਨਾਚੀ ਨੰਬਰ ਦੀ ਗਣਨਾ ਕਰੋ ਅਤੇ ਐਲੀਮੈਂਟ ਸਥਿਤੀ ਸੂਚਕਾਂਕ ਨੂੰ 1 iFib_Next = iFib + iStep i = i + XNUMX ਲੂਪ ਐਂਡ ਸਬ ਨਾਲ ਵਧਾਓ।

ਦਿੱਤੀ ਉਦਾਹਰਨ ਵਿੱਚ, ਹਾਲਤ iFib_Next < 1000 ਲੂਪ ਦੇ ਸ਼ੁਰੂ ਵਿੱਚ ਜਾਂਚ ਕੀਤੀ ਗਈ। ਇਸ ਲਈ, ਜੇਕਰ ਪਹਿਲਾ ਮੁੱਲ iFib_ਅਗਲਾ ਜੇ 1000 ਤੋਂ ਵੱਧ ਹੁੰਦੇ, ਤਾਂ ਲੂਪ ਕਦੇ ਵੀ ਲਾਗੂ ਨਹੀਂ ਹੁੰਦਾ।

ਇੱਕ ਲੂਪ ਨੂੰ ਲਾਗੂ ਕਰਨ ਦਾ ਇੱਕ ਹੋਰ ਤਰੀਕਾ ਜਦਕਿ ਕਰੋ - ਸਥਿਤੀ ਨੂੰ ਸ਼ੁਰੂ ਵਿੱਚ ਨਹੀਂ, ਪਰ ਲੂਪ ਦੇ ਅੰਤ ਵਿੱਚ ਰੱਖੋ। ਇਸ ਸਥਿਤੀ ਵਿੱਚ, ਲੂਪ ਨੂੰ ਘੱਟੋ-ਘੱਟ ਇੱਕ ਵਾਰ ਚਲਾਇਆ ਜਾਵੇਗਾ, ਚਾਹੇ ਸ਼ਰਤ ਪੂਰੀ ਹੋਈ ਹੋਵੇ।

ਯੋਜਨਾਬੱਧ ਤੌਰ 'ਤੇ, ਅਜਿਹਾ ਚੱਕਰ ਜਦਕਿ ਕਰੋ ਅੰਤ ਵਿੱਚ ਜਾਂਚ ਕੀਤੀ ਜਾਣ ਵਾਲੀ ਸਥਿਤੀ ਦੇ ਨਾਲ ਇਸ ਤਰ੍ਹਾਂ ਦਿਖਾਈ ਦੇਵੇਗਾ:

ਕਰੋ... iFib_Next <1000 ਦੌਰਾਨ ਲੂਪ ਕਰੋ

ਵਿਜ਼ੂਅਲ ਬੇਸਿਕ ਵਿੱਚ «ਜਦ ਤੱਕ ਕਰੋ»

ਚੱਕਰ ਤੱਕ ਕਰੋ ਬਹੁਤ ਹੀ ਚੱਕਰ ਦੇ ਸਮਾਨ ਜਦਕਿ ਕਰੋ: ਲੂਪ ਦੇ ਮੁੱਖ ਭਾਗ ਵਿੱਚ ਕੋਡ ਦੇ ਬਲਾਕ ਨੂੰ ਵਾਰ-ਵਾਰ ਚਲਾਇਆ ਜਾਂਦਾ ਹੈ ਜਦੋਂ ਤੱਕ ਨਿਰਧਾਰਤ ਸ਼ਰਤ ਪੂਰੀ ਨਹੀਂ ਹੋ ਜਾਂਦੀ (ਸ਼ਰਤ ਸਮੀਕਰਨ ਦਾ ਨਤੀਜਾ ਹੈ ਇਹ ਸੱਚ ਹੈ). ਅਗਲੀ ਕਾਰਵਾਈ ਵਿੱਚ ਸਬ ਇੱਕ ਚੱਕਰ ਦੀ ਵਰਤੋਂ ਕਰਦੇ ਹੋਏ ਤੱਕ ਕਰੋ ਇੱਕ ਕਾਲਮ ਵਿੱਚ ਸਾਰੇ ਸੈੱਲਾਂ ਤੋਂ ਮੁੱਲ ਪ੍ਰਾਪਤ ਕਰੋ A ਵਰਕਸ਼ੀਟ ਜਦੋਂ ਤੱਕ ਕਾਲਮ ਇੱਕ ਖਾਲੀ ਸੈੱਲ ਦਾ ਸਾਹਮਣਾ ਨਹੀਂ ਕਰਦਾ:

iRow = 1 ਉਦੋਂ ਤੱਕ ਕਰੋ ਜਦੋਂ ਤੱਕ IsEmpty(Cells(iRow, 1)) 'ਮੌਜੂਦਾ ਸੈੱਲ ਦਾ ਮੁੱਲ ਐਰੇ dCellValues ​​dCellValues(iRow) = ਸੈੱਲ(iRow, 1) ਵਿੱਚ ਸਟੋਰ ਕੀਤਾ ਜਾਂਦਾ ਹੈ। ਮੁੱਲ iRow = iRow + 1 ਲੂਪ

ਉਪਰੋਕਤ ਉਦਾਹਰਨ ਵਿੱਚ, ਹਾਲਤ ਖਾਲੀ(ਸੈੱਲ(iRow, 1)) ਬਣਤਰ ਦੇ ਸ਼ੁਰੂ ਵਿੱਚ ਸਥਿਤ ਤੱਕ ਕਰੋ, ਇਸ ਲਈ ਲੂਪ ਨੂੰ ਘੱਟੋ-ਘੱਟ ਇੱਕ ਵਾਰ ਚਲਾਇਆ ਜਾਵੇਗਾ ਜੇਕਰ ਲਿਆ ਗਿਆ ਪਹਿਲਾ ਸੈੱਲ ਖਾਲੀ ਨਹੀਂ ਹੈ।

ਹਾਲਾਂਕਿ, ਜਿਵੇਂ ਕਿ ਲੂਪ ਉਦਾਹਰਨਾਂ ਵਿੱਚ ਦਿਖਾਇਆ ਗਿਆ ਹੈ ਜਦਕਿ ਕਰੋ, ਕੁਝ ਸਥਿਤੀਆਂ ਵਿੱਚ ਇਹ ਜ਼ਰੂਰੀ ਹੈ ਕਿ ਕੰਡੀਸ਼ਨਲ ਸਮੀਕਰਨ ਦੇ ਸ਼ੁਰੂਆਤੀ ਨਤੀਜੇ ਦੀ ਪਰਵਾਹ ਕੀਤੇ ਬਿਨਾਂ, ਲੂਪ ਨੂੰ ਘੱਟੋ-ਘੱਟ ਇੱਕ ਵਾਰ ਚਲਾਇਆ ਜਾਵੇ। ਇਸ ਸਥਿਤੀ ਵਿੱਚ, ਕੰਡੀਸ਼ਨਲ ਸਮੀਕਰਨ ਨੂੰ ਲੂਪ ਦੇ ਅੰਤ ਵਿੱਚ ਰੱਖਿਆ ਜਾਣਾ ਚਾਹੀਦਾ ਹੈ, ਜਿਵੇਂ ਕਿ:

ਕਰੋ... ਖਾਲੀ ਹੋਣ ਤੱਕ ਲੂਪ ਕਰੋ(ਸੈੱਲ(iRow, 1))