如何将微软 Office 宏转换为 ONLYOFFICE 宏_Windows

想要将微软 office vba 宏转换为可在 onlyoffice 中无缝使用的宏？嗯，虽然这种需求并没有直接的解决方案，不过我们也会在本文中介绍 vba 宏的转换步骤——正好我们手上也有一个来自用户的实际案例可供参考。

transforming a microsoft office macro into an onlyoffice macro

vba 宏

以下是原始的 vba 宏代码：

sub button1_click()
    dim mycel as range
    for each mycel in columns("d:d").specialcells(xlcelltypeconstants, 23)
        if mycel = [today()] then mycel.offset(0, 1) = [this_value]
    next
end sub

宏代码会对 d 列进行扫描，查找值为常量“23”的单元格，同时检查各个单元格中的值是否等于标记为 [today()] 的单元格的值。如果值匹配的话，则会对其右侧的单元格进行更新，更新的值为标记为 [this_value] 的单元格中的值。

transforming a microsoft office macro into an onlyoffice macro

构建 onlyoffice 宏

在将上述宏转换为与 onlyoffice 兼容的 javascript 宏的过程中，我们需要使用 onlyoffice api。

对于 onlyoffice 宏，我们首先需要通过 api.getactivesheet() 函数获取活动工作表。然后便是从单元格 a2 和 a4 中获取值。这两个单元格就是 vba 宏中 [today()] 与 [this_value] 标记分别对应的单元格：

var sheet = api.getactivesheet();
var datevalue = sheet.getrange("a2").getvalue();
var updatevalue = sheet.getrange("a4").getvalue();

下一步是使用 sheet.getrange(“d1:d10”) 定义需要进行迭代的单元格范围。这里的代码即确定了本例中的 d 列作为迭代范围，实际使用时您可按照自己的特定需求对其进行调整：

var daterange = sheet.getrange("d1:d10");

我们需要使用 foreach 函数来在已定义范围内的各单元格上迭代执行代码。对于每个单元格，我们都会使用 range.getvalue() 来获取其当前值，然后与单元格 a2 内的值进行对比。如果匹配的话，则会使用 range.getrow() 获取当前单元格的行号，然后借助 sheet.getrange(“e” + row) 获取 e 列中的相应单元格：

daterange.foreach(function(range) {
  var currentdate = range.getvalue();
  // 检查当前日期是否与单元格 a2 中的值匹配
  if (currentdate === datevalue) {
    // 获取 e 列中的相应单元格
    var row = range.getrow();
    var orange = sheet.getrange("e" + row);  }
});

最后，我们可通过 orange.setvalue(updatevalue) 使用单元格 a4 中的值来更新下一单元格的值（向右侧偏移一列）：

   // 更新下一单元格中的值
    orange.setvalue(updatevalue);
  }
});

完整的宏代码如下：

(function()
{
    var sheet = api.getactivesheet();
var datevalue = sheet.getrange("a2").getvalue();
var updatevalue = sheet.getrange("a4").getvalue();
var daterange = sheet.getrange("d1:d10");
daterange.foreach(function(range) {
  var currentdate = range.getvalue();
  // 检查当前日期是否与单元格 a2 中的值匹配
  if (currentdate === datevalue) {
    // 获取 e 列中的相应单元格
    var row = range.getrow();
    var orange = sheet.getrange("e" + row);
   // 更新下一单元格中的值
    orange.setvalue(updatevalue);
  }
});
})();

点击这里，观看视频，看看宏的效果如何！

总结一下，首先，我们无法直接将 vba 宏转换为可在 onlyoffice 中使用的 javascript 宏。不过，在为 onlyoffice 构建宏的过程中，您可使用现有的 vba 宏代码作为参考，与此同时借助 onlyoffice api 方法，加上一些必要的调整，这样就能实现类似的功能。

虽然在这一过程中可能会需要进行一些代码重构工作，不过其完全是可行的。希望文本中简要介绍的内容能够帮助您成功打造出功能强大的 onlyoffice 宏。拥抱广阔的可能性，尽享自定义的优势与乐趣。祝愿您的探索之旅一帆风顺！