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
声明:本站所有文章,如无特殊说明或标注,均为本站原创发布。任何个人或组织,在未征得本站同意时,禁止复制、盗用、采集、发布本站内容到任何网站、书籍等各类媒体平台。如若本站内容侵犯了原著者的合法权益,可联系我们进行处理。
不错,真是不错啊!
感谢分享
好,刚好用到
好像很复杂的样子,可能结合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表格)。
不知那位大侠可以创作和分享一下