VBA更改圖表中的數據標簽-兼容btw Excel 2013和2010

Question

我做了一個宏來更改儀表板中圖表標簽的數字格式，因為值可以是數千或數百萬。 在我的代碼中，我已經將僅在Excel 2013和更高版本中存在的對象FullSeriesCollection更改為SeriesCollection。 但是，當我在Excel 2010中運行代碼時，仍然遇到問題，因為自定義數字格式代碼帶來了完全不同的結果。

跟隨VBA數百萬人

    Sheets("Gráficos").ChartObjects("n2_resultado").Activate
ActiveChart.SeriesCollection(1).DataLabels.Select
    Selection.NumberFormat = "#.##0,0..;-#.##0,0..;"""""
ActiveChart.SeriesCollection(2).DataLabels.Select
    Selection.NumberFormat = "#.##0,0..;-#.##0,0..;"""""
ActiveChart.SeriesCollection(3).DataLabels.Select
    Selection.NumberFormat = "#.##0,0..;-#.##0,0..;"""""
ActiveChart.SeriesCollection(4).DataLabels.Select
    Selection.NumberFormat = "#.##0,0..;-#.##0,0..;"""""
ActiveChart.SeriesCollection(5).DataLabels.Select
    Selection.NumberFormat = "#.##0,0..;-#.##0,0..;"""""
ActiveChart.SeriesCollection(6).DataLabels.Select
    Selection.NumberFormat = "#.##0,0..;-#.##0,0..;"""""

對於數千個值，數字格式代碼是這樣的：

"#.##0,0.;-#.##0,0.;"""""

我無法輕松訪問Excel 2010，但昨天一瞥，似乎我們在屋前使用的代碼在屋后無法使用。

任何想法我該如何解決？

注意：“Gráficos”是葡萄牙語中的“圖表”一詞，在巴西，我們使用點作為千位分隔符，並使用逗號表示小數點（世界上大多數情況相反）

這是我得到的凌亂圖表

Answer 1

對於宏中的數字格式代碼，Excel 2010和2013的工作方式似乎有所不同。 由於我對Excel 2010的訪問受限，解決方案是復制圖表，根據需要更改標簽，然后切換宏以僅顯示帶有百萬/千標簽的圖表。