图表显示值格式修改问题，只把OEE的这个数据格式改成百分比。

请教一下图表显示值格式修改问题，当天生产总量值的格式不变，OEE的格式要按平均的百分比显示，如果直接设置格式为百分比，两个数据都变成百分比了，帮忙看看有没办法只把OEE的这个数据格式改成百分比。

'设置子窗体中区间字段标题
    Me.子窗体!周期.Controls(0).Caption = strCaption
    Me.子窗体!类别.Controls(0).Caption = strCaptionlb
    Me.子窗体!当班生产总量之总计.Controls(0).Caption = strCaptionxm
    '根据查询条件重置子窗体记录源
    Me.子窗体.Form.RecordSource = " SELECT " & strField & " AS 周期," _
                             & strFieldlb & " AS 类别,Sum(" & strFieldxm & ") AS 当班生产总量之总计 " _
                             & " FROM qry生产日报" & strWhere _
                             & " GROUP BY " & strField & "," & strFieldlb & ";"
    '根据查询条件重置图表数据源
    Me.Graph.RowSource = " TRANSFORM Sum(" & strFieldxm & ") AS 当班生产总量之总计" _
                       & " SELECT " & strField & " AS 周期" _
                       & " FROM qry生产日报" & strWhere _
                       & " GROUP BY " & strField & "" _
                       & " PIVOT " & strFieldlb
    On Error Resume Next
    '根据区间单位重置图表中横向坐标标签的格式
    Me.Graph.Axes(xlCategory).TickLabels.NumberFormatLocal = strFormat
End Function








Private Sub Command167_Click()


   RDPCloseForm Me


End Sub






Private Sub 清除条件_Click()
    Me.开始日期 = Null
    Me.截止日期 = Null
    Me.线别 = Null
    Me.班次 = Null




    Call 执行查询
End Sub


Private Sub Form_Load()
    Call 执行查询
    Call TZLoad(Me)
End Sub


Private Sub 区间单位_AfterUpdate()
    Call 执行查询
End Sub


Private Sub 统计类别_AfterUpdate()
    Call 执行查询
End Sub


Private Sub 统计项目_AfterUpdate()
    Call 执行查询
End Sub


Private Sub 图表样式_AfterUpdate()
'选项按钮的选项值必须和下面常量的值对应
    Const xlColumnClustered = 51
    Const xlBarClustered = 57
    Const xlLine = 4
    Const xlColumnStacked = 52
    Const xl3DPieExploded = 70
    Const xlCylinderColClustered = 92


    Const xlRows = 1
    Const xlColumns = 2


    '更改图表样式
    Me.Graph.Object.ChartType = Me.图表样式


    '行列切换
    If Me.图表样式 = xl3DPieExploded Then
        Me.Graph.Object.Application.PlotBy = xlRows
    Else
        Me.Graph.Object.Application.PlotBy = xlColumns
    End If
End Sub
Private Sub Form_Resize()
Call TZsize(Me)
End Sub
点击下载此附件