ਇਸਦੇ ਡੇਟਾ ਵਾਲੇ ਸੈੱਲਾਂ ਤੋਂ ਇੱਕ ਚਾਰਟ ਦਾ ਰੰਗ

ਸਮੱਸਿਆ ਦਾ ਗਠਨ

ਮੈਂ ਹਿਸਟੋਗ੍ਰਾਮ (ਜਾਂ ਪਾਈ ਚਾਰਟ 'ਤੇ ਟੁਕੜੇ, ਆਦਿ) ਦੇ ਕਾਲਮਾਂ ਨੂੰ ਆਪਣੇ ਆਪ ਹੀ ਰੰਗ ਪ੍ਰਾਪਤ ਕਰਨਾ ਚਾਹਾਂਗਾ ਜੋ ਸਰੋਤ ਡੇਟਾ ਨਾਲ ਸੰਬੰਧਿਤ ਸੈੱਲਾਂ ਨੂੰ ਭਰਨ ਲਈ ਵਰਤਿਆ ਗਿਆ ਸੀ:

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

ਮੈਨੂੰ ਲਗਦਾ ਹੈ ਕਿ ਤੁਹਾਨੂੰ ਇਹ ਵਿਚਾਰ ਮਿਲਦਾ ਹੈ, ਠੀਕ ਹੈ?

ਦਾ ਹੱਲ

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

Sub SetChartColorsFromDataCells() ਜੇਕਰ TypeName(ਚੋਣ) <> "ਚਾਰਟ ਏਰੀਆ" ਤਾਂ MsgBox "Сначала выделите диаграмму!" ਸਬ ਐਂਡ ਤੋਂ ਬਾਹਰ ਨਿਕਲੋ ਜੇਕਰ c = ActiveChart for j = 1 ਨੂੰ c.SeriesCollection.Count f = c.SeriesCollection(j) ਲਈ ਸੈੱਟ ਕਰੋ। ਫਾਰਮੂਲਾ m ​​= Split(f, ",") i ਲਈ r = ਰੇਂਜ(m(2)) ਸੈੱਟ ਕਰੋ = 1 ਤੱਕ  

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

ਅਤੇ ਬਟਨ ਨਾਲ ਸਾਡੇ ਮੈਕਰੋ ਨੂੰ ਚਲਾਓ ਮੈਕਰੋ ਟੈਬ ਡਿਵੈਲਪਰ (ਵਿਕਾਸਕਾਰ - ਮੈਕਰੋਜ਼) ਜਾਂ ਕੀਬੋਰਡ ਸ਼ਾਰਟਕੱਟ ਨਾਲ Alt + F8. ਉਸੇ ਵਿੰਡੋ ਵਿੱਚ, ਅਕਸਰ ਵਰਤੋਂ ਦੇ ਮਾਮਲੇ ਵਿੱਚ, ਤੁਸੀਂ ਬਟਨ ਦੀ ਵਰਤੋਂ ਕਰਕੇ ਮੈਕਰੋ ਲਈ ਇੱਕ ਕੀਬੋਰਡ ਸ਼ਾਰਟਕੱਟ ਨਿਰਧਾਰਤ ਕਰ ਸਕਦੇ ਹੋ ਪੈਰਾਮੀਟਰ (ਵਿਕਲਪ).

PS

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

  • ਮੈਕਰੋ ਕੀ ਹਨ, ਉਹਨਾਂ ਦੀ ਵਰਤੋਂ ਕਿਵੇਂ ਕਰਨੀ ਹੈ, ਵਿਜ਼ੂਅਲ ਬੇਸਿਕ ਵਿੱਚ ਮੈਕਰੋ ਕੋਡ ਕਿੱਥੇ ਪਾਉਣਾ ਹੈ
  • ਐਕਸਲ 2007-2013 ਵਿੱਚ ਸ਼ਰਤੀਆ ਫਾਰਮੈਟਿੰਗ
  • ਐਕਸਲ 2013 ਵਿੱਚ ਚਾਰਟਸ ਵਿੱਚ ਨਵਾਂ ਕੀ ਹੈ

ਕੋਈ ਜਵਾਬ ਛੱਡਣਾ