The

"A1,A4:A7,J10"

refers to cell A1, cells A4 through A7, and cell J10



I just randomly picked them.

In article ,
forevertrying wrote:

I'm really sorry to be a pain

The cell references you've used. What are they? I mean, if you can explain
to me why they are written like that I can sort them out for my worksheet

Thanks

"JE McGimpsey" wrote:

One way:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim vValue As Variant
With Target
If .Count 1 Then Exit Sub
If Not Intersect(.Cells, Range("A1,A4:A7,J10")) Is Nothing Then
vValue = .Value
If IsNumeric(vValue) Then
Application.EnableEvents = False
With .Offset(0, 1)
.Value = .Value + vValue
End With
Application.EnableEvents = True
End If
End If
End With
End Sub