条码枪扫描后跳转到指定的单元格
Sub Worksheet_SelectionChange(ByVal Target As Range)If Target.Column = 2 And Target.Row = 2 Then
Sheet1.Cells(Target.Row, Target.Column + 1).Select
End If
End Sub
第二行第二列是扫描后扫描枪回车后的单元格,然后触发跳转到指定的单元格
好东西,支持 如何使用呀?:):)要用VB编程吗?
chenyin0824 发表于 2018-2-7 11:35
如何使用呀?要用VB编程吗?
代码已写好 加入到VBA中调试就好
页:
[1]