一定要用数字替换的话,加上双引号
Dim i As IntegerFor i = 0 To 9 DataTables("数字转换").ReplaceFor("第二列", "0" & i, "[第一列] =" & i)Next