主题：再问跨表问题

狐爸您好！下面的代码"DNP预出_此批总M"列变化时，“同批剩余可支配总_正品M”没反应。

 

Dim c As DataCol=DataTables("出货规划").DataCols("DNP预出_此批总M")
Select Case e.DataCol.name
    Case "DNP生产批次","实入仓M_正品M","c"
    Dim sm As Long = DataTables("DNP入仓规划").Compute("Sum(实入仓M_正品M)","DNP生产批次= '" & e.DataRow("DNP生产批次") & "'")-DataTables("出货规划").Compute("Sum(DNP预出_此批总M)","DNP生产批次= '" & e.DataRow("DNP生产批次") & "'")
    DataTables("DNP入仓规划").ReplaceFor("同批剩余可支配总_正品M",sm, "DNP生产批次= '" & e.DataRow("DNP生产批次") & "'")
End Select

 

"DNP生产批次","实入仓M_正品M"这两列变化都有反应，就是"c"变化没有反应（我主要是想让Case除了引用自己表“DNP入仓规划”中的"DNP生产批次","实入仓M_正品M"外，还引用"出货规划"表中的"DNP预出_此批总M"）

 

麻烦老师看看！

谢谢，思路不乱，我首先引用了自身表的两列("DNP生产批次","实入仓M_正品M")任意列的变化而使("同批剩余可支配总_正品M"）列变化，现在我还想让另表

 

 

（"出货规划")中("DNP预出_此批总M")列变化时也能使("同批剩余可支配总_正品M"）列变化

Dim c As DataCol=DataTables("出货规划").DataCols("DNP预出_此批总M")
Select Case e.DataCol.name
    Case "DNP生产批次","实入仓M_正品M","c"

将上述代码转换一下，真正思路上的意思是：

Select Case e.DataCol.name
    Case "DNP生产批次","实入仓M_正品M","DataTables("出货规划").DataCols("DNP预出_此批总M")"

狐爸让我感动！再次表示深深的谢意。

XZY您说的很好，我要加强学习。谢谢！