קאָליר פון אַ טשאַרט פון סעלז מיט זייַן דאַטן

פאָרמולאַטיאָן פון די פּראָבלעם

איך וואָלט ווי די שפאלטן אויף די כיסטאַגראַם (אָדער סלייסיז אויף די פּיראָג טשאַרט, אאז"ו ו) צו אויטאָמאַטיש האָבן די קאָליר וואָס איז געניצט צו פּלאָמבירן די קאָראַספּאַנדינג סעלז מיט די מקור דאַטן:

אַנטיסאַפּייטינג די סאַפּרייזד און ופגעבראַכט געשריי פון יחיד קאַמראַדז, עס זאָל זיין אנגעוויזן אַז, פון קורס, די קאָליר פון די פּלאָמבירן אין די דיאַגראַמע קענען אויך זיין טשיינדזשד מאַניואַלי (רעכט גיט אויף די זייַל - פונט / סעריע פֿאָרמאַט (פאָרמאַט דאַטן פונט / סעריע) וכו' — טענהט קיינער נישט. אָבער אין פיר, עס זענען אַ פּלאַץ פון סיטואַטיאָנס ווען עס איז גרינגער און מער באַקוועם צו טאָן דאָס גלייך אין די סעלז מיט דאַטן, און דעמאָלט דער טשאַרט זאָל זיין ריפּיינטיד אויטאָמאַטיש. פּרוּווט, למשל, צו שטעלן די פילונג לויט געגנט פֿאַר די שפאלטן אין דעם טשאַרט:

איך טראַכטן איר באַקומען דעם געדאַנק, רעכט?

באַשייד

גאָרנישט אָבער אַ מאַקראָו קענען טאָן דאָס. דעריבער, מיר עפענען וויסואַל באַסיק רעדאַקטאָר פון די קוויטל דעוועלאָפּער (דעוועלאָפּער - וויסואַל באַסיק עדיטאָר) אָדער דריקן די קלאַוויאַטור דורכוועג אַלט + פקסנומקס, אַרייַנלייגן אַ נייַ ליידיק מאָדולע דורך די מעניו אַרייַנלייגן - מאָדולע און נאָכמאַכן דעם טעקסט פון אַזאַ אַ מאַקראָו דאָרט, וואָס וועט טאָן אַלע די אַרבעט:

Sub SetChartColorsFromDataCells() אויב טיפּנאַמע(סעלעקציע) <> "ChartArea" דערנאָך MsgBox "Сначала выделите диаграмму!" אַרויסגאַנג סוב סוף אויב באַשטעטיקט c = אַקטיווטשאַרט פֿאַר דזש = 1 צו c.SeriesCollection.Count f = c.SeriesCollection (j). = 2 צו r.Cells.Count c.SeriesCollection(j).Points(i).Format.Fill.ForeColor.RGB = _ r.Cells(i).Interior.Color ווייַטער איך ווייַטער דזש סוף סוב  

איר קענען איצט פאַרמאַכן וויסואַל באַסיק און צוריקקומען צו עקססעל. ניצן די באשאפן מאַקראָו איז זייער פּשוט. אויסקלייַבן די טשאַרט (טשאַרט געגנט, ניט פּלאַנעווען געגנט, גריד אָדער שפאלטן!):

און לויפן אונדזער מאַקראָו מיט די קנעפּל מאַקראָס קוויטל דעוועלאָפּער (דעוועלאָפּער - מאַקראָס) אָדער מיט אַ קלאַוויאַטור דורכוועג אַלט + פקסנומקס. אין דער זעלביקער פֿענצטער, אין פאַל פון אָפט נוצן, איר קענען באַשטימען אַ קלאַוויאַטור דורכוועג צו די מאַקראָו מיט די קנעפּל פּאַראַמעטערס (אָפּציעס).

PS

דער בלויז פליען אין די זאלבאלל איז די ימפּאָסיביליטי פון ניצן אַ ענלעך פֿונקציע פֿאַר קאַסעס ווו די קאָליר איז אַסיינד צו די סעלז פון די מקור דאַטן ניצן קאַנדישאַנאַל פאָרמאַטטינג כּללים. צום באַדויערן, וויסואַל באַסיק האט נישט אַ געבויט-אין געצייַג פֿאַר לייענען די פארבן. עס זענען, פון קורס, זיכער "קראַטשיז", אָבער זיי טאָן ניט אַרבעט פֿאַר אַלע קאַסעס און נישט אין אַלע ווערסיעס.

  • וואָס זענען מאַקראָס, ווי צו נוצן זיי, ווו צו אַרייַנלייגן מאַקראָו קאָד אין וויסואַל באַסיק
  • קאַנדישאַנאַל פאָרמאַטטינג אין עקססעל 2007-2013
  • וואָס איז נייַ אין טשאַרץ אין עקססעל 2013

לאָזן אַ ענטפֿערן