手动选择单元格条形码会变化，用选择单元格则不变化

starnew88 · 发表于 2024-7-13 11:53

本帖最后由 starnew88 于 2024-7-14 14:09 编辑

问题：

我做一个制作条形码的vba，如果单元格c列选择变化则顶上大的条形码会随着选择单元格不同会变化值
后面我用vba做了一个循环，依次从上到下选择，结果顶上大的条形码则不会变化（自动跳行的按键）
说明：工作表我用的是select change事件，代模用的是sub模块，按我的想像应该会是一样的变化，模块只是模拟人的操作而已
ps：我这样做的目的是用扫描枪对着excel扫码输入到另外的系统，谢谢大家，各位老师帮忙看一下问题出在哪里？

yjh_27 · 发表于 2024-7-13 17:05

加了密码，先去了

天真无鞋 · 发表于 2024-7-13 18:35

我测试C列变化可以跳

starnew88 · 发表于 2024-7-13 20:52

天真无鞋发表于 2024-7-13 18:35
我测试C列变化可以跳

右边的编了一个，自动跳行就不变了，自动跳行是模拟一个单元格一个单元格往下回车，不知为什么，附件已修正（之前的文件带密忘记拿掉了，不好意思）

starnew88 · 发表于 2024-7-13 20:53

yjh_27 发表于 2024-7-13 17:05
加了密码，先去了

附件已修正（之前的文件带密忘记拿掉了，不好意思）

yjh_27 · 发表于 2024-7-13 21:33

starnew88 发表于 2024-7-13 20:53
附件已修正（之前的文件带密忘记拿掉了，不好意思）

BarCodeCtrl150.value = Range("C" & i)
DoEvents

复制代码

starnew88 · 发表于 2024-7-13 21:48

yjh_27 发表于 2024-7-13 21:33

的确可以了，谢谢！
我再问下您，我在模块这里直接级条形码这里赋值为何就不行才到工作表里的SELECT CHANGE赋值的，理论在模块这里直给单元格变化，条形码就直接变化？谢谢老师

yjh_27 · 发表于 2024-7-13 22:10

starnew88 发表于 2024-7-13 21:48
的确可以了，谢谢！
我再问下您，我在模块这里直接级条形码这里赋值为何就不行才到工作表里的SELECT CHA ...

DoEvents '转让控制权,以便让操作系统处理其它的事件,

starnew88 · 发表于 2024-7-13 22:26

yjh_27 发表于 2024-7-13 22:10
DoEvents '转让控制权,以便让操作系统处理其它的事件,

谢谢老师，看了您之前写的雷同函数，高手！！！

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

[已解决] 手动选择单元格条形码会变化，用选择单元格则不变化