Excel Marco - Barcode scan 不让user更改

天谴明王

我想请问一下关于excel marco.
我现在有一个barcode scanner,和一个物品，物品有5个barcode lable,各自lable都代表不同的数字。然后我要把物品第一个lable 号码scan 进 C3，scan进以后，cell 会往右边移到D3，在我把D3的号码scan 进以后，他就会往右边再移一个cell.直到他scan 到G3以后（也就是五个lable scan完），他就会往C4移，之后又scan到 G4以后，又再移到C5.
然后这些output是不能被edit但是可以delete，



我目前是写到这样，然后就不会写了。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    'Change Range("C3" to your input cell, or range of input cells
    On Error Resume Next
    If Not Application.Intersect(Range("C33:E3:F3", Range(Target.Address)) _
        Is Nothing Then If Len(Target) > 0 Then ActiveCell.Offset(0, 1).Range(0, 1).Select
    If Err.Number = 91 Then Range("D3".Select
End Sub

teckping

付點錢,應該可以搞定..