Ячейка с накоплением (нарастающим итогом)

[Андрей75]

Здравствуйте.
Помогите пожалуйста переделать макрос VBA под googlesheets.

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
 
    If Not Intersect(Target, Range("A1:A10")) Is Nothing Then
        If IsNumeric(Target.Value) Then
            Application.EnableEvents = False
            Target.Offset(0, 1).Value = Target.Offset(0, 1).Value + Target.Value
            Application.EnableEvents = True
        End If
    End If
End Sub

Спасибо.