生成表格以后,循环每一行,除以10000就行了
g.Build
For Each r As row in Tables("表A").Rows
r("统计美元价") = r("统计美元价")/10000
next