code not working after scanning with scan it to office app

[antonisbbh]

Hello all,

I have a code that every time I type something to column 2 is filling up some other cells like time stamp, now I tried to scan with this app and the code is not working.
when I type to cell is working but when I scan to same cell code is not working
appreciate any help.

Private Sub Worksheet_Change(ByVal Target As Range)



With Target
   If .Column <> 2 Or .Columns.Count > 1 Then Exit Sub
   If .Cells(1) > "" Then
      .Offset(0, 7) = Sheet3.Range("I4")
      .Offset(0, 8) = Sheet3.Range("I5")
      .Offset(0, 9) = Format(Now, "dd-mm-yyyy hh:mm:ss")
      
   Else
      .Offset(0, 7).ClearContents
      .Offset(0, 8).ClearContents
      .Offset(0, 9).ClearContents
      
   End If
End With




End Sub

 

[aaewalsh]

When you say scan, like a handheld scanner, that will read a barcode.

 

[antonisbbh]

When you say scan, like a handheld scanner, that will read a barcode.

there is an Add-in call it scan IT to office, this one have a mobile application so every time I scan a barcode from the phone is going on the selected cell.