如果单号为唯一,可以加一个判断单号是否已有的信息。
在copy前用一个变量先把编号给加载到内存。然后再激活要粘贴数据的存储表,激活之后,用一个IF语句来判断这个表里边是否存在这个编号。例如引用一个工作表函数COUNTIF,表达式直接输入编号对应的变量就行,查找的区域是存储表的编号区域。如果统计数大于零的话, 那就是已有这个编号了,就弹出对话框,并且直接退出子过程。
具体的方案需要有原表。得看看你整体的代码是如何写的。这些东西写出来之后,最好先测试一下。
当大家在保存VBA时出现此对话框,点击否选择Excel保存的类型,点击Excel启用宏的工作簿.xlsm点击保存。打开Excel点击开发工具,点击宏这时就能发现VBA被保存了。当然大家也可以点击文件另存为选择保存路径,文件格式为“启用宏的工作簿xlsm这样也可以保存VBA。
要以上传一下你的工作表吗?