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

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

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] 的单元格中的值。

构建 ONLYOFFICE 宏

在将上述宏转换为与 ONLYOFFICE 兼容的 JavaScript 宏的过程中,我们需要使用 ONLYOFFICE API

对于 ONLYOFFICE 宏,我们首先需要通过 Api.GetActiveSheet () 函数获取活动工作表。然后便是从单元格 A2A4 中获取值。这两个单元格就是 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 宏。拥抱广阔的可能性,尽享自定义的优势与乐趣。祝愿您的探索之旅一帆风顺!

相关链接

​ONLYOFFICE 论坛​

​ONLYOFFICE API 文档​

​宏示例​

​GitHub 上的 ONLYOFFICE

相关推荐
每次的天空2 分钟前
kotlin与MVVM结合使用总结(三)
开发语言·microsoft·kotlin
前端极客探险家1 小时前
前端 Excel 工具组件实战:导入 → 可编辑表格 → 导出 + 样式同步 + 单元格合并
前端·typescript·vue·excel
AAA顶置摸鱼3 小时前
使用 Pandas 进行多格式数据整合:从 Excel、JSON 到 HTML 的处理实战
json·excel·pandas
FIT2CLOUD飞致云11 小时前
问答页面支持拖拽和复制粘贴文件,MaxKB企业级AI助手v1.10.6 LTS版本发布
人工智能·开源
爱喝奶茶的企鹅11 小时前
Ethan独立开发产品日报 | 2025-04-24
人工智能·程序员·开源
少年、潜行12 小时前
【开源】STM32HAL库移植Arduino OneWire库驱动DS18B20和MAX31850
stm32·嵌入式硬件·开源·ds18b20·max31850
努力犯错17 小时前
昆仑万维开源SkyReels-V2,解锁无限时长电影级创作,总分83.9%登顶V-Bench榜单
大数据·人工智能·语言模型·开源
文慧的科技江湖17 小时前
图文结合 - 光伏系统产品设计PRD文档 -(慧哥)慧知开源充电桩平台
人工智能·开源·储能·训练·光伏·推理
CCF ODC18 小时前
活动预告丨CCF开源发展委员会“开源高校行”第三十九期—电子科技大学站
开源
灏瀚星空18 小时前
从单机工具到协同平台:开源交互式模拟环境的技术演进之路
经验分享·笔记·python·开源·oneapi