Я создал электронную таблицу в Microsoft Excel и создал кнопки со специальными функциями, но он не поддерживает их в Excel онлайн. Поэтому я переключился на Google, который делает, однако весь мой визуальный базовый код бесполезен в Google, поэтому я начинаю с нуля и не очень разбираюсь в редакторе сценариев Google.
Итак, я пытаюсь получить данные с одного листа на другой (это я выяснил), однако, я хочу, чтобы они проходили мимо данных в последнем столбце строки. Так что я могу продолжать копировать и вставлять данные без перезаписи данных из предыдущей формулы.
Я пытаюсь найти код в Google, эквивалентный этому в Excel:
`Sheets("Sheet1").Select
Range("B2:B11").Select
Selection.Copy
Sheets("Copy1").Select
Range("A2").Select
Selection.End(xlToRight).Select
ActiveCell.Offset(0, 1).Select
ActiveSheet.Paste
Sheets("Sheet1").Select
Range("E2:E11").Select
Selection.Copy
Sheets("Copy1").Select
Range("A12").Select
Selection.End(xlToRight).Select
ActiveCell.Offset(0, 1).Select
ActiveSheet.Paste
Sheets("Sheet1").Select
Range("H2:H11").Select
Selection.Copy
Sheets("Copy1").Select
Range("A22").Select
Selection.End(xlToRight).Select
ActiveCell.Offset(0, 1).Select
ActiveSheet.Paste
Range("A1").Select
Selection.End(xlToRight).Select
ActiveCell.Offset(0, 1).Select
ActiveCell.Value = Format(Now(), "MM/DD/YYYY")
End Sub`
Я просмотрел весь Интернет и нашел способ скопировать данные, не перемещая их в последний столбец подряд и не помещая в него дату. ака (эти строки кода):
`Selection.End(xlToRight).Select`
`ActiveCell.Offset(0, 1).Select
ActiveCell.Value = Format(Now(), "MM/DD/YYYY")`
Это то, что я до сих пор придумал в Google:
`function CopyData() {
var ss = SpreadsheetApp.getActiveSpreadsheet();
var target = SpreadsheetApp.openById("abc");
var source_sheet = ss.getSheetByName("Copy");
var target_sheet = target.getSheetByName("Past");
var source_range = source_sheet.getRange("B2:B11");
var target_range = target_sheet.getRange("A2:A11");
source_range.copyTo(target_range);`
но мне все еще нужны эквивалентные скрипты в google:
`Selection.End(xlToRight).Select`
`ActiveCell.Offset(0, 1).Select
ActiveCell.Value = Format(Now(), "MM/DD/YYYY")`
Я пошел в Интернет и искал высоко и низко, даже на этом зрелище, и я до сих пор не смог найти эквивалентный скрипт для выбора последних данных в строке +1 и добавления даты в мой кулак строка. Все, что я пробовал в эфире, заканчивается ошибкой или не дает мне результата, который я ищу.