ਵਿਸ਼ਾ - ਸੂਚੀ
ਇਸ ਲੇਖ ਵਿੱਚ, ਅਸੀਂ ਚੋਣ ਕਰਨ ਲਈ ਇੱਕ ਰੇਂਜ ਵੇਰੀਏਬਲ ਸੈੱਟ ਕਰਨ ਲਈ ਐਕਸਲ VBA ਦੀ ਵਰਤੋਂ ਕਰਨ ਬਾਰੇ ਕੁਝ ਵਿਚਾਰਾਂ ਦਾ ਪ੍ਰਦਰਸ਼ਨ ਕਰਾਂਗੇ। ਅਸੀਂ VBA ਦੀ ਵਰਤੋਂ ਕਰਕੇ ਇਹਨਾਂ ਚੁਣੇ ਹੋਏ ਸੈੱਲਾਂ 'ਤੇ ਕੁਝ ਆਮ ਕਾਰਵਾਈਆਂ ਨੂੰ ਚਲਾ ਸਕਦੇ ਹਾਂ। ਨਿਮਨਲਿਖਤ ਐਕਸਲ ਡੇਟਾਸੈਟ ਵਿੱਚ, ਅਸੀਂ ਕੁਝ ਪੱਛਮੀ ਬੈਂਡ ਨਾਮ ਅਤੇ ਉਹਨਾਂ ਦੇ ਅਨੁਸਾਰੀ ਵੋਕਲ ਗਾਇਕ ਦਿਖਾ ਰਹੇ ਹਾਂ।
ਪ੍ਰੈਕਟਿਸ ਵਰਕਬੁੱਕ ਡਾਊਨਲੋਡ ਕਰੋ
VBA ਨੂੰ Selection.xlsm 'ਤੇ ਰੇਂਜ ਸੈੱਟ ਕਰਨ ਲਈ
Excel ਵਿੱਚ ਚੋਣ ਲਈ ਇੱਕ ਰੇਂਜ ਵੇਰੀਏਬਲ ਸੈੱਟ ਕਰਨ ਲਈ VBA ਦੀ ਵਰਤੋਂ ਕਰਨ ਦੇ 5 ਤਰੀਕੇ
1। ਐਕਸਲ VBA ਦੁਆਰਾ ਇੱਕ ਰੇਂਜ ਚੁਣਨ ਲਈ ਰੇਂਜ ਵੇਰੀਏਬਲ ਸੈੱਟ ਕਰਨਾ
ਅਸੀਂ VBA ਵਿੱਚ ਰੇਂਜ ਸੈੱਟ ਦੁਆਰਾ ਇੱਕ ਰੇਂਜ ਚੁਣ ਸਕਦੇ ਹਾਂ। ਮੰਨ ਲਓ ਕਿ ਅਸੀਂ ਸੈੱਲ B5:C8 ਨੂੰ ਚੁਣਨਾ ਚਾਹੁੰਦੇ ਹਾਂ। ਚਲੋ ਹੇਠਾਂ ਦਿੱਤੀ ਪ੍ਰਕਿਰਿਆ 'ਤੇ ਚੱਲੀਏ।
ਪੜਾਅ:
- VBA, ਵਿੱਚ ਕੋਡ ਲਿਖਣ ਲਈ ਪਹਿਲਾਂ, ਡਿਵੈਲਪਰ ਖੋਲ੍ਹੋ ਟੈਬ ਅਤੇ ਫਿਰ ਵਿਜ਼ੂਅਲ ਬੇਸਿਕ ਨੂੰ ਚੁਣੋ।
15>
ਫਿਰ, ਇਹ ਲਈ ਮਾਈਕ੍ਰੋਸਾਫਟ ਵਿਜ਼ੂਅਲ ਬੇਸਿਕ ਦੀ ਇੱਕ ਨਵੀਂ ਵਿੰਡੋ ਖੋਲ੍ਹੇਗਾ। ਐਪਲੀਕੇਸ਼ਨ ।
- ਹੁਣ, ਖੋਲ੍ਹੋ ਇਨਸਰਟ >> ਮੌਡਿਊਲ
ਚੁਣੋ।
- VBA ਮੋਡੀਊਲ ਵਿੱਚ ਹੇਠਾਂ ਦਿੱਤਾ ਕੋਡ ਟਾਈਪ ਕਰੋ।
8100
ਇੱਥੇ, ਅਸੀਂ ਰੇਂਜ B5:C8 ਨੂੰ Rng1 ਵਜੋਂ ਸੈੱਟ ਕਰਦੇ ਹਾਂ। ਅਸੀਂ ਇਸਨੂੰ VBA ਦੇ ਰੇਂਜ ਵਿਧੀ ਦੁਆਰਾ ਚੁਣਦੇ ਹਾਂ। ਇਹ ਧਿਆਨ ਵਿੱਚ ਰੱਖੋ ਕਿ ਸਾਨੂੰ ਐਕਟੀਵੇਟ ਸਾਡੀ ਐਕਸਲ ਸ਼ੀਟ ਇਸ ਲਈ ਅਸੀਂ ਸਿਲੈਕਟਰੇਂਜ ਸ਼ੀਟ ਨੂੰ ਐਕਟੀਵੇਟ ਕਰਨਾ ਹੈ।
- ਹੁਣ ਵਾਪਸ ਜਾਓ। ਸ਼ੀਟ ਅਤੇ ਚਲਾਓ ਮੈਕਰੋ ।
- ਇਸ ਤੋਂ ਬਾਅਦ, ਤੁਸੀਂ ਰੇਂਜ B5:C8 ਆਪਣੇ ਆਪ ਚੁਣੇ ਹੋਏ ਦੇਖੋਗੇ।
ਇਸ ਤਰ੍ਹਾਂ ਤੁਸੀਂ VBA ਦੀ ਵਰਤੋਂ ਕਰਕੇ ਇੱਛਤ ਰੇਂਜ ਵੇਰੀਏਬਲ ਚੋਣ ਲਈ ਸੈੱਟ ਕਰ ਸਕਦੇ ਹੋ।
ਹੋਰ ਪੜ੍ਹੋ: Excel VBA: ਮੁੱਲਾਂ ਦੇ ਨਾਲ ਸੈੱਲਾਂ ਦੀ ਰੇਂਜ ਪ੍ਰਾਪਤ ਕਰੋ (7 ਉਦਾਹਰਨਾਂ)
2. ਰੇਂਜ ਵੇਰੀਏਬਲ ਸੈੱਟ ਕਰਕੇ ਸੈੱਲਾਂ ਨੂੰ ਫਾਰਮੈਟ ਕਰਨ ਲਈ VBA ਦੀ ਵਰਤੋਂ ਕਰਨਾ
ਮੰਨ ਲਓ ਕਿ ਸਾਡਾ ਡੇਟਾਸੈਟ ਹੇਠਾਂ ਦਿੱਤੇ ਚਿੱਤਰ ਵਰਗਾ ਦਿਖਾਈ ਦਿੰਦਾ ਹੈ।
ਅਸੀਂ ਬਣਾਉਣਾ ਚਾਹੁੰਦੇ ਹਾਂ ਸਿਰਲੇਖ ਬੋਲਡ ਅਤੇ ਆਟੋਫਿਟ ਕਾਲਮ । ਅਸੀਂ ਇਸਨੂੰ VBA ਰਾਹੀਂ ਕਰ ਸਕਦੇ ਹਾਂ। ਆਓ ਦੇਖੀਏ ਕਿ ਅਸੀਂ ਇਹ ਕਿਵੇਂ ਕਰ ਸਕਦੇ ਹਾਂ।
ਪੜਾਅ:
- ਪਹਿਲਾਂ, ਵਿਜ਼ੂਅਲ ਬੇਸਿਕ ਖੋਲੋ ਅਤੇ ਹੇਠਾਂ ਦਿੱਤਾ ਕੋਡ ਟਾਈਪ ਕਰੋ VBA ਮੋਡੀਊਲ (ਇਹ ਦੇਖਣ ਲਈ ਕਿ ਵਿਜ਼ੂਅਲ ਬੇਸਿਕ ਅਤੇ VBA ਮੋਡੀਊਲ ਨੂੰ ਕਿਵੇਂ ਖੋਲ੍ਹਣਾ ਹੈ, ਕਿਰਪਾ ਕਰਕੇ ਸੈਕਸ਼ਨ 1 'ਤੇ ਜਾਓ)।
7310
ਇੱਥੇ ਅਸੀਂ ਰੇਂਜ B4:C4 ਨੂੰ xyz ਵਜੋਂ ਸੈੱਟ ਕੀਤਾ ਹੈ। ਫਿਰ ਅਸੀਂ ਸੈੱਲ B4 ਅਤੇ C4 ਬੋਲਡ ਵਿੱਚ ਫੋਂਟ ਬਣਾਉਣ ਲਈ ਬੋਲਡ ਵਿਧੀ ਦੀ ਵਰਤੋਂ ਕੀਤੀ। ਅਸੀਂ AutoFit ਵਿਧੀ ਦੀ ਵਰਤੋਂ ਕਰਕੇ ਕਾਲਮ B ਅਤੇ C ਵੀ ਫਿੱਟ ਕੀਤੇ।
- ਹੁਣ, ਸ਼ੀਟ 'ਤੇ ਵਾਪਸ ਜਾਓ। ਅਤੇ ਮੈਕਰੋ ਨੂੰ ਚਲਾਓ ਜਿਸਦਾ ਨਾਮ SetRange ਹੈ।
ਉਸ ਤੋਂ ਬਾਅਦ, ਤੁਸੀਂ ਦੇਖੋਗੇ ਕਾਲਮਾਂ ਅਤੇ ਸਿਰਲੇਖ ਵਿੱਚ ਸਪਸ਼ਟ ਤੌਰ 'ਤੇ ਨਾਮ ਬੋਲਡ ਬਣ ਜਾਂਦੇ ਹਨ ਅਤੇ ਚੁਣੇ ਜਾਂਦੇ ਹਨ।
23>
ਇਸ ਮਾਰਗ ਦੀ ਪਾਲਣਾ ਕਰਕੇ , ਤੁਸੀਂ ਫਾਰਮੈਟ ਸੈੱਲ ਅਤੇ ਆਟੋਫਿਟ ਕਾਲਮ ਸੈਟਿੰਗ ਰੇਂਜ ਵੇਰੀਏਬਲ ਵਿੱਚ ਕਰ ਸਕਦੇ ਹੋ1 13>
3. VBA ਵਿੱਚ ਵੇਰੀਏਬਲ ਰੇਂਜ ਸਿਲੈਕਸ਼ਨ ਨੂੰ ਸੈੱਟ ਕਰਕੇ ਇੱਕ ਰੇਂਜ ਨੂੰ ਕਾਪੀ ਕਰਨਾ
ਮੰਨ ਲਓ ਕਿ ਅਸੀਂ ਰੇਂਜ ਵੇਰੀਏਬਲ ਨੂੰ ਚੁਣੋ<ਵਿੱਚ ਸੈੱਟ ਕਰਕੇ B6:C9 ਕਾਪੀ ਕਰਨਾ ਚਾਹੁੰਦੇ ਹਾਂ। 2>। ਆਉ ਹੇਠਾਂ ਵਿਧੀ ਬਾਰੇ ਚਰਚਾ ਕਰੀਏ।
ਪੜਾਅ:
- ਪਹਿਲਾਂ, ਵਿਜ਼ੂਅਲ ਬੇਸਿਕ ਖੋਲੋ ਅਤੇ ਵਿੱਚ ਹੇਠਾਂ ਦਿੱਤਾ ਕੋਡ ਟਾਈਪ ਕਰੋ। VBA ਮੋਡੀਊਲ (ਇਹ ਦੇਖਣ ਲਈ ਕਿ ਵਿਜ਼ੂਅਲ ਬੇਸਿਕ ਅਤੇ VBA ਮੋਡੀਊਲ ਨੂੰ ਕਿਵੇਂ ਖੋਲ੍ਹਣਾ ਹੈ, ਕਿਰਪਾ ਕਰਕੇ ਸੈਕਸ਼ਨ 1 'ਤੇ ਜਾਓ)।
9739
ਇੱਥੇ, ਅਸੀਂ ਸਿਰਫ਼ VBA ਦੀ ਕਾਪੀ ਵਿਧੀ ਦੀ ਵਰਤੋਂ ਕਰਕੇ ਰੇਂਜ B6:C9 ਨੂੰ ਕਾਪੀ ਕੀਤਾ ਹੈ। ਅਸੀਂ ਰੇਂਜ B6:C9 ਨੂੰ cpy ਵਜੋਂ ਸੈੱਟ ਕੀਤਾ ਹੈ।
- ਹੁਣ ਆਪਣੀ ਸ਼ੀਟ ਤੇ ਵਾਪਸ ਜਾਓ ਅਤੇ ਮੈਕ੍ਰੋਜ਼<ਚਲਾਓ 2>। ਕਾਪੀਰੇਂਜ ਚੁਣੋ ਕਿਉਂਕਿ ਇਹ ਤੁਹਾਡੇ ਮੌਜੂਦਾ ਮੈਕਰੋ ਦਾ ਨਾਮ ਹੈ।
ਤੁਸੀਂ ਰੇਂਜ ਦੇਖੋਗੇ। B6:C9 ਨਕਲ ਕੀਤਾ ਗਿਆ ਹੈ।
ਤੁਸੀਂ <1 ਨੂੰ ਦਬਾ ਕੇ ਇਸ ਰੇਂਜ ਆਪਣੇ ਐਕਸਲ ਸ਼ੀਟ ਵਿੱਚ ਕਿਤੇ ਵੀ ਪੇਸਟ ਕਰ ਸਕਦੇ ਹੋ।>CTRL + V । ਮੈਂ ਰੇਂਜ B12 ਤੋਂ C15 ਤੱਕ ਪੇਸਟ ਕੀਤਾ।
ਇਸ ਵਿਧੀ ਦੇ ਨਾਲ ਜਾ ਕੇ, ਤੁਸੀਂ ਐਕਸਲ VBA ਵਿੱਚ ਚੋਣ ਕਰਨ ਲਈ ਰੇਂਜ ਵੇਰੀਏਬਲ ਸੈੱਟ ਕਰਕੇ ਰੇਂਜ ਇੱਕ ਰੇਂਜ ਕਾਪੀ ਕਰ ਸਕਦਾ ਹੈ।
ਹੋਰ ਪੜ੍ਹੋ : Excel VBA: ਕਾਪੀ ਡਾਇਨਾਮਿਕਇੱਕ ਹੋਰ ਵਰਕਬੁੱਕ ਤੱਕ ਰੇਂਜ
4। ਰੇਂਜ ਵੇਰੀਏਬਲ ਨੂੰ ਚੋਣ
ਮੰਨ ਲਓ ਕਿ ਅਸੀਂ ਡੇਟਾਸੈਟ ਦੀਆਂ 8ਵੀਂ ਅਤੇ 10ਵੀਂ ਕਤਾਰਾਂ ਨੂੰ ਹਰੇ<ਨਾਲ ਰੰਗ ਕਰਨਾ ਚਾਹੁੰਦੇ ਹਾਂ। 2>। ਆਓ ਹੇਠਾਂ ਦਿੱਤੇ ਵਰਣਨ ਦੀ ਪਾਲਣਾ ਕਰੀਏ।
ਪੜਾਅ:
- ਪਹਿਲਾਂ, ਵਿਜ਼ੂਅਲ ਬੇਸਿਕ ਖੋਲੋ ਅਤੇ ਵਿੱਚ ਹੇਠਾਂ ਦਿੱਤਾ ਕੋਡ ਟਾਈਪ ਕਰੋ। VBA ਮੋਡੀਊਲ (ਇਹ ਦੇਖਣ ਲਈ ਕਿ ਵਿਜ਼ੂਅਲ ਬੇਸਿਕ ਅਤੇ VBA ਮੋਡੀਊਲ ਨੂੰ ਕਿਵੇਂ ਖੋਲ੍ਹਣਾ ਹੈ, ਕਿਰਪਾ ਕਰਕੇ ਸੈਕਸ਼ਨ 1 'ਤੇ ਜਾਓ)।
8049
ਇੱਥੇ ਅਸੀਂ ਆਪਣੀ ਰੇਂਜ B8:C8 ਅਤੇ B10:C10 ਨੂੰ x1 ਅਤੇ x2 <2 ਪਰਿਭਾਸ਼ਿਤ ਕਰਦੇ ਹਾਂ> ਕ੍ਰਮਵਾਰ. ਅਸੀਂ ਆਪਣੀ ਰੰਗ ਐਕਸਲ ਸ਼ੀਟ ਨੂੰ ਐਕਟਿਵਸ਼ੀਟ ਵਜੋਂ ਬਣਾਇਆ ਹੈ ਅਤੇ ਅਸੀਂ ਆਪਣੀ ਲੋੜੀਦੀ ਰੇਂਜ ਕਲਰਇੰਡੈਕਸ ਵਿਸ਼ੇਸ਼ਤਾ ਦੁਆਰਾ ਰੰਗੀ ਹੈ।
- ਹੁਣ ਆਪਣੀ ਸ਼ੀਟ ਤੇ ਵਾਪਸ ਜਾਓ ਅਤੇ ਮੈਕ੍ਰੋਜ਼ ਚਲਾਓ। ਰੰਗ ਰੇਂਜ ਚੁਣੋ ਕਿਉਂਕਿ ਇਹ ਮੌਜੂਦਾ ਮੈਕਰੋ ਦਾ ਨਾਮ ਹੈ।
ਉਸ ਤੋਂ ਬਾਅਦ, ਤੁਹਾਨੂੰ ਲੋੜੀਂਦਾ ਦਿਖਾਈ ਦੇਵੇਗਾ। ਰੇਂਜ ਹਰੇ ਰੰਗ ਨਾਲ ਭਰੀਆਂ।
ਇਸ ਤਰ੍ਹਾਂ ਤੁਸੀਂ ਸੈੱਟ ਕਰਕੇ ਸੈੱਲਾਂ ਨੂੰ ਰੰਗ ਨਾਲ ਫਾਰਮੈਟ ਕਰ ਸਕਦੇ ਹੋ। ਰੇਂਜ ਵੇਰੀਏਬਲ ਚੋਣ ਲਈ।
ਹੋਰ ਪੜ੍ਹੋ: ਐਕਸਲ VBA ਨਾਲ ਵੇਰੀਏਬਲ ਰੋਅ ਅਤੇ ਕਾਲਮ ਨਾਲ ਰੇਂਜ ਦੀ ਵਰਤੋਂ ਕਿਵੇਂ ਕਰੀਏ
ਇੱਕੋ ਜਿਹੀ ਰੀਡਿੰਗ
- ਐਕਸਲ ਵਿੱਚ ਇੱਕ ਰੇਂਜ ਵਿੱਚ ਕਤਾਰਾਂ ਅਤੇ ਕਾਲਮਾਂ ਨੂੰ ਲੂਪ ਕਰਨ ਲਈ VBA (5 ਉਦਾਹਰਨਾਂ)
- Excel VBA ਖਾਲੀ ਸੈੱਲ ਤੱਕ ਰੇਂਜ ਰਾਹੀਂ ਲੂਪ ਕਰੋ (4 ਉਦਾਹਰਣਾਂ)
- ਐਕਸਲ VBA ਵਿੱਚ ਰੇਂਜ ਨੂੰ ਐਰੇ ਵਿੱਚ ਕਿਵੇਂ ਬਦਲਿਆ ਜਾਵੇ (3 ਤਰੀਕੇ)
5।VBA ਵਿੱਚ ਰੇਂਜ ਵੇਰੀਏਬਲ ਸੈੱਟ ਕਰਕੇ ਕਤਾਰਾਂ ਨੂੰ ਮਿਟਾਉਣਾ
ਮੰਨ ਲਓ ਕਿ ਅਸੀਂ ਹਰੇ ਨਾਲ ਡੇਟਾਸੈਟ ਦੀਆਂ 8ਵੀਂ ਅਤੇ 10ਵੀਂ ਕਤਾਰਾਂ ਨੂੰ ਮਿਟਾਉਣਾ ਚਾਹੁੰਦੇ ਹਾਂ। . ਆਓ ਹੇਠਾਂ ਦਿੱਤੇ ਵਰਣਨ ਦੀ ਪਾਲਣਾ ਕਰੀਏ।
ਪੜਾਅ:
- ਪਹਿਲਾਂ, ਵਿਜ਼ੂਅਲ ਬੇਸਿਕ ਖੋਲੋ ਅਤੇ ਵਿੱਚ ਹੇਠਾਂ ਦਿੱਤਾ ਕੋਡ ਟਾਈਪ ਕਰੋ। VBA ਮੋਡੀਊਲ (ਇਹ ਦੇਖਣ ਲਈ ਕਿ ਵਿਜ਼ੂਅਲ ਬੇਸਿਕ ਅਤੇ VBA ਮੋਡੀਊਲ ਨੂੰ ਕਿਵੇਂ ਖੋਲ੍ਹਣਾ ਹੈ, ਕਿਰਪਾ ਕਰਕੇ ਸੈਕਸ਼ਨ 1 'ਤੇ ਜਾਓ)।
4520
ਰੇਂਜ ਜਿਨ੍ਹਾਂ ਨੂੰ ਅਸੀਂ ਮਿਟਾਉਣਾ ਚਾਹੁੰਦੇ ਹਾਂ B8:C8 ਅਤੇ B10:C10 ਹਨ। ਅਸੀਂ ਉਹਨਾਂ ਨੂੰ ਕ੍ਰਮਵਾਰ x1 ਅਤੇ x2 ਨਾਮ ਦਿੱਤਾ ਹੈ। ਫਿਰ ਅਸੀਂ ਉਹਨਾਂ ਨੂੰ ਮਿਟਾਓ ਵਿਧੀ ਨਾਲ ਹਟਾ ਦਿੱਤਾ ਹੈ।
- ਹੁਣ ਆਪਣੀ ਸ਼ੀਟ ਤੇ ਵਾਪਸ ਜਾਓ ਅਤੇ ਮੈਕਰੋ ਚਲਾਓ। DeleteRange ਚੁਣੋ ਕਿਉਂਕਿ ਇਹ ਤੁਹਾਡੇ ਮੌਜੂਦਾ Macro ਦਾ ਨਾਮ ਹੈ।
ਉਸ ਤੋਂ ਬਾਅਦ, ਤੁਸੀਂ ਰੇਂਜ B8:C8 ਅਤੇ B10:C10 ਲੱਗ ਗਈਆਂ ਹਨ।
ਇਸ ਪਹੁੰਚ ਨੂੰ ਅਪਣਾ ਕੇ, ਤੁਸੀਂ ਕਤਾਰਾਂ <ਨੂੰ ਮਿਟਾ ਸਕਦੇ ਹੋ। 2>ਚੋਣ ਲਈ ਰੇਂਜ ਵੇਰੀਏਬਲ ਸੈਟ ਕਰਕੇ।
ਪ੍ਰੈਕਟਿਸ ਸੈਕਸ਼ਨ
ਹੇਠ ਦਿੱਤੇ ਚਿੱਤਰ ਵਿੱਚ, ਤੁਹਾਨੂੰ ਉਹ ਡੇਟਾਸੈਟ ਮਿਲੇਗਾ ਜਿਸ ਉੱਤੇ ਅਸੀਂ ਇਸ ਲੇਖ ਵਿੱਚ ਕੰਮ ਕੀਤਾ ਹੈ ਤਾਂ ਜੋ ਤੁਸੀਂ ਆਪਣੇ ਆਪ ਅਭਿਆਸ ਕਰ ਸਕਦੇ ਹੋ।
ਸਿੱਟਾ
ਸੰਖੇਪ ਰੂਪ ਵਿੱਚ, ਲੇਖ ਪੂਰੀ ਤਰ੍ਹਾਂ ਕੁਝ ਐਪਲੀਕੇਸ਼ਨਾਂ 'ਤੇ ਫੋਕਸ ਕਰਦਾ ਹੈ ਜੋ ਰੇਂਜ ਵੇਰੀਏਬਲ ਨੂੰ ਸੈੱਟ ਕਰਨ ਲਈ ਐਕਸਲ VBA ਦੁਆਰਾ ਚੋਣ। ਅਸੀਂ ਕੁਝ ਵਧੀਆ ਬੁਨਿਆਦੀ ਤਰੀਕਿਆਂ ਦਾ ਵਰਣਨ ਕੀਤਾ ਹੈ। ਜੇਕਰ ਤੁਹਾਡੇ ਕੋਲ ਕੋਈ ਹੋਰ ਵਿਚਾਰ ਜਾਂ ਫੀਡਬੈਕ ਹੈ, ਤਾਂ ਕਿਰਪਾ ਕਰਕੇ ਉਹਨਾਂ ਨੂੰ ਟਿੱਪਣੀ ਬਾਕਸ ਵਿੱਚ ਛੱਡੋ। ਇਹ ਮੈਨੂੰ ਮੇਰੇ ਨੂੰ ਅਮੀਰ ਬਣਾਉਣ ਵਿੱਚ ਮਦਦ ਕਰੇਗਾਆਉਣ ਵਾਲੇ ਲੇਖ