Foxtable(狐表) → 用户栏目 → 专家坐堂 → 怎样将期初、入库、出库这三张表的数据自动填充到进销存表中并自动计出库存？


  共有42902人关注过本帖树形打印复制链接

主题：怎样将期初、入库、出库这三张表的数据自动填充到进销存表中并自动计出库存？
帅哥哟，离线，有人找我吗？
mr725
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2011/6/23 0:31:00 [显示全部帖子]

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar
 回到顶部
帅哥哟，离线，有人找我吗？
mr725
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2011/6/23 9:18:00 [显示全部帖子]

以下是引用fyj0326在2011-6-23 8:20:00的发言：
 另外，我希望能逐日逐条把期初日期、入库日期和出库日期中各日期的数据,逐条逐条明细数据读入到表中，做成一张明细进销存表，而不是采用汇总的方式读入到进销存表中，而是希望逐日逐条地填充到进销表中，如何实现呢?

把日期加入到“来源列”和“接受列”就可以统计逐日的进销存表。。。明细进销存表。
 回到顶部
帅哥哟，离线，有人找我吗？
mr725
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2011/6/23 10:42:00 [显示全部帖子]

把类似 [期初金额]  都改为： IsNull([期初金额],0)

 回到顶部
帅哥哟，离线，有人找我吗？
mr725
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2011/6/23 13:36:00 [显示全部帖子]

以下是引用fyj0326在2011-6-23 12:44:00的发言：
结存数量和结存金额对了，只是入库数量，入库金额，出库数量，出库金额不对，不同的入库日期或出库日期都是全部重复填充第一次的入库数量，入库金额，出库数量和出库金额,未能成功按不同日期对应填充不同的数量和金额，希望hhbb可以加力再帮我修正一下

设置关联时，把日期也关联上即可···
 回到顶部
帅哥哟，离线，有人找我吗？
mr725
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2011/6/23 14:34:00 [显示全部帖子]

以下是引用fyj0326在2011-6-23 14:20:00的发言：
 按日期来排序的代码如何写呢?

Tables("进销存").Sort = "日期"
 回到顶部
帅哥哟，离线，有人找我吗？
mr725
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2011/6/23 14:54:00 [显示全部帖子]

以下是引用dd-zdh在2011-6-23 14:48:00的发言：
mr725，用这种方式，给做个方法能直接统计出所有的材料的结存数量，并赋给一个变量！

变量 ＝ Tables("进销存").Compute("Sum(结存数量)")

............................
 回到顶部
帅哥哟，离线，有人找我吗？
mr725
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2011/6/23 15:14:00 [显示全部帖子]

以下是引用fyj0326在2011-6-23 14:49:00的发言：
 在切换到进销存表后能自动按日期升序，但在加载树处点某一产品后却
不能按日期升序，如何解决呢?

 
图片点击可在新窗口打开查看此主题相关图片如下：20110623-截图 9.png
图片点击可在新窗口打开查看

[此贴子已经被作者于2011-6-23 14:49:14编辑过]

你可能有其他代码，我这里不会出现上面的现象····
 回到顶部
帅哥哟，离线，有人找我吗？
mr725
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2011/6/23 15:36:00 [显示全部帖子]

以下是引用dd-zdh在2011-6-23 15:11:00的发言：

变量 ＝ Tables("进销存").Compute("Sum(结存数量)")

............................

你试一试，这个值不对的

要用同一个项目测试才知道是否正确，我不知道你用什么生成进销存表的。。。。
 回到顶部
帅哥哟，离线，有人找我吗？
mr725
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2011/6/23 15:43:00 [显示全部帖子]

以下是引用fyj0326在2011-6-23 15:23:00的发言：
这是附件，请mr725帮我看看为什么 加载树中的代码ZA001的日期不能升序呢?

 下载信息  [文件大小：352.0 KB  下载次数：0]
图片点击可在新窗口打开查看点击浏览该文件:进销存.table


你应该把 Tables("进销存").Sort = "日期" 放在代码最后面！～

....

....
    Next

    Tables("进销存").Sort = "日期"
End If

[此贴子已经被作者于2011-6-23 15:45:37编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
mr725
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2011/6/23 15:56:00 [显示全部帖子]

以下是引用dd-zdh在2011-6-23 15:50:00的发言：
mr725，你看一下，如果我想统计出各个产品的库存和怎么样写代码

可以设置条件啊，你现在可以多看看帮助了：：：：：：

Dim Sum As Double
Sum = Tables("订单").Compute("Sum(数量)", "产品 = 'PD01'")
 回到顶部
总数 12 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.06055 秒, 6 次数据查询