以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请教 如图 如果装在窗口中就不会这样格式了 ,有啥办法使得窗口中显示也是这样格式  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=187381)

--  作者:jswjyjf
--  发布时间:2023/7/13 14:28:00
--  请教 如图 如果装在窗口中就不会这样格式了 ,有啥办法使得窗口中显示也是这样格式

图片点击可在新窗口打开查看此主题相关图片如下:22.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2023/7/13 14:30:00
--  
装在窗口中后,重新设置一下格式
--  作者:jswjyjf
--  发布时间:2023/7/13 14:31:00
--  
如何设置格式 请教
--  作者:有点蓝
--  发布时间:2023/7/13 14:40:00
--  
http://www.foxtable.com/webhelp/topics/1372.htm
--  作者:jswjyjf
--  发布时间:2023/7/13 14:56:00
--  
谢谢
Dim g As New Subtotalgroup
g.GroupOn = "产品名称"
g.TotalOn = "收回数量"
With Tables("加工收发明细")
    .SubtotalGroups.Clear()
    .SubtotalGroups.Add(g)
    .Subtotal()
End With 
怎么会出错
奇怪

--  作者:有点蓝
--  发布时间:2023/7/13 15:08:00
--  
出什么错
--  作者:jswjyjf
--  发布时间:2023/7/13 17:23:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:rr.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2023/7/13 17:32:00
--  
5楼代码我测试没有问题。应该是其它地方代码有问题
--  作者:jswjyjf
--  发布时间:2023/7/13 17:36:00
--  
我在命令窗口中测试的 有问题的
--  作者:jswjyjf
--  发布时间:2023/7/13 17:39:00
--  
会不会是版本的问题