JS与VBA写入单元格的速度比较，VBA略占优势

m_n_j001

好贴，留个爪印

Kaohsing

只能说WPS 的js ，把数据写入单元格，较慢

wanghan519

用ahk写了一下，好像wps写入更快。。。
脚本里的Excel改成Ket即可控制wps，不改是Excel

1. xl := ComObjCreate("Ket.Application")
   
2. ; Excel改为Ket就是控制wps
   
3. xl.Visible := true
   
4. wb := xl.Workbooks.Add()
   
5. r := 10000
   
6. c := 10
   
7. a := ComObjArray(12, r, c)
   
8. loop, % r {
   
9.   i := A_Index-1
   
10.   loop, % c {
    
11.     j := A_Index-1
    
12.     Random, tmp
    
13.     a[i, j] := tmp
    
14.   }
    
15. }
    
16. Sleep, 2000
    
17. ; 睡2秒等待环境稳定下来
    
18. t := A_TickCount
    
19. xl.ActiveSheet.Range("A1").Resize(r, c).Value2 := a
    
20. MsgBox, % A_TickCount - t

复制代码

LIUZHU

Kaohsing 发表于 2022-2-24 13:43
只能说WPS 的js ，把数据写入单元格，较慢

是这么个意思，毕竟WPS JS是新出来的东西，不像VBA，出来 很多年了

wanghan519

wanghan519 发表于 2022-2-24 16:08
用ahk写了一下，好像wps写入更快。。。
脚本里的Excel改成Ket即可控制wps，不改是Excel

附件里除了脚本是个64位的ahk，也可以自己下载。

结果是，wps启动慢，但写入这一步快一点，前面例子的慢可能是js的数组需要转换成comobject的safearray，多一步转换

LIUZHU

wanghan519 发表于 2022-2-24 18:32
附件里除了脚本是个64位的ahk，也可以自己下载。

结果是，wps启动慢，但写入这一步快一点，前面例子 ...

AHK是什么一种编程语言吗？

wanghan519

LIUZHU 发表于 2022-2-24 20:14
AHK是什么一种编程语言吗？

就是autohotkey而已，13楼有代码，就是通过comobject操作Excel或WPS，只是ahk会提供一些便利的方法

LIUZHU

wanghan519 发表于 2022-2-25 02:46
就是autohotkey而已，13楼有代码，就是通过comobject操作Excel或WPS，只是ahk会提供一些便利的方法

这个ahk除了控制office之外，还可以控制其他软件么，比如控制钉钉自动发送消息，控制邮件客户端发送邮件？

LIUZHU

zpy2 发表于 2022-2-24 08:48
关键就在于以下两句：
JS语句：Sh.Cells(1,1).Resize(arr3.length,arr3[0].length).Value2=arr3
VBA语 ...

是的，就是这句，不知道以后有没有优化的可能。

wanghan519

LIUZHU 发表于 2022-2-25 15:17
这个ahk除了控制office之外，还可以控制其他软件么，比如控制钉钉自动发送消息，控制邮件客户端发送邮件 ...

发邮件容易，但钉钉没试过。
比如微信只能用快捷键ctrl+f，输入人名，写要发的内容，回车这种不稳定的方式自动发。
但有些窗口可以用window spy定位到控件的，就比较方便了，随便控制着玩。
还有就是可以绑定窗口事件，每当激活特定窗口时执行，或是绑定Excel对象的事件也行。