LWin::
if !objExcel
{
arr:=[], objExcel:=""
Try objExcel:=ComObjActive("Excel.Application")
}
Try
{
aa:=objExcel.ActiveCell, y:=aa.Row, x:=aa.Column
bb:=objExcel.Cells(y,1).Resize(1,x)
Loop, % bb.Columns.Count-1
arr[A_Index]:=bb.Cells(1,A_Index).Value
aa.Value:="ok", aa.OffSet(1,0).Activate
objExcel.ActiveWorkBook.Save
}
For k,v in arr
s:=k=1 ? v : s . A_Tab . v
MsgBox, 4096,, % s
return
利用AHK读取和写入Excel表格
人已捐赠
不错，真是不错啊！
感谢分享
好，刚好用到
好像很复杂的样子，可能结合vba会更加方便
那个lol喊话call我没有成功用起，请问您成功了吗
有的复杂，还是python方便
读取写入方式
用了没有读取出来 .不知道怎么用?
难道是不支持wps?
读取左边的数据,成功了
感谢分享
感谢分享
非常感谢
急需一个用AHK制作的窗口：
1、窗口类似Everything的界面，有一个Edit编辑框和一个ListView。
2、当用户在编辑框中输入搜索关键字或者关键字的拼音首字母
（多个关键字或者拼音首字母用空格键分隔）之后无需按回车键
立即根据关键字筛选过滤ListView并刷新ListView的显示。
3、ListView的显示内容来自于Excel表格。
4、ListView的显示项可以用于操作对应的资源对象
（图片、音频、视频、压缩包、网址等等）
5、ListView的显示项的右键菜单
可以用户自定义项目和命令内容。
6、用户可以通过选项启用或者禁用实时异地备份Excel表格
（类似与Delphi中触发onclick事件和onchange事件时
自动远程连接群晖的WebDAV文件服务并实时备份Excel表格）。
不知那位大侠可以创作和分享一下