Excel精英培训网

 找回密码
 注册

QQ登录

只需一步,快速开始

工作中常用的Excel函数公式,全印在一张超大鼠标垫上
查看: 72|回复: 6

[已解决]如何用VBA设置输入多少行信息就保存多少行

[复制链接]
发表于 2021-9-15 09:40 | 显示全部楼层 |阅读模式
明明输入了一行物料信息,为啥保存的是六行,怎样让他输入多少行物料信息,就保存多少行啊,求指点 出入库.zip (24.21 KB, 下载次数: 4)
excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
发表于 2021-9-15 10:08 | 显示全部楼层
s = Application.CountA(Range(Cells(8, 3), Cells(13, 3)))
C列有公式,所以你这个 s 永远等于6。所以保存的是6行,你把CountA改成Count应该就可以了
回复

使用道具 举报

发表于 2021-9-15 10:09 | 显示全部楼层    本楼为最佳答案   
s = Application.CountA(Range(Cells(8, 3), Cells(13, 3)))
换成s = Application.Count(Range(Cells(8, 3), Cells(13, 3)))
回复

使用道具 举报

 楼主| 发表于 2021-9-15 10:23 | 显示全部楼层
lisongmei 发表于 2021-9-15 10:08
s = Application.CountA(Range(Cells(8, 3), Cells(13, 3)))
C列有公式,所以你这个 s 永远等于6。所以保 ...

可以了,非常感谢,如果我在单据中输入两款以上物料,怎样让物料数据自动保存到对应的工作表中,有办法吗
回复

使用道具 举报

 楼主| 发表于 2021-9-15 10:23 | 显示全部楼层
OK哈了哨 发表于 2021-9-15 10:09
s = Application.CountA(Range(Cells(8, 3), Cells(13, 3)))
换成s = Application.Count(Range(Cells(8, 3 ...

可以了,非常感谢,如果我在单据中输入两款以上物料,怎样让物料数据自动保存到对应的工作表中,有办法吗
回复

使用道具 举报

发表于 2021-9-15 10:32 | 显示全部楼层
代码放change 事件里
回复

使用道具 举报

发表于 2021-9-15 10:34 | 显示全部楼层
hymjtc 发表于 2021-9-15 10:23
可以了,非常感谢,如果我在单据中输入两款以上物料,怎样让物料数据自动保存到对应的工作表中,有办法吗 ...

因你提供的表格里没有存放物料信息的表格,所以提供思路:
在你现在有代码中添加个if判断。

将物料信息在 物料表格 中查询是否存在, if 不存在 then 添加到最后一行 即可


回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2021-9-16 18:51 , Processed in 0.203313 second(s), 11 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表