hessen 发表于 2016-12-27 11:41:25

条码枪扫描后跳转到指定的单元格

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
第二行第二列是扫描后扫描枪回车后的单元格,然后触发跳转到指定的单元格

hong90342 发表于 2016-12-27 11:44:15

好东西,支持

chenyin0824 发表于 2018-2-7 11:35:29

如何使用呀?:):)要用VB编程吗?

hessen 发表于 2018-2-9 13:23:30

chenyin0824 发表于 2018-2-7 11:35
如何使用呀?要用VB编程吗?

代码已写好 加入到VBA中调试就好
页: [1]
查看完整版本: 条码枪扫描后跳转到指定的单元格