Googleスプレッドシートで、条件を満たした行を別シートへ移動させたい。

[Sa c]

これまでエクセルを使用していましたが、

仕事環境の変化にともなって、Googleスプレッドシートを使用していくことになり、

下記のVBAをGoogle scriptへ変換しようと調べたのですが、どう組み合わせてよいか分からず、

どなたかご教示していただけないかと思い、こちらのグループにたどりつき、

質問させていただくことにしました。

素人の質問で申し訳ありませんが、よろしくお願いします。

内容は、Ａ列に1が入力された行が"済"のシートへ移動し、

空白になった行が削除されるというものです。

Sub hassokanryo()

Dim i, LastRow As Long

LastRow = Cells(Rows.Count, 1).End(xlUp).Row

For i = 1 To LastRow

If Cells(i, 1) = "1" Then

Rows(i).Cut Sheets("済").Cells(Rows.Count, 1).End(xlUp).Offset(1, 0)

End If

Next i

  Dim row_end As Long

  row_end = Cells.SpecialCells(xlCellTypeLastCell).Row

  For i = row_end To 1 Step -1

    If WorksheetFunction.CountA(Rows(i)) = 0 Then

      Rows(i).Delete

    End If

  Next i

End Sub