ಅದರ ಡೇಟಾದೊಂದಿಗೆ ಕೋಶಗಳಿಂದ ಚಾರ್ಟ್‌ನ ಬಣ್ಣ

ಸಮಸ್ಯೆಯ ಸೂತ್ರೀಕರಣ

ಹಿಸ್ಟೋಗ್ರಾಮ್‌ನಲ್ಲಿನ ಕಾಲಮ್‌ಗಳು (ಅಥವಾ ಪೈ ಚಾರ್ಟ್‌ನಲ್ಲಿನ ಸ್ಲೈಸ್‌ಗಳು, ಇತ್ಯಾದಿ.) ಮೂಲ ಡೇಟಾದೊಂದಿಗೆ ಅನುಗುಣವಾದ ಕೋಶಗಳನ್ನು ತುಂಬಲು ಬಳಸಿದ ಬಣ್ಣವನ್ನು ಸ್ವಯಂಚಾಲಿತವಾಗಿ ಹೊಂದಲು ನಾನು ಬಯಸುತ್ತೇನೆ:

ವೈಯಕ್ತಿಕ ಒಡನಾಡಿಗಳ ಆಶ್ಚರ್ಯಕರ ಮತ್ತು ಕೋಪದ ಕೂಗುಗಳನ್ನು ನಿರೀಕ್ಷಿಸುತ್ತಾ, ರೇಖಾಚಿತ್ರದಲ್ಲಿನ ಭರ್ತಿಯ ಬಣ್ಣವನ್ನು ಸಹ ಹಸ್ತಚಾಲಿತವಾಗಿ ಬದಲಾಯಿಸಬಹುದು ಎಂದು ಗಮನಿಸಬೇಕು (ಕಾಲಮ್ ಮೇಲೆ ಬಲ ಕ್ಲಿಕ್ ಮಾಡಿ - ಪಾಯಿಂಟ್/ಸರಣಿ ಸ್ವರೂಪ (ಫಾರ್ಮ್ಯಾಟ್ ಡೇಟಾ ಪಾಯಿಂಟ್/ಸರಣಿ) ಇತ್ಯಾದಿ - ಯಾರೂ ವಾದಿಸುವುದಿಲ್ಲ. ಆದರೆ ಪ್ರಾಯೋಗಿಕವಾಗಿ, ಡೇಟಾದೊಂದಿಗೆ ಕೋಶಗಳಲ್ಲಿ ನೇರವಾಗಿ ಇದನ್ನು ಮಾಡಲು ಸುಲಭ ಮತ್ತು ಹೆಚ್ಚು ಅನುಕೂಲಕರವಾದಾಗ ಬಹಳಷ್ಟು ಸಂದರ್ಭಗಳಿವೆ, ಮತ್ತು ನಂತರ ಚಾರ್ಟ್ ಅನ್ನು ಸ್ವಯಂಚಾಲಿತವಾಗಿ ಪುನಃ ಬಣ್ಣಿಸಬೇಕು. ಉದಾಹರಣೆಗೆ, ಈ ಚಾರ್ಟ್‌ನಲ್ಲಿನ ಕಾಲಮ್‌ಗಳಿಗೆ ಪ್ರದೇಶದ ಮೂಲಕ ಫಿಲ್ ಅನ್ನು ಹೊಂದಿಸಲು ಪ್ರಯತ್ನಿಸಿ:

ನೀವು ಕಲ್ಪನೆಯನ್ನು ಪಡೆದುಕೊಂಡಿದ್ದೀರಿ ಎಂದು ನಾನು ಭಾವಿಸುತ್ತೇನೆ, ಸರಿ?

ಪರಿಹಾರ

ಮ್ಯಾಕ್ರೋ ಹೊರತುಪಡಿಸಿ ಬೇರೇನೂ ಇದನ್ನು ಮಾಡಲು ಸಾಧ್ಯವಿಲ್ಲ. ಆದ್ದರಿಂದ, ನಾವು ತೆರೆಯುತ್ತೇವೆ ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಸಂಪಾದಕ ಟ್ಯಾಬ್ನಿಂದ ಡೆವಲಪರ್ (ಡೆವಲಪರ್ - ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಎಡಿಟರ್) ಅಥವಾ ಕೀಬೋರ್ಡ್ ಶಾರ್ಟ್‌ಕಟ್ ಒತ್ತಿರಿ Alt + F11, ಮೆನು ಮೂಲಕ ಹೊಸ ಖಾಲಿ ಮಾಡ್ಯೂಲ್ ಅನ್ನು ಸೇರಿಸಿ ಸೇರಿಸಿ - ಮಾಡ್ಯೂಲ್ ಮತ್ತು ಅಂತಹ ಮ್ಯಾಕ್ರೋನ ಪಠ್ಯವನ್ನು ಅಲ್ಲಿ ನಕಲಿಸಿ, ಅದು ಎಲ್ಲಾ ಕೆಲಸಗಳನ್ನು ಮಾಡುತ್ತದೆ:

Sub SetChartColorsFromDataCells() ವೇಳೆ ಟೈಪ್ ನೇಮ್(ಆಯ್ಕೆ) <> "ಚಾರ್ಟ್ ಏರಿಯಾ" ನಂತರ MsgBox "ಸ್ನಾಚಲಾ выделите диаграмму!" ಉಪ ಅಂತ್ಯದಿಂದ ನಿರ್ಗಮಿಸಿ c = ActiveChart ಫಾರ್ j = 1 ಗೆ c.SeriesCollection. ಕೌಂಟ್ f = c.SeriesCollection(j).Formula m = Split(f, ",") r = Range(m(2)) ಅನ್ನು i ಗಾಗಿ ಹೊಂದಿಸಿ = 1 r.Cells ಗೆ.ಎಣಿಕೆ c.SeriesCollection(j).Points(i).Format.Fill.ForeColor.RGB = _ r.Cells(i).Interior.Color Next i Next j End Sub  

ನೀವು ಈಗ ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಅನ್ನು ಮುಚ್ಚಬಹುದು ಮತ್ತು ಎಕ್ಸೆಲ್‌ಗೆ ಹಿಂತಿರುಗಬಹುದು. ರಚಿಸಲಾದ ಮ್ಯಾಕ್ರೋವನ್ನು ಬಳಸುವುದು ತುಂಬಾ ಸರಳವಾಗಿದೆ. ಚಾರ್ಟ್ ಅನ್ನು ಆಯ್ಕೆ ಮಾಡಿ (ಚಾರ್ಟ್ ಪ್ರದೇಶ, ಪ್ಲಾಟ್ ಪ್ರದೇಶ, ಗ್ರಿಡ್ ಅಥವಾ ಕಾಲಮ್‌ಗಳಲ್ಲ!):

ಮತ್ತು ನಮ್ಮ ಮ್ಯಾಕ್ರೋವನ್ನು ಬಟನ್‌ನೊಂದಿಗೆ ರನ್ ಮಾಡಿ ಮ್ಯಾಕ್ರೋಸ್ ಟ್ಯಾಬ್ ಡೆವಲಪರ್ (ಡೆವಲಪರ್ - ಮ್ಯಾಕ್ರೋಸ್) ಅಥವಾ ಕೀಬೋರ್ಡ್ ಶಾರ್ಟ್‌ಕಟ್‌ನೊಂದಿಗೆ Alt + F8. ಅದೇ ವಿಂಡೋದಲ್ಲಿ, ಆಗಾಗ್ಗೆ ಬಳಕೆಯ ಸಂದರ್ಭದಲ್ಲಿ, ನೀವು ಬಟನ್ ಅನ್ನು ಬಳಸಿಕೊಂಡು ಮ್ಯಾಕ್ರೋಗೆ ಕೀಬೋರ್ಡ್ ಶಾರ್ಟ್ಕಟ್ ಅನ್ನು ನಿಯೋಜಿಸಬಹುದು ನಿಯತಾಂಕಗಳನ್ನು (ಆಯ್ಕೆಗಳು).

PS

ಷರತ್ತುಬದ್ಧ ಫಾರ್ಮ್ಯಾಟಿಂಗ್ ನಿಯಮಗಳನ್ನು ಬಳಸಿಕೊಂಡು ಮೂಲ ಡೇಟಾದ ಕೋಶಗಳಿಗೆ ಬಣ್ಣವನ್ನು ನಿಗದಿಪಡಿಸಿದ ಸಂದರ್ಭಗಳಲ್ಲಿ ಇದೇ ರೀತಿಯ ಕಾರ್ಯವನ್ನು ಬಳಸುವ ಅಸಾಧ್ಯತೆಯು ಮುಲಾಮುದಲ್ಲಿನ ಏಕೈಕ ಫ್ಲೈ ಆಗಿದೆ. ದುರದೃಷ್ಟವಶಾತ್, ವಿಷುಯಲ್ ಬೇಸಿಕ್ ಈ ಬಣ್ಣಗಳನ್ನು ಓದಲು ಅಂತರ್ನಿರ್ಮಿತ ಸಾಧನವನ್ನು ಹೊಂದಿಲ್ಲ. ಸಹಜವಾಗಿ, ಕೆಲವು "ಊರುಗೋಲುಗಳು" ಇವೆ, ಆದರೆ ಅವು ಎಲ್ಲಾ ಸಂದರ್ಭಗಳಲ್ಲಿ ಕೆಲಸ ಮಾಡುವುದಿಲ್ಲ ಮತ್ತು ಎಲ್ಲಾ ಆವೃತ್ತಿಗಳಲ್ಲಿ ಅಲ್ಲ.

  • ಮ್ಯಾಕ್ರೋಗಳು ಯಾವುವು, ಅವುಗಳನ್ನು ಹೇಗೆ ಬಳಸುವುದು, ವಿಷುಯಲ್ ಬೇಸಿಕ್‌ನಲ್ಲಿ ಮ್ಯಾಕ್ರೋ ಕೋಡ್ ಅನ್ನು ಎಲ್ಲಿ ಸೇರಿಸಬೇಕು
  • ಎಕ್ಸೆಲ್ 2007-2013 ರಲ್ಲಿ ಷರತ್ತುಬದ್ಧ ಫಾರ್ಮ್ಯಾಟಿಂಗ್
  • ಎಕ್ಸೆಲ್ 2013 ರಲ್ಲಿ ಚಾರ್ಟ್‌ಗಳಲ್ಲಿ ಹೊಸದೇನಿದೆ

ಪ್ರತ್ಯುತ್ತರ ನೀಡಿ