Convertir un code VBA en Js

Option Explicit

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Target.Column < 3 Or Target.Row < 14 Then Exit Sub
    Cancel = True
    If Not IsNumeric(Cells(Target.Column, 11)) Or Not IsNumeric(Cells(2, Target.Row)) Then Exit Sub
    If Cells(9, Target.Column) < 1 Or Cells(Target.Row, 2) <= 0 Then Exit Sub
    If Target = "" Then Target.Formula = "=" & Cells(9, Target.Column).Address(False, False) & "*" & Cells(Target.Row, 2).Address(False, False) Else Target.ClearContents
End Sub