插入公式行

将上方行中的公式和数字格式复制到当前活动行。选择目标行并运行宏。

(function () {
  let sheet = Api.GetActiveSheet();
  let rowNum = sheet.GetActiveCell().GetRow();
  let sourceRow = sheet.GetRange(rowNum - 1 + ":" + (rowNum - 1));
  let destRow = sheet.GetRange(rowNum + ":" + rowNum);

  sourceRow.Copy();

  // 从源行粘贴值和数字格式
  destRow.PasteSpecial(
    "xlPasteValuesAndNumberFormats",
    "xlPasteSpecialOperationNone",
    false,
    false,
  );
  // 从源行粘贴公式
  destRow.PasteSpecial(
    "xlPasteFormulas",
    "xlPasteSpecialOperationNone",
    false,
    false,
  );
})();

所用方法：GetActiveSheet，GetActiveCell，GetRow，GetRange，Copy，PasteSpecial

结果