宏按钮在Excel中添加行（使用下面的行中的公式），同时保持标题

Question

我正在尝试将Google表格中的工作脚本复制到Excel中。目标是复制活动工作表的第二行，并将格式，数据验证和公式粘贴到上面的新行中。这是为了在标题下面的第2行放置一个新的（使用公式和数据验证格式化）。

这是Google脚本

// global
var ss = SpreadsheetApp.getActive();

function addFirstRow() {
    var firstRow = 2;
    var sh = ss.getActiveSheet();
    var lCol = sh.getLastColumn();
    var range = sh.getRange(firstRow, 1, 1, lCol);
    var formulas = range.getFormulas();
    sh.insertRowsBefore(firstRow, 1);
    var newRange = sh.getRange(firstRow, 1, 1, lCol);
    newRange = sh.getRange(firstRow, 1, 1, lCol);
    newRange.setFormulas(formulas);
} 

这是Google Play广告素材的视频 https://youtu.be/OCinWCApypw

截图

Answer 1

所以你只是需要这个或者我不太了解？

   Sub Test()
    Rows("2:2").Insert Shift:=xlDown
    Rows("3:3").Copy
    Rows("2:2").PasteSpecial xlPasteAll
    Application.CutCopyMode = false
   End Sub