主题：修改

副本表1是主表，副本表2是明细表，关联字段为“编号”
副本表2的跨表计算，对表2的每一行的“运费”列——
B的运费=B的总体积/A的总体积*A的总共运费
If Tables("窗口_Table1").Cols("总体积") > 0 Then
    For Each a As Row In Tables("窗口_Table2")
        a.Cols("运费") = a.Cols("总体积")/Tables("窗口_Table1").Cols("总体积") * Tables("窗口_Table1").Cols("运费")
    Next
Else
    Tables("窗口_Table2").cols("运费") = Nothing
End If

Dim r As Row = Tables("窗口_Table1").current
If r("总体积") > 0 Then
    For Each a As Row In Tables("窗口_Table2").Rows
        a("运费") = a("总体积")/r("总体积") * r("运费")
    Next
Else
    For Each a As Row In Tables("窗口_Table2").Rows
        a("运费") = Nothing
    Next
End If

 谢谢