别安演唱会,九龙城寨之围城古天乐正版下载,痴情快婿国语

您的位置: 敏用首頁

條碼掃描器在Excel下掃描時，掃描后同類商品能否計數？

發布時間： 2012-10-19 8:02:15

雙擊自動滾屏【打印此頁】【關閉本頁】

問題：

條碼掃描器在Excel下掃描時，掃描后同類商品能否計數？也就是說，比如我掃描了一個商品，條碼是固定的，它會在A1記錄條碼信息的同時，在橫向的第二單元格（B1）計數，再掃第二件商品，如果條碼信息跟上面掃描的一樣，它會自動在那個單元格（B1）增加一個計數，如果條碼信息不一樣，他會重新在A2記錄條碼信息，并在B2計數，以此類推。

敏用數碼解答：

條碼掃描器在Excel下掃描時的自動計數功能可以實現，需要在Excel表格中的“工具”-“宏”-“ Visual Basic編輯器”中添加如下代碼：

Private Sub Worksheet_Change(ByVal Target As Range)
 Dim i As Long

 If WorksheetFunction.CountA(Target) = 0 Then
 Selection.Font.ColorIndex = xlAutomatic
 Selection.Interior.Pattern = xlNone
 End If
 If Target.Column() <> 1 Then Exit Sub

 Application.EnableEvents = False
 On Error GoTo Err

 For i = 1 To Target.Row()
 If Cells(i, 1).Value = Target.Value Then
 Cells(i, 2).Value = Cells(i, 2).Value + 1
 Exit For
 End If
 Next i
 If i = Target.Row() Then
 Target.Offset(1, 0).Select
 Else
 Target.Select
 Target.Clear
 End If

Err:
 Application.EnableEvents = True
 On Error GoTo 0
End Sub

代碼添加后，就可以實現掃描結果的自動計數。使用時需要注意的兩點：

1、條碼掃描器后綴需加回車與換行。

2、Excel表格需要設置單元格格式為文本。

效果如下圖所示：

<a href="http://www.chansun.cn/Productmain_01.shtml">條碼打印機</a>
<a href="http://www.chansun.cn/Productmain_03.shtml">數據采集器</a>

相關同類信息：

Symbol LS4278掃描時光線總是抖動，不好掃描，怎么辦？

Motorola DS6708現在用USB接口，而軟件中需要COM口，有什么辦法解決？

Intermec CK31采集器中TE2000仿真終端密碼忘記后，如何處理？

Symbol LS2208連接USB10米延長線后，無任何反應，怎么回事？

計算機能夠控制條碼掃描槍的蜂鳴器或提示燈向人發出信號嘛？

Motorola MC55A0/MC55N0采集器冷熱啟動的方法

Motorola LS9208激光平臺為什么小的條碼掃不出來啊？

Honeywell條碼掃描器USB仿真串口的設置方法

【打印此頁】【關閉本頁】【回到頂部】

條碼 | 條形碼 | 條碼機 | 條形碼打印機 | 條碼掃描器 | 標簽打印機

條碼標簽打印機 | 條碼軟件 | 條碼檢測儀 | RFID產品 | 證卡打印機