改成
Tables("月度资金计划偏差分析_Table2").DataSource = DataTables("月度资金计划执行部门分析")
Tables("月度资金计划执行部门分析").DataTable.DataCols("偏差率").SetFormat("0.00%")