activation of macro from worksheet change

[EDUCATED MONKEY]

hello i would like some help with the code below, it works reasonably well but requires me to click the cell that data has just been pasted into, what i would like is that it runs when data is pasted in

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 Dim intersection As Range
    Dim box As Integer 'the row in column K
    Dim postalServiceId As String
    Set intersection = Intersect(Target, Range("K:K"))
    If Not intersection Is Nothing Then
            box = Target.Row
            postalServiceId = Worksheets("extractedData").Cells(box, 11).Value 'get the number
            If (Len(postalServiceId) > 14) Then ' greater the 14 must be hermes
            Worksheets("extractedData").Cells(box, 10).Value = "hermes"
            Cells(box, 3).Interior.Color = RGB(0, 255, 0) 'change the order number to green
            ElseIf (Len(postalServiceId) = 14) Then ' must be royal mail
            Worksheets("extractedData").Cells(box, 10).Value = "royal mail"
            Cells(box, 3).Interior.Color = RGB(0, 255, 0) 'change the order number to green
            End If
   End If
End Sub

 

[Jaafar Tribak]

Not clear what you are trying to do but can you try the worksheet change event instead of SelectionChange

 

[Joe4]

what i would like is that it runs when data is pasted in

Then instead of using the "Worksheet_SelectionChange" event, use the "Worksheet_Change" event, that runs when data is manually updated (i.e. pasting a value into a cell).
You can limit it to only run when cells in a defined range are updated.
By default, it defines "Target" as the range that was just updated, so you can do an Intersect between the Target range and the range you are checking to see in the cells(s) updated fall in your desired range.

 

[EDUCATED MONKEY]

thanks perfect it has been a while i chose the wrong sheet property

now work 100% as require

pete