Темы

Добрый день!
Помогите, пожалуйста, перенести макрос из excel в гугл таблицы, ничего не смыслю в этом, а оооочень нужно, очень-очень

вот макрос:

Код (vb) Выделить Развернуть

Sub Архив()
Application.ScreenUpdating = False
Range("S1:S118").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Sheets("Данные").Select
Row = Application.CountA(ActiveSheet.Range("A:A")) + 1
ActiveSheet.Cells(Row, 2).Select
Selection.PasteSpecial Paste:=xlValues, Transpose:=True
ActiveCell.Offset(0, -1).Select
ActiveCell.Value = Application.Max(ActiveSheet.Range("A:A")) + 1
Sheets("Дневной отчет").Select
Range("A1").Select
End Sub