状况:
因为常常要打估价单,该excel里面有两个sheet分别叫[估价单]、[单价]
由于每个客人的需求都有不一样,常常要复制来复制去
目前作法是:
打开 单价sheet,鼠标选取,复制,回到 估价单sheet贴上
过程实在有点繁琐
今天尝试使用最简单的ahk写法
先把 sheet单价需要的字段复制起来,然后贴上
::c1::
(
品名 尺寸 单价 数量 折数 ....
)
开开心心的把十几个品项都设定好hotkey...
但是事情没有憨人想得这么简单,因为这样输入回去后,公式全部不见了
=====================================================================
上网估狗后,有看到一篇如下
#a::
; Gets a reference to the workbook
; Change the path to the path of your workbook
wbk := ComObjGet("C:\MyFolder\Book1.xlsx")
; Gets the value of cell 1, 1 (also known as cell A1) from Sheet1
A1Val := wbk.Sheets("Sheet1").Cells(1, 1).Value
SendInput, % A1Val
return
他这个方法试用过后是可以的,他读取后存到一个变量,然后再贴上
但是最大问题是他读取的只有 单个cell。可是我必须要有多个CELL
例如: 整行,或是A1-O1的值存到变量后再贴上
希望版上有人可以协助,感激不尽