AHK脚本(7)——遍历docx写入xlsx

wils
wils

创作者俱乐部成员

再来个脚本,批量打开docx,获取每个表格里,单元格的值,写入xlsx进行统计。

每个帖子介绍一个简单的应用,以AHK快捷键或脚本的方式,简化wps里的重复操作。
如果您有类似快捷键的需求,或者对现有功能不满意,请回帖说明,我会尽快更新😁

目前wps如果只用js宏,很难跨文档和表格进行操作,但ahk可以方便的通过com对象控制两者进行互操作。

💡

#Requires AutoHotkey v2.0

wps := ComObject("kwps.application")

et := ComObject("ket.application")

book := et.Workbooks.Open("C:\Users\Administrator\Desktop\结果.xlsx")

loop files, "*.docx" {

doc := wps.Documents.Open(A_LoopFileFullPath)

book.ActiveSheet.Range("A" A_Index).Value2 := doc.Tables[1].Rows[1].Cells[2].Range.Text

doc.Close()

}

book.Save()

book.Close()

wps.Quit()

et.Quit()

wps := et := ""

更新的代码可以从网址https://gitee.com/wanghan519/ahk4wps得到

发行版里不定时更新打包成exe的版本,下载解压即可使用

海南省
浏览 565
收藏
3
分享
3 +1
2
+1
全部评论 2
 
闻宇
学习
· 江苏省
回复
 
方盛
方盛

创作者俱乐部成员

五一助你一臂之力
· 湖北省
1
回复