VBA ਵਿੱਚ ਸਥਿਤੀ ਬਿਆਨ

ਐਕਸਲ VBA ਵਿੱਚ ਵਰਤੇ ਜਾਣ ਵਾਲੇ ਸਭ ਤੋਂ ਮਹੱਤਵਪੂਰਨ ਕੰਡੀਸ਼ਨ ਸਟੇਟਮੈਂਟਸ ਹਨ ਜੇਕਰ … ਫਿਰ и ਕੇਸ ਚੁਣੋ. ਇਹ ਦੋਵੇਂ ਸਮੀਕਰਨ ਇੱਕ ਜਾਂ ਇੱਕ ਤੋਂ ਵੱਧ ਸ਼ਰਤਾਂ ਦੀ ਜਾਂਚ ਕਰਦੇ ਹਨ ਅਤੇ ਨਤੀਜੇ ਦੇ ਆਧਾਰ 'ਤੇ, ਵੱਖ-ਵੱਖ ਕਿਰਿਆਵਾਂ ਕਰਦੇ ਹਨ। ਅਸੀਂ ਅੱਗੇ ਇਹਨਾਂ ਦੋ ਕੰਡੀਸ਼ਨਲ ਓਪਰੇਟਰਾਂ ਬਾਰੇ ਹੋਰ ਵਿਸਥਾਰ ਵਿੱਚ ਗੱਲ ਕਰਾਂਗੇ।

ਵਿਜ਼ੂਅਲ ਬੇਸਿਕ ਵਿੱਚ "ਜੇ… ਫਿਰ" ਬਿਆਨ

ਓਪਰੇਟਰ ਜੇਕਰ … ਫਿਰ ਸਥਿਤੀ ਦੀ ਜਾਂਚ ਕਰਦਾ ਹੈ ਅਤੇ, ਜੇਕਰ ਇਹ ਸਹੀ ਹੈ (ਸੱਚ), ਤਾਂ ਕਾਰਵਾਈਆਂ ਦਾ ਨਿਰਧਾਰਤ ਸੈੱਟ ਕੀਤਾ ਜਾਂਦਾ ਹੈ। ਇਹ ਕੀਤੀਆਂ ਜਾਣ ਵਾਲੀਆਂ ਕਾਰਵਾਈਆਂ ਦੇ ਇੱਕ ਸਮੂਹ ਨੂੰ ਵੀ ਪਰਿਭਾਸ਼ਿਤ ਕਰ ਸਕਦਾ ਹੈ ਜੇਕਰ ਸਥਿਤੀ FALSE ਹੈ।

ਆਪਰੇਟਰ ਸੰਟੈਕਸ ਜੇਕਰ … ਫਿਰ ਇਸ ਤਰ੍ਹਾਂ:

If Условие1 Then

   Действия в случае, если выполняется Условие1

ElseIf Условие2 Then

   Действия в случае, если выполняется Условие2

Else

   Действия в случае, если не выполнено ни одно из Условий

End If

ਇਸ ਸਮੀਕਰਨ ਵਿੱਚ, ਤੱਤ ਬਾਕੀ ਜੇ и ਹੋਰ ਸ਼ਰਤਾਂ ਆਪਰੇਟਰ ਨੂੰ ਛੱਡਿਆ ਜਾ ਸਕਦਾ ਹੈ ਜੇਕਰ ਉਹਨਾਂ ਦੀ ਲੋੜ ਨਹੀਂ ਹੈ।

ਹੇਠਾਂ ਇੱਕ ਉਦਾਹਰਨ ਹੈ ਜਿਸ ਵਿੱਚ, ਆਪਰੇਟਰ ਦੀ ਵਰਤੋਂ ਕਰਦੇ ਹੋਏ ਜੇਕਰ … ਫਿਰ ਕਿਰਿਆਸ਼ੀਲ ਸੈੱਲ ਦਾ ਭਰਨ ਦਾ ਰੰਗ ਇਸ ਵਿੱਚ ਮੁੱਲ ਦੇ ਅਧਾਰ ਤੇ ਬਦਲਦਾ ਹੈ:

ਜੇਕਰ ActiveCell.Value < 5 ਫਿਰ ActiveCell.Interior.Color = 65280 'Ячейка окрашивается в зелёный цвет ਵਿੱਚ ਜੇਕਰ ActiveCell.Value < 10 ਤਾਂ ActiveCell.Interior.Color = 49407' нжевый цвет Else ActiveCell.Interior.Color = 255 'Ячейка. окрашивается в красный цвет End ਜੇ

ਨੋਟ ਕਰੋ ਕਿ ਜਿਵੇਂ ਹੀ ਸ਼ਰਤ ਸਹੀ ਹੋ ਜਾਂਦੀ ਹੈ, ਕੰਡੀਸ਼ਨਲ ਸਟੇਟਮੈਂਟ ਨੂੰ ਲਾਗੂ ਕਰਨਾ ਬੰਦ ਕਰ ਦਿੱਤਾ ਜਾਂਦਾ ਹੈ। ਇਸ ਲਈ, ਜੇਕਰ ਵੇਰੀਏਬਲ ਦਾ ਮੁੱਲ ਐਕਟਿਵ ਸੈੱਲ 5 ਤੋਂ ਘੱਟ, ਫਿਰ ਪਹਿਲੀ ਸ਼ਰਤ ਸਹੀ ਬਣ ਜਾਂਦੀ ਹੈ ਅਤੇ ਸੈੱਲ ਦਾ ਰੰਗ ਹਰਾ ਹੁੰਦਾ ਹੈ। ਉਸ ਤੋਂ ਬਾਅਦ ਬਿਆਨ ਨੂੰ ਅੰਜਾਮ ਦਿੱਤਾ ਜੇਕਰ … ਫਿਰ ਵਿੱਚ ਰੁਕਾਵਟ ਹੈ ਅਤੇ ਹੋਰ ਸਥਿਤੀਆਂ ਦੀ ਜਾਂਚ ਨਹੀਂ ਕੀਤੀ ਗਈ ਹੈ।

VBA ਵਿੱਚ ਕੰਡੀਸ਼ਨਲ ਆਪਰੇਟਰ ਦੀ ਵਰਤੋਂ ਕਰਨ ਬਾਰੇ ਹੋਰ ਜਾਣੋ ਜੇਕਰ … ਫਿਰ ਮਾਈਕ੍ਰੋਸਾਫਟ ਡਿਵੈਲਪਰ ਨੈੱਟਵਰਕ 'ਤੇ ਪਾਇਆ ਜਾ ਸਕਦਾ ਹੈ।

ਵਿਜ਼ੂਅਲ ਬੇਸਿਕ ਵਿੱਚ "ਕੇਸ ਚੁਣੋ" ਸਟੇਟਮੈਂਟ

ਓਪਰੇਟਰ ਕੇਸ ਚੁਣੋ ਆਪਰੇਟਰ ਦੇ ਸਮਾਨ ਜੇਕਰ … ਫਿਰ ਇਸ ਵਿੱਚ ਇਹ ਸਥਿਤੀ ਦੀ ਸੱਚਾਈ ਦੀ ਵੀ ਜਾਂਚ ਕਰਦਾ ਹੈ ਅਤੇ ਨਤੀਜੇ ਦੇ ਅਧਾਰ ਤੇ, ਇੱਕ ਵਿਕਲਪ ਚੁਣਦਾ ਹੈ।

ਆਪਰੇਟਰ ਸੰਟੈਕਸ ਕੇਸ ਚੁਣੋ ਇਸ ਤਰ੍ਹਾਂ:

Select Case Выражение

Case Значение1

   Действия в случае, если результат Выражения соответствует Значению1

Case Значение2

   Действия в случае, если результат Выражения соответствует Значению2

...

Case Else

   Действия в случае, если результат Выражения не соответствует ни одному из перечисленных вариантов Значения

End Select

ਇਕਾਈ ਕੇਸ ਹੋਰ ਦੀ ਲੋੜ ਨਹੀਂ ਹੈ, ਪਰ ਅਚਾਨਕ ਮੁੱਲਾਂ ਨੂੰ ਸੰਭਾਲਣ ਲਈ ਸਿਫਾਰਸ਼ ਕੀਤੀ ਜਾਂਦੀ ਹੈ।

ਹੇਠ ਦਿੱਤੀ ਉਦਾਹਰਨ ਵਿੱਚ, ਰਚਨਾ ਦੀ ਵਰਤੋਂ ਕਰਦੇ ਹੋਏ ਕੇਸ ਚੁਣੋ ਮੌਜੂਦਾ ਸੈੱਲ ਦੇ ਭਰਨ ਦੇ ਰੰਗ ਨੂੰ ਇਸ ਵਿੱਚ ਮੁੱਲ ਦੇ ਅਧਾਰ ਤੇ ਬਦਲਦਾ ਹੈ:

Case ActiveCell.Value Case Is <= 5 ActiveCell.Interior.Color = 65280 'Ячейка окрашивается в зелёный цвет ਕੇਸ 6, 7, 8, 9 ActiveCell.Interior.Color = '49407Ячейка окрашивается. ਕੇਸ 10 ActiveCell.Interior. ਰੰਗ = 65535 'Ячейка окрашивается в жёлтый цвет ਕੇਸ 11 ਤੋਂ 20 ActiveCell.Interior.Color = 10498160' Ячейка окрашивается в ли.InteriorCell255 ActiveCell. XNUMX 'Ячейка окрашивается в красный цвет ਅੰਤ ਦੀ ਚੋਣ ਕਰੋ

ਉਪਰੋਕਤ ਉਦਾਹਰਨ ਦਿਖਾਉਂਦਾ ਹੈ ਕਿ ਤੁਸੀਂ ਵੱਖ-ਵੱਖ ਤਰੀਕਿਆਂ ਨਾਲ ਕਿਸੇ ਤੱਤ ਲਈ ਮੁੱਲ ਕਿਵੇਂ ਸੈੱਟ ਕਰ ਸਕਦੇ ਹੋ। ਕੇਸ ਉਸਾਰੀ ਵਿੱਚ ਕੇਸ ਚੁਣੋ. ਇਹ ਤਰੀਕੇ ਹਨ:

ਜਿਵੇਂ ਹੀ ਕੋਈ ਇੱਕ ਸਥਿਤੀ ਮਿਲਦੀ ਹੈ, ਅਨੁਸਾਰੀ ਕਾਰਵਾਈਆਂ ਕੀਤੀਆਂ ਜਾਂਦੀਆਂ ਹਨ ਅਤੇ ਬਣਤਰ ਬਾਹਰ ਨਿਕਲਦਾ ਹੈ. ਕੇਸ ਚੁਣੋ. ਭਾਵ, ਕਿਸੇ ਵੀ ਸਥਿਤੀ ਵਿੱਚ, ਸੂਚੀਬੱਧ ਸ਼ਾਖਾਵਾਂ ਵਿੱਚੋਂ ਸਿਰਫ ਇੱਕ ਨੂੰ ਚਲਾਇਆ ਜਾਵੇਗਾ। ਕੇਸ.

VBA ਸਟੇਟਮੈਂਟ ਦੇ ਸੰਚਾਲਨ ਬਾਰੇ ਹੋਰ ਜਾਣਕਾਰੀ ਕੇਸ ਚੁਣੋ ਮਾਈਕ੍ਰੋਸਾਫਟ ਡਿਵੈਲਪਰ ਨੈੱਟਵਰਕ 'ਤੇ ਪਾਇਆ ਜਾ ਸਕਦਾ ਹੈ।