标题：[求助]交叉统计表列值为0

1楼

JoyGum 发表于：2023/11/28 14:26:00

Dim g As New CrossTableBuilder("Temp1", DataTables("GWarehouse"))
g.HGroups.AddDef("DealerName")
g.HGroups.AddDef("ProductsName")
g.HGroups.AddDef("WorkNo")
g.VGroups.AddDef("MainName")
g.Totals.AddDef("DebitQuantity", "入库数量")
g.Totals.AddDef("CreditQuantity", "出库数量")
g.Totals.AddDef("BalanceQuantity", "库存数量")
g.VerticalTotal = True
g.Decimals = 2
g.Build()

请教老师若是库存数量为0,删除此行(之前都用手动筛选处理),代码怎么处理.

2楼

有点蓝 发表于：2023/11/28 14:39:00

生成的统计表是怎么样的？截图看看

3楼

JoyGum 发表于：2023/11/28 14:59:00

此主题相关图片如下：微信图片_20231128145649.jpg

4楼

有点蓝 发表于：2023/11/28 15:10:00

……

g.Build()

for each dc as datacol in datatables("Temp1").datacols

if dc.caption like "*_库存数量" then

datatables("Temp1").deletefor(dc.name & "=0 or " & dc.name & " is null")

exit for

endif

5楼

JoyGum 发表于：2023/11/28 15:17:00

谢谢老师!

共5 条记录, 每页显示 10 条, 页签: [1]