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

jyyyj · 发表于 2020-12-31 10:17

zjdh 发表于 2020-12-26 10:15
1. 所有excel文件都消失不见，是因为本系统有意隐藏应用程序界面。
2. 你说的“下标越界”情况我这没出 ...

谢谢楼主，按楼主提供方法，语句更改为【Thisworkbook.Sheets】后解决了问题。

qmlyc1 · 发表于 2021-1-1 21:10

妮是我心发表于 2020-12-18 15:03
老师我复制改了，但是不对，我不知怎么做。
能否帮忙在excel中改好，谢谢！！
默认打印机为“Send To ...

我没有你这种打印机，未进行测试，你自行测试

qmlyc1 · 发表于 2021-1-1 21:13

妮是我心发表于 2020-12-16 09:03
老师你好，现在是预览打印，我的电脑上有两台打印机，我的出入库只用针式打印机，别的文件全部用另一台卡 ...

自行测试！！！！！！！！！！！！！！

polocx · 发表于 2021-1-6 09:09

下载下来学习一下,谢谢楼主分享。

zjdh · 发表于 2021-1-7 09:52

恒信人才发表于 2020-12-28 10:20
一楼中没有答案呀。麻烦楼主再指点一下

1楼有链接！
http://club.excelhome.net/forum. ... 886&pid=7689161

cuiweiliuliyue · 发表于 2021-1-8 16:00

很好,留个记号,慢慢研究

妮是我心 · 发表于 2021-1-16 15:35

zjdh 发表于 2020-12-17 11:58
在ThisWorkbook中添加宏
Private Sub Workbook_Open()
Dim objNetwork As Object

老师我不会修改，请老师帮我修改！
电脑上有两台打印机，出人库只用“Send To OneNote 2016”这台打印机。
电脑默认打印机为Send To OneNote 2017
出人库用“Send To OneNote 2016”这台打印机，这样就不用每次打印都要设置打印机了。
请老师帮我实现

妮是我心 · 发表于 2021-1-16 15:53

qmlyc1 发表于 2021-1-1 21:10
我没有你这种打印机，未进行测试，你自行测试

谢谢老师帮助

月行云中 · 发表于 2021-1-17 21:10

留个印，以后用

妮是我心 · 发表于 2021-1-24 08:59

老师你好，这个是你添加打印并记录功能的版本。
有错误。请帮忙查看。
入库时填写入库单价、金额，按打印并记录的按键打印后，去数据库查看只有记录但单价和金额显示为0

帮我修改一下吧，。在线等。。。谢谢

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

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