我在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`
我在Internet上四处查看,并且找到了一种复制数据的方法,只是不将其移动到行的最后一列并在上面加上日期。 aka(这些代码行):
`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行中的最后一个数据并向拳头添加日期行。我尝试过的所有操作都以错误结尾,或者没有得到我想要的结果。