小小出入库管理系统(2012年12月又作了更新)

zjdh · 发表于 2013-4-26 07:44

撒发生发表于 2013-4-25 21:33
这段代码是判断''A"列的数字大于1的行全部复制粘贴下来但是小于1的也复制下来了
新手没学几天的不知 ...

与本帖无关的内容，勿在此跟帖！！

郎子策 · 发表于 2013-5-2 16:55

最近使用过程中出现：

方法“visible” 作用于对象“_worksheet”时失败

不知道是哪里的问题！！！

水中花008 · 发表于 2013-5-3 13:48

楼主：表中库存转期初按钮，找不到啊？

wengen · 发表于 2013-5-3 20:50

If Mid(Cells(1, 9), 2, 6) <> Year(Now()) & Format(Month(Now()), "00") Then
Cells(1, 9) = "R" & Year(Now()) & Format(Month(Now()), "00") & "0001"
代码如何由原来的　9位数改为7位不要月份，如201305001改为2013001，
　　Sub 查询单据()中相应代码如何改
此句改为　If Mid(Cells(1, 9), 2, 6) <> Year(Now()) Then
　查询出错
OK　OK　谢谢！！！

zjdh · 发表于 2013-5-8 07:58

水中花008 发表于 2013-5-3 13:48
楼主：表中库存转期初按钮，找不到啊？

在“系统设置”表中

zjdh · 发表于 2013-5-8 08:01

郎子策发表于 2013-5-2 16:55
最近使用过程中出现：

方法“visible” 作用于对象“_worksheet”时失败

检查控件引用

zjdh · 发表于 2013-5-8 08:14

wengen 发表于 2013-5-3 20:50
If Mid(Cells(1, 9), 2, 6) Year(Now()) & Format(Month(Now()), "00") Then
Cells(1, 9) = "R" ...

Sub 查询单据() 在哪儿？

2008东北人 · 发表于 2013-5-8 13:02

谢谢。。。。。。。。。

★梦心无依★ · 发表于 2013-5-8 13:30

分项查询,查询编码空时,前面二个都不能查,会显示类型不匹配,

zjdh · 发表于 2013-5-8 16:27

★梦心无依★ 发表于 2013-5-8 13:30
分项查询,查询编码空时,前面二个都不能查,会显示类型不匹配,

不可能！！
上传你的附件。

		自动登录	找回密码
密码			免费注册

[分享] 小小出入库管理系统(2012年12月又作了更新)