Migration Google sheet

Bonjour , je souhaiterai transférer cette macro coté GS , quelqu'un pour m'aider svp ?

-------

Option Explicit

Sub Ajout()
Dim lig As Long, i As Byte
lig = Range("A3") - Range("B10") + 10
For i = 3 To 13
Cells(lig, i).Value = Cells(4, i).Value
Cells(4, i).Value = ""
Next

End Sub

--------