Question

我对VBA完全陌生。会喜欢任何提示，提示，并帮助解决这个问题。谢谢！

-

我有一个Google电子表格，我在其中绘制了一个按钮，并将其命名为“Add This”。单击此按钮（分配脚本后），我希望执行以下操作 -

第1部分。 单元格A1是我将输入值的选定输入单元格，例如“Apple”。当我单击“添加此项”按钮时，脚本应复制当前在单元格A1中的值并将其粘贴到B列中的单元格中。

现在，如果更改了单元格A1中的值，则列B中粘贴单元格中的值不应更改。

第2部分。 当我向Cell A1输入一个新值，例如“Orange”，然后单击“Add This”时，脚本应该在A1中复制这个新值并将其粘贴到B列的下一个空白单元格中。

同样，如果我再次使用第3个，第4个或第5个...值，脚本应该复制A1中的值（如果我单击按钮）并将其添加到B列中的下一个空白单元格中。最终结果看起来像 - example image

第3部分。 C列将是脚本运行时的日期戳（即单击“添加此”按钮。

到目前为止，这是我能想到的全部内容 -

function copydata() {

var ss = SpreadsheetApp.getActiveSpreadsheet(); 

var sheet1 = ss.getSheetByName("Sheet1");

  sheet1.getRange('Sheet1!C2:C5').copyTo(sheet1.getRange('Sheet1!F2:F5'));

}

Answer 1

这是一个简单的代码，可以帮助您入门：

Sub ButtonCode()
    Dim N As Long
    N = Cells(Rows.Count, "B").End(xlUp).Row + 1
    Cells(1, 1).Copy Cells(N, 2)
    Cells(N, 3).Value = Date
End Sub

单元格 B1 不受影响，可用于标题。

VBA脚本将所选单元格的输入添加（复制）到另一列的单元格中

1 个答案: