ਕਈ ਡਾਟਾ ਰੇਂਜਾਂ ਵਿੱਚ ਧਰੁਵੀ ਸਾਰਣੀ

ਸਮੱਸਿਆ ਦਾ ਗਠਨ

Pivot ਟੇਬਲ ਐਕਸਲ ਵਿੱਚ ਸਭ ਤੋਂ ਅਦਭੁਤ ਔਜ਼ਾਰਾਂ ਵਿੱਚੋਂ ਇੱਕ ਹਨ। ਪਰ ਹੁਣ ਤੱਕ, ਬਦਕਿਸਮਤੀ ਨਾਲ, ਐਕਸਲ ਦਾ ਕੋਈ ਵੀ ਸੰਸਕਰਣ ਫਲਾਈ 'ਤੇ ਇੰਨਾ ਸਰਲ ਅਤੇ ਜ਼ਰੂਰੀ ਕੰਮ ਨਹੀਂ ਕਰ ਸਕਦਾ ਹੈ ਜਿਵੇਂ ਕਿ ਸਥਿਤ ਕਈ ਸ਼ੁਰੂਆਤੀ ਡਾਟਾ ਰੇਂਜਾਂ ਲਈ ਸੰਖੇਪ ਬਣਾਉਣਾ, ਉਦਾਹਰਨ ਲਈ, ਵੱਖ-ਵੱਖ ਸ਼ੀਟਾਂ 'ਤੇ ਜਾਂ ਵੱਖ-ਵੱਖ ਟੇਬਲਾਂ ਵਿੱਚ:

ਸ਼ੁਰੂ ਕਰਨ ਤੋਂ ਪਹਿਲਾਂ, ਆਓ ਕੁਝ ਨੁਕਤੇ ਸਪੱਸ਼ਟ ਕਰੀਏ। ਇੱਕ ਤਰਜੀਹ, ਮੇਰਾ ਮੰਨਣਾ ਹੈ ਕਿ ਸਾਡੇ ਡੇਟਾ ਵਿੱਚ ਹੇਠਾਂ ਦਿੱਤੀਆਂ ਸ਼ਰਤਾਂ ਪੂਰੀਆਂ ਹੁੰਦੀਆਂ ਹਨ:

• ਟੇਬਲਾਂ ਵਿੱਚ ਕਿਸੇ ਵੀ ਡੇਟਾ ਦੇ ਨਾਲ ਕਈ ਕਤਾਰਾਂ ਹੋ ਸਕਦੀਆਂ ਹਨ, ਪਰ ਉਹਨਾਂ ਵਿੱਚ ਇੱਕੋ ਸਿਰਲੇਖ ਹੋਣਾ ਚਾਹੀਦਾ ਹੈ।
• ਸਰੋਤ ਸਾਰਣੀਆਂ ਵਾਲੀਆਂ ਸ਼ੀਟਾਂ 'ਤੇ ਕੋਈ ਵਾਧੂ ਡੇਟਾ ਨਹੀਂ ਹੋਣਾ ਚਾਹੀਦਾ ਹੈ। ਇੱਕ ਸ਼ੀਟ - ਇੱਕ ਮੇਜ਼. ਕੰਟਰੋਲ ਕਰਨ ਲਈ, ਮੈਂ ਤੁਹਾਨੂੰ ਕੀਬੋਰਡ ਸ਼ਾਰਟਕੱਟ ਵਰਤਣ ਦੀ ਸਲਾਹ ਦਿੰਦਾ ਹਾਂ Ctrl+ਅੰਤ, ਜੋ ਤੁਹਾਨੂੰ ਵਰਕਸ਼ੀਟ ਵਿੱਚ ਆਖਰੀ ਵਰਤੇ ਗਏ ਸੈੱਲ ਵਿੱਚ ਲੈ ਜਾਂਦਾ ਹੈ। ਆਦਰਸ਼ਕ ਤੌਰ 'ਤੇ, ਇਹ ਡੇਟਾ ਸਾਰਣੀ ਵਿੱਚ ਆਖਰੀ ਸੈੱਲ ਹੋਣਾ ਚਾਹੀਦਾ ਹੈ। ਜੇਕਰ ਤੁਸੀਂ 'ਤੇ ਕਲਿੱਕ ਕਰਦੇ ਹੋ Ctrl+ਅੰਤ ਸਾਰਣੀ ਦੇ ਸੱਜੇ ਜਾਂ ਹੇਠਾਂ ਕੋਈ ਵੀ ਖਾਲੀ ਸੈੱਲ ਉਜਾਗਰ ਕੀਤਾ ਗਿਆ ਹੈ - ਇਹਨਾਂ ਖਾਲੀ ਕਾਲਮਾਂ ਨੂੰ ਸੱਜੇ ਪਾਸੇ ਜਾਂ ਸਾਰਣੀ ਤੋਂ ਬਾਅਦ ਸਾਰਣੀ ਦੇ ਹੇਠਾਂ ਕਤਾਰਾਂ ਨੂੰ ਮਿਟਾਓ ਅਤੇ ਫਾਈਲ ਨੂੰ ਸੁਰੱਖਿਅਤ ਕਰੋ।

ਢੰਗ 1: ਪਾਵਰ ਕਿਊਰੀ ਦੀ ਵਰਤੋਂ ਕਰਕੇ ਇੱਕ ਧਰੁਵੀ ਲਈ ਟੇਬਲ ਬਣਾਓ

ਐਕਸਲ ਲਈ 2010 ਦੇ ਸੰਸਕਰਣ ਤੋਂ ਸ਼ੁਰੂ ਕਰਦੇ ਹੋਏ, ਇੱਥੇ ਇੱਕ ਮੁਫਤ ਪਾਵਰ ਕਿਊਰੀ ਐਡ-ਇਨ ਹੈ ਜੋ ਕਿਸੇ ਵੀ ਡੇਟਾ ਨੂੰ ਇਕੱਠਾ ਕਰ ਸਕਦਾ ਹੈ ਅਤੇ ਬਦਲ ਸਕਦਾ ਹੈ ਅਤੇ ਫਿਰ ਇਸਨੂੰ ਇੱਕ ਧਰੁਵੀ ਸਾਰਣੀ ਬਣਾਉਣ ਲਈ ਇੱਕ ਸਰੋਤ ਵਜੋਂ ਦੇ ਸਕਦਾ ਹੈ। ਇਸ ਐਡ-ਇਨ ਦੀ ਮਦਦ ਨਾਲ ਸਾਡੀ ਸਮੱਸਿਆ ਨੂੰ ਹੱਲ ਕਰਨਾ ਬਿਲਕੁਲ ਵੀ ਔਖਾ ਨਹੀਂ ਹੈ।

ਪਹਿਲਾਂ, ਆਓ ਐਕਸਲ ਵਿੱਚ ਇੱਕ ਨਵੀਂ ਖਾਲੀ ਫਾਈਲ ਬਣਾਈਏ - ਇਸ ਵਿੱਚ ਅਸੈਂਬਲੀ ਹੋਵੇਗੀ ਅਤੇ ਫਿਰ ਇਸ ਵਿੱਚ ਇੱਕ ਪੀਵੋਟ ਟੇਬਲ ਬਣਾਇਆ ਜਾਵੇਗਾ।

ਫਿਰ ਟੈਬ 'ਤੇ ਡੇਟਾ (ਜੇ ਤੁਹਾਡੇ ਕੋਲ ਐਕਸਲ 2016 ਜਾਂ ਬਾਅਦ ਵਾਲਾ ਹੈ) ਜਾਂ ਟੈਬ 'ਤੇ ਬਿਜਲੀ ਪ੍ਰਸ਼ਨ (ਜੇ ਤੁਹਾਡੇ ਕੋਲ ਐਕਸਲ 2010-2013 ਹੈ) ਕਮਾਂਡ ਚੁਣੋ ਪੁੱਛਗਿੱਛ ਬਣਾਓ - ਫਾਈਲ ਤੋਂ - ਐਕਸਲ (ਡਾਟਾ ਪ੍ਰਾਪਤ ਕਰੋ — ਫਾਈਲ ਤੋਂ — ਐਕਸਲ) ਅਤੇ ਇਕੱਠੀ ਕੀਤੀ ਜਾਣ ਵਾਲੀ ਟੇਬਲ ਦੇ ਨਾਲ ਸਰੋਤ ਫਾਈਲ ਨੂੰ ਨਿਸ਼ਚਿਤ ਕਰੋ:

ਦਿਖਾਈ ਦੇਣ ਵਾਲੀ ਵਿੰਡੋ ਵਿੱਚ, ਕੋਈ ਵੀ ਸ਼ੀਟ ਚੁਣੋ (ਇਸ ਨਾਲ ਕੋਈ ਫਰਕ ਨਹੀਂ ਪੈਂਦਾ ਕਿ ਕਿਹੜੀ ਇੱਕ) ਅਤੇ ਹੇਠਾਂ ਦਿੱਤੇ ਬਟਨ ਨੂੰ ਦਬਾਓ ਬਦਲੋ (ਸੰਪਾਦਿਤ):

ਪਾਵਰ ਕਿਊਰੀ ਕਿਊਰੀ ਐਡੀਟਰ ਵਿੰਡੋ ਐਕਸਲ ਦੇ ਸਿਖਰ 'ਤੇ ਖੁੱਲ੍ਹਣੀ ਚਾਹੀਦੀ ਹੈ। ਪੈਨਲ 'ਤੇ ਵਿੰਡੋ ਦੇ ਸੱਜੇ ਪਾਸੇ ਮਾਪਦੰਡਾਂ ਦੀ ਬੇਨਤੀ ਕਰੋ ਪਹਿਲੇ ਨੂੰ ਛੱਡ ਕੇ ਸਾਰੇ ਸਵੈਚਲਿਤ ਤੌਰ 'ਤੇ ਬਣਾਏ ਗਏ ਕਦਮਾਂ ਨੂੰ ਮਿਟਾਓ - ਸਰੋਤ (ਸਰੋਤ):

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

ਕਾਲਮ ਨੂੰ ਛੱਡ ਕੇ ਸਾਰੇ ਕਾਲਮ ਮਿਟਾਓ ਡੇਟਾਇੱਕ ਕਾਲਮ ਸਿਰਲੇਖ ਨੂੰ ਸੱਜਾ-ਕਲਿੱਕ ਕਰਕੇ ਅਤੇ ਚੁਣ ਕੇ ਹੋਰ ਕਾਲਮ ਮਿਟਾਓ (ਹਟਾਓ ਹੋਰ ਕਾਲਮ):

ਫਿਰ ਤੁਸੀਂ ਕਾਲਮ (ਚੈਕਬਾਕਸ) ਦੇ ਸਿਖਰ 'ਤੇ ਡਬਲ ਐਰੋ 'ਤੇ ਕਲਿੱਕ ਕਰਕੇ ਇਕੱਠੀਆਂ ਕੀਤੀਆਂ ਟੇਬਲਾਂ ਦੀ ਸਮੱਗਰੀ ਦਾ ਵਿਸਤਾਰ ਕਰ ਸਕਦੇ ਹੋ। ਮੂਲ ਕਾਲਮ ਨਾਮ ਨੂੰ ਅਗੇਤਰ ਵਜੋਂ ਵਰਤੋ ਤੁਸੀਂ ਇਸਨੂੰ ਬੰਦ ਕਰ ਸਕਦੇ ਹੋ):

ਜੇ ਤੁਸੀਂ ਸਭ ਕੁਝ ਸਹੀ ਢੰਗ ਨਾਲ ਕੀਤਾ ਹੈ, ਤਾਂ ਇਸ ਬਿੰਦੂ 'ਤੇ ਤੁਹਾਨੂੰ ਇੱਕ ਦੂਜੇ ਦੇ ਹੇਠਾਂ ਇਕੱਠੀਆਂ ਕੀਤੀਆਂ ਸਾਰੀਆਂ ਟੇਬਲਾਂ ਦੀ ਸਮੱਗਰੀ ਦੇਖਣੀ ਚਾਹੀਦੀ ਹੈ:

ਇਹ ਬਟਨ ਨਾਲ ਸਾਰਣੀ ਦੇ ਸਿਰਲੇਖ ਤੱਕ ਪਹਿਲੀ ਕਤਾਰ ਨੂੰ ਵਧਾਉਣਾ ਰਹਿੰਦਾ ਹੈ ਸਿਰਲੇਖਾਂ ਵਜੋਂ ਪਹਿਲੀ ਲਾਈਨ ਦੀ ਵਰਤੋਂ ਕਰੋ (ਸਿਰਲੇਖਾਂ ਵਜੋਂ ਪਹਿਲੀ ਕਤਾਰ ਦੀ ਵਰਤੋਂ ਕਰੋ) ਟੈਬ ਮੁੱਖ (ਘਰ) ਅਤੇ ਫਿਲਟਰ ਦੀ ਵਰਤੋਂ ਕਰਦੇ ਹੋਏ ਡੇਟਾ ਤੋਂ ਡੁਪਲੀਕੇਟ ਟੇਬਲ ਹੈਡਰ ਹਟਾਓ:

ਕਮਾਂਡ ਨਾਲ ਕੀਤੀ ਹਰ ਚੀਜ਼ ਨੂੰ ਸੁਰੱਖਿਅਤ ਕਰੋ ਬੰਦ ਕਰੋ ਅਤੇ ਲੋਡ ਕਰੋ - ਬੰਦ ਕਰੋ ਅਤੇ ਲੋਡ ਕਰੋ… (ਬੰਦ ਕਰੋ ਅਤੇ ਲੋਡ ਕਰੋ - ਬੰਦ ਕਰੋ ਅਤੇ ਲੋਡ ਕਰੋ…) ਟੈਬ ਮੁੱਖ (ਘਰ), ਅਤੇ ਖੁੱਲਣ ਵਾਲੀ ਵਿੰਡੋ ਵਿੱਚ, ਵਿਕਲਪ ਦੀ ਚੋਣ ਕਰੋ ਸਿਰਫ਼ ਕੁਨੈਕਸ਼ਨ (ਕੇਵਲ ਕੁਨੈਕਸ਼ਨ):

ਸਭ ਕੁਝ। ਇਹ ਸਿਰਫ ਇੱਕ ਸੰਖੇਪ ਬਣਾਉਣ ਲਈ ਰਹਿੰਦਾ ਹੈ. ਅਜਿਹਾ ਕਰਨ ਲਈ, ਟੈਬ 'ਤੇ ਜਾਓ ਪਾਓ - PivotTable (ਸੰਮਿਲਿਤ ਕਰੋ — ਧਰੁਵੀ ਸਾਰਣੀ), ਵਿਕਲਪ ਚੁਣੋ ਬਾਹਰੀ ਡਾਟਾ ਸਰੋਤ ਦੀ ਵਰਤੋਂ ਕਰੋ (ਬਾਹਰੀ ਡਾਟਾ ਸਰੋਤ ਵਰਤੋ)ਅਤੇ ਫਿਰ ਬਟਨ ਨੂੰ ਦਬਾ ਕੇ ਕਨੈਕਸ਼ਨ ਚੁਣੋ, ਸਾਡੀ ਬੇਨਤੀ। ਧਰੁਵੀ ਦੀ ਹੋਰ ਰਚਨਾ ਅਤੇ ਸੰਰਚਨਾ ਪੂਰੀ ਤਰ੍ਹਾਂ ਮਿਆਰੀ ਤਰੀਕੇ ਨਾਲ ਉਹਨਾਂ ਖੇਤਰਾਂ ਨੂੰ ਕਤਾਰਾਂ, ਕਾਲਮਾਂ ਅਤੇ ਮੁੱਲਾਂ ਵਾਲੇ ਖੇਤਰ ਵਿੱਚ ਖਿੱਚ ਕੇ ਵਾਪਰਦੀ ਹੈ:

ਜੇਕਰ ਭਵਿੱਖ ਵਿੱਚ ਸਰੋਤ ਡੇਟਾ ਬਦਲਦਾ ਹੈ ਜਾਂ ਕੁਝ ਹੋਰ ਸਟੋਰ ਸ਼ੀਟਾਂ ਜੋੜੀਆਂ ਜਾਂਦੀਆਂ ਹਨ, ਤਾਂ ਇਹ ਕਮਾਂਡ ਦੀ ਵਰਤੋਂ ਕਰਕੇ ਪੁੱਛਗਿੱਛ ਅਤੇ ਸਾਡੇ ਸੰਖੇਪ ਨੂੰ ਅਪਡੇਟ ਕਰਨ ਲਈ ਕਾਫ਼ੀ ਹੋਵੇਗਾ ਸਭ ਨੂੰ ਤਾਜ਼ਾ ਕਰੋ ਟੈਬ ਡੇਟਾ (ਡਾਟਾ — ਸਭ ਨੂੰ ਤਾਜ਼ਾ ਕਰੋ).

ਢੰਗ 2. ਅਸੀਂ ਇੱਕ ਮੈਕਰੋ ਵਿੱਚ UNION SQL ਕਮਾਂਡ ਨਾਲ ਟੇਬਲਾਂ ਨੂੰ ਜੋੜਦੇ ਹਾਂ

ਸਾਡੀ ਸਮੱਸਿਆ ਦਾ ਇੱਕ ਹੋਰ ਹੱਲ ਇਸ ਮੈਕਰੋ ਦੁਆਰਾ ਦਰਸਾਇਆ ਗਿਆ ਹੈ, ਜੋ ਕਮਾਂਡ ਦੀ ਵਰਤੋਂ ਕਰਕੇ ਪਿਵਟ ਟੇਬਲ ਲਈ ਇੱਕ ਡੇਟਾ ਸੈੱਟ (ਕੈਸ਼) ਬਣਾਉਂਦਾ ਹੈ। ਇਕਤਾ SQL ਪੁੱਛਗਿੱਛ ਭਾਸ਼ਾ। ਇਹ ਕਮਾਂਡ ਐਰੇ ਵਿੱਚ ਦਰਸਾਏ ਗਏ ਸਾਰੇ ਟੇਬਲਾਂ ਨੂੰ ਜੋੜਦੀ ਹੈ ਸ਼ੀਟਨਾਮ ਇੱਕ ਸਿੰਗਲ ਡਾਟਾ ਸਾਰਣੀ ਵਿੱਚ ਕਿਤਾਬ ਦੀਆਂ ਸ਼ੀਟਾਂ। ਯਾਨੀ ਕਿ ਵੱਖ-ਵੱਖ ਸ਼ੀਟਾਂ ਤੋਂ ਲੈ ਕੇ ਇੱਕ ਤੱਕ ਰੇਂਜ ਨੂੰ ਭੌਤਿਕ ਤੌਰ 'ਤੇ ਕਾਪੀ ਅਤੇ ਪੇਸਟ ਕਰਨ ਦੀ ਬਜਾਏ, ਅਸੀਂ ਕੰਪਿਊਟਰ ਦੀ ਰੈਮ ਵਿੱਚ ਅਜਿਹਾ ਕਰਦੇ ਹਾਂ। ਫਿਰ ਮੈਕਰੋ ਦਿੱਤੇ ਨਾਮ ਨਾਲ ਇੱਕ ਨਵੀਂ ਸ਼ੀਟ ਜੋੜਦਾ ਹੈ (ਵੇਰੀਏਬਲ ResultSheetName) ਅਤੇ ਇਕੱਠੀ ਕੀਤੀ ਕੈਸ਼ ਦੇ ਅਧਾਰ 'ਤੇ ਇਸ 'ਤੇ ਇੱਕ ਪੂਰਾ (!) ਸੰਖੇਪ ਬਣਾਉਂਦਾ ਹੈ।

ਮੈਕਰੋ ਦੀ ਵਰਤੋਂ ਕਰਨ ਲਈ, ਟੈਬ 'ਤੇ ਵਿਜ਼ੂਅਲ ਬੇਸਿਕ ਬਟਨ ਦੀ ਵਰਤੋਂ ਕਰੋ ਡਿਵੈਲਪਰ (ਡਿਵੈਲਪਰ) ਜਾਂ ਕੀਬੋਰਡ ਸ਼ਾਰਟਕੱਟ Alt+F11. ਫਿਰ ਅਸੀਂ ਮੀਨੂ ਰਾਹੀਂ ਇੱਕ ਨਵਾਂ ਖਾਲੀ ਮੋਡੀਊਲ ਪਾਵਾਂਗੇ ਸੰਮਿਲਿਤ ਕਰੋ - ਮੋਡੀਊਲ ਅਤੇ ਹੇਠਾਂ ਦਿੱਤੇ ਕੋਡ ਨੂੰ ਉੱਥੇ ਕਾਪੀ ਕਰੋ:

ਸਬ New_Multi_Table_Pivot() Dim i As long dim arSQL() as ਸਟ੍ਰਿੰਗ ਡਿਮ objPivotCache as PivotCache ਡਿਮ objRS ਆਬਜੈਕਟ ਡਿਮ ਰਿਜ਼ਲਟ ਸ਼ੀਟਨਾਮ ਦੇ ਰੂਪ ਵਿੱਚ ਸਟ੍ਰਿੰਗ ਡਿਮ ਸ਼ੀਟਸਨਾਮ ਵੇਰੀਐਂਟ 'ਸ਼ੀਟ ਨਾਮ ਦੇ ਤੌਰ 'ਤੇ ਜਿੱਥੇ ਨਤੀਜਾ ਪਾਈਵੋਟ ਪ੍ਰਦਰਸ਼ਿਤ ਕੀਤਾ ਜਾਵੇਗਾ' ਦਾ ਨਤੀਜਾ' arSheetN = "arSheetName" ਸਰੋਤ ਟੇਬਲ ਵਾਲੇ ਨਾਮ SheetsNames = Array("Alpha", "Beta", "Gamma", "Delta") 'ਅਸੀਂ ActiveWorkbook ReDim arSQL(1 ਤੋਂ (UBound(SheetsNames) + 1) ਨਾਲ SheetsNames ਤੋਂ ਸ਼ੀਟਾਂ ਤੋਂ ਟੇਬਲਾਂ ਲਈ ਇੱਕ ਕੈਸ਼ ਬਣਾਉਂਦੇ ਹਾਂ। ) i = LBound (SheetsNames) ਤੋਂ UBound(SheetsNames) arSQL(i + 1) = "ਚੁਣੋ * FROM [" & SheetsNames(i) & "$]" ਲਈ ਅੱਗੇ i ਸੈਟ objRS = CreateObject("ADODB.Recordset") objRS .Open Join$( arSQL, "UNION ALL"), _ Join$(Array("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=", _ .FullName,";Extended Properties=""Excel 8.0;" ""), vbNullString ) 'ਤੇ ਨਤੀਜੇ ਵਾਲੀ ਪਿਵੋਟ ਸਾਰਣੀ ਨੂੰ ਪ੍ਰਦਰਸ਼ਿਤ ਕਰਨ ਲਈ ਸ਼ੀਟ ਮੁੜ-ਬਣਾਓ ਨਾਲ ਸਮਾਪਤ ਕਰੋ ਅਗਲੀ ਐਪਲੀਕੇਸ਼ਨ ਨੂੰ ਮੁੜ ਸ਼ੁਰੂ ਕਰੋ। ਡਿਸਪਲੇਅ ਅਲਰਟ = ਗਲਤ ਵਰਕਸ਼ੀਟਾਂ(ਨਤੀਜਾਸ਼ੀਟ ਨਾਮ)। ਸੈੱਟ wsPivot = ਵਰਕਸ਼ੀਟਾਂ ਨੂੰ ਮਿਟਾਓ। wsPivo ਸ਼ਾਮਲ ਕਰੋ। ਟੀ. Name = ResultSheetName 'ਇਸ ਸ਼ੀਟ 'ਤੇ ਤਿਆਰ ਕੀਤਾ ਕੈਸ਼ ਸਾਰਾਂਸ਼ ਪ੍ਰਦਰਸ਼ਿਤ ਕਰੋ objPivotCache = ActiveWorkbook.PivotCaches.Add(xlExternal) ਸੈੱਟ ਕਰੋ objPivotCache.Recordset = objRS ਸੈੱਟ objRS = wsPivotAcht3 ਦੇ ਨਾਲ ਕੁਝ ਨਹੀਂ। objPivotCache = Nothing Range("A3")। ਅੰਤ ਸਬ ਦੇ ਨਾਲ ਅੰਤ ਨੂੰ ਚੁਣੋ    

ਮੁਕੰਮਲ ਹੋਏ ਮੈਕਰੋ ਨੂੰ ਫਿਰ ਕੀਬੋਰਡ ਸ਼ਾਰਟਕੱਟ ਨਾਲ ਚਲਾਇਆ ਜਾ ਸਕਦਾ ਹੈ Alt+F8 ਜਾਂ ਟੈਬ 'ਤੇ ਮੈਕਰੋ ਬਟਨ ਡਿਵੈਲਪਰ (ਵਿਕਾਸਕਾਰ - ਮੈਕਰੋਜ਼).

ਇਸ ਪਹੁੰਚ ਦੇ ਨੁਕਸਾਨ:

• ਡਾਟਾ ਅੱਪਡੇਟ ਨਹੀਂ ਕੀਤਾ ਗਿਆ ਹੈ ਕਿਉਂਕਿ ਕੈਸ਼ ਦਾ ਸਰੋਤ ਟੇਬਲ ਨਾਲ ਕੋਈ ਕਨੈਕਸ਼ਨ ਨਹੀਂ ਹੈ। ਜੇਕਰ ਤੁਸੀਂ ਸਰੋਤ ਡੇਟਾ ਨੂੰ ਬਦਲਦੇ ਹੋ, ਤਾਂ ਤੁਹਾਨੂੰ ਮੈਕਰੋ ਨੂੰ ਦੁਬਾਰਾ ਚਲਾਉਣਾ ਚਾਹੀਦਾ ਹੈ ਅਤੇ ਦੁਬਾਰਾ ਸੰਖੇਪ ਬਣਾਉਣਾ ਚਾਹੀਦਾ ਹੈ।
• ਸ਼ੀਟਾਂ ਦੀ ਗਿਣਤੀ ਨੂੰ ਬਦਲਦੇ ਸਮੇਂ, ਮੈਕਰੋ ਕੋਡ (ਐਰੇ ਸ਼ੀਟਨਾਮ).
  

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

ਉੱਥੇ!

ਤਕਨੀਕੀ ਨੋਟ: ਜੇਕਰ ਤੁਹਾਨੂੰ ਮੈਕਰੋ ਚਲਾਉਣ ਵੇਲੇ "ਪ੍ਰੋਵਾਈਡਰ ਰਜਿਸਟਰਡ ਨਹੀਂ" ਵਰਗੀ ਗਲਤੀ ਮਿਲਦੀ ਹੈ, ਤਾਂ ਸੰਭਾਵਤ ਤੌਰ 'ਤੇ ਤੁਹਾਡੇ ਕੋਲ ਐਕਸਲ ਦਾ 64-ਬਿੱਟ ਸੰਸਕਰਣ ਹੈ ਜਾਂ Office ਦਾ ਅਧੂਰਾ ਸੰਸਕਰਣ ਸਥਾਪਤ ਹੈ (ਕੋਈ ਪਹੁੰਚ ਨਹੀਂ)। ਸਥਿਤੀ ਨੂੰ ਠੀਕ ਕਰਨ ਲਈ, ਮੈਕਰੋ ਕੋਡ ਵਿੱਚ ਟੁਕੜੇ ਨੂੰ ਬਦਲੋ:

	 ਪ੍ਰਦਾਤਾ=Microsoft.Jet.OLEDB.4.0;  

:

	ਪ੍ਰਦਾਤਾ=Microsoft.ACE.OLEDB.12.0;  

ਅਤੇ ਮਾਈਕ੍ਰੋਸਾਫਟ ਵੈਬਸਾਈਟ ਤੋਂ ਐਕਸੈਸ ਤੋਂ ਮੁਫਤ ਡੇਟਾ ਪ੍ਰੋਸੈਸਿੰਗ ਇੰਜਣ ਨੂੰ ਡਾਉਨਲੋਡ ਅਤੇ ਸਥਾਪਿਤ ਕਰੋ - ਮਾਈਕ੍ਰੋਸਾਫਟ ਐਕਸੈਸ ਡੇਟਾਬੇਸ ਇੰਜਨ 2010 ਰੀਡਿਸਟ੍ਰੀਬਿਊਟੇਬਲ

ਢੰਗ 3: ਐਕਸਲ ਦੇ ਪੁਰਾਣੇ ਸੰਸਕਰਣਾਂ ਤੋਂ PivotTable ਵਿਜ਼ਾਰਡ ਨੂੰ ਇਕਸਾਰ ਕਰੋ

ਇਹ ਤਰੀਕਾ ਥੋੜਾ ਪੁਰਾਣਾ ਹੈ, ਪਰ ਫਿਰ ਵੀ ਵਰਣਨ ਯੋਗ ਹੈ. ਰਸਮੀ ਤੌਰ 'ਤੇ, 2003 ਤੱਕ ਅਤੇ ਸਮੇਤ ਸਾਰੇ ਸੰਸਕਰਣਾਂ ਵਿੱਚ, PivotTable ਵਿਜ਼ਾਰਡ ਵਿੱਚ "ਕਈ ਏਕੀਕਰਨ ਰੇਂਜਾਂ ਲਈ ਇੱਕ ਧਰੁਵੀ ਬਣਾਉਣ" ਲਈ ਇੱਕ ਵਿਕਲਪ ਸੀ। ਹਾਲਾਂਕਿ, ਇਸ ਤਰੀਕੇ ਨਾਲ ਬਣਾਈ ਗਈ ਇੱਕ ਰਿਪੋਰਟ, ਬਦਕਿਸਮਤੀ ਨਾਲ, ਸਿਰਫ ਇੱਕ ਅਸਲੀ ਸੰਪੂਰਨ ਸੰਖੇਪ ਦੀ ਤਰਸਯੋਗ ਪ੍ਰਤੀਕ ਹੋਵੇਗੀ ਅਤੇ ਰਵਾਇਤੀ ਧਰੁਵੀ ਸਾਰਣੀਆਂ ਦੇ ਬਹੁਤ ਸਾਰੇ "ਚਿਪਸ" ਦਾ ਸਮਰਥਨ ਨਹੀਂ ਕਰਦੀ ਹੈ:

ਅਜਿਹੇ ਇੱਕ ਧਰੁਵੀ ਵਿੱਚ, ਫੀਲਡ ਸੂਚੀ ਵਿੱਚ ਕੋਈ ਕਾਲਮ ਸਿਰਲੇਖ ਨਹੀਂ ਹਨ, ਕੋਈ ਲਚਕਦਾਰ ਬਣਤਰ ਸੈਟਿੰਗ ਨਹੀਂ ਹੈ, ਵਰਤੇ ਗਏ ਫੰਕਸ਼ਨਾਂ ਦਾ ਸੈੱਟ ਸੀਮਤ ਹੈ, ਅਤੇ, ਆਮ ਤੌਰ 'ਤੇ, ਇਹ ਸਭ ਇੱਕ ਧਰੁਵੀ ਸਾਰਣੀ ਦੇ ਸਮਾਨ ਨਹੀਂ ਹੈ। ਸ਼ਾਇਦ ਇਸੇ ਕਰਕੇ, 2007 ਵਿੱਚ ਸ਼ੁਰੂ ਕਰਦੇ ਹੋਏ, ਮਾਈਕ੍ਰੋਸਾਫਟ ਨੇ ਇਸ ਫੰਕਸ਼ਨ ਨੂੰ ਸਟੈਂਡਰਡ ਡਾਇਲਾਗ ਤੋਂ ਹਟਾ ਦਿੱਤਾ ਸੀ ਜਦੋਂ ਪੀਵੋਟ ਟੇਬਲ ਰਿਪੋਰਟਾਂ ਬਣਾਉਂਦੇ ਸਨ। ਹੁਣ ਇਹ ਵਿਸ਼ੇਸ਼ਤਾ ਸਿਰਫ਼ ਇੱਕ ਕਸਟਮ ਬਟਨ ਰਾਹੀਂ ਉਪਲਬਧ ਹੈ PivotTable ਸਹਾਇਕ(ਪਿਵਟ ਟੇਬਲ ਵਿਜ਼ਾਰਡ), ਜਿਸ ਨੂੰ, ਜੇਕਰ ਲੋੜ ਹੋਵੇ, ਦੁਆਰਾ ਤਤਕਾਲ ਪਹੁੰਚ ਟੂਲਬਾਰ ਵਿੱਚ ਜੋੜਿਆ ਜਾ ਸਕਦਾ ਹੈ ਫਾਈਲ - ਵਿਕਲਪ - ਤਤਕਾਲ ਪਹੁੰਚ ਟੂਲਬਾਰ ਨੂੰ ਅਨੁਕੂਲਿਤ ਕਰੋ - ਸਾਰੀਆਂ ਕਮਾਂਡਾਂ (ਫਾਈਲ — ਵਿਕਲਪ — ਤਤਕਾਲ ਪਹੁੰਚ ਟੂਲਬਾਰ ਨੂੰ ਅਨੁਕੂਲਿਤ ਕਰੋ — ਸਾਰੀਆਂ ਕਮਾਂਡਾਂ):

ਸ਼ਾਮਲ ਕੀਤੇ ਬਟਨ 'ਤੇ ਕਲਿੱਕ ਕਰਨ ਤੋਂ ਬਾਅਦ, ਤੁਹਾਨੂੰ ਵਿਜ਼ਾਰਡ ਦੇ ਪਹਿਲੇ ਪੜਾਅ 'ਤੇ ਉਚਿਤ ਵਿਕਲਪ ਦੀ ਚੋਣ ਕਰਨ ਦੀ ਲੋੜ ਹੈ:

ਅਤੇ ਫਿਰ ਅਗਲੀ ਵਿੰਡੋ ਵਿੱਚ, ਹਰ ਇੱਕ ਰੇਂਜ ਨੂੰ ਬਦਲੇ ਵਿੱਚ ਚੁਣੋ ਅਤੇ ਇਸਨੂੰ ਆਮ ਸੂਚੀ ਵਿੱਚ ਸ਼ਾਮਲ ਕਰੋ:

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

• PivotTables ਨਾਲ ਰਿਪੋਰਟਾਂ ਬਣਾਉਣਾ
• PivotTables ਵਿੱਚ ਗਣਨਾਵਾਂ ਸੈੱਟਅੱਪ ਕਰੋ
• ਮੈਕਰੋ ਕੀ ਹਨ, ਉਹਨਾਂ ਦੀ ਵਰਤੋਂ ਕਿਵੇਂ ਕਰਨੀ ਹੈ, VBA ਕੋਡ ਕਿੱਥੇ ਕਾਪੀ ਕਰਨਾ ਹੈ, ਆਦਿ।
• ਮਲਟੀਪਲ ਸ਼ੀਟਾਂ ਤੋਂ ਇੱਕ ਤੱਕ ਡੇਟਾ ਸੰਗ੍ਰਹਿ (PLEX ਐਡ-ਆਨ)