返回列表 发帖

[AU3基础] 换新版(3.14.2)后问题【已解决】

本帖最后由 duxing 于 2018-5-17 09:54 编辑

#include <MsgBoxConstants.au3>
Local $sFileName ="E:\zj\erp\cx.csv"
        $xls = ObjGet(@ScriptDir & "\cx.csv")  
        If NOT IsObj($xls) Then
                MsgBox(0, "错误", "ObjGet(\cx.csv不是一个对象.")
        Else
        EndIf
        With $xls.activesheet
                $erp_cx = .cells(1, 1).resize(1000, 30).value
                $erp_cx = $xls.parent.application.transpose($erp_cx)
        EndWith
换了3.14.2版本,以前编好的脚本运行问题很多啊,上面这段,路径没问题,EXCEL文件也没问题,为啥用了新版本,IsObj($xls)就是无法正常通过?

还有:VB脚本以前一些内部变量都不需要先声明,现在都要先声明全局变量
Global $xlEdgeTop
Global $xlContinuous=0
Global $xlEdgeBottom=0
Global $xlEdgeLeft=0
GLOBAL $xlEdgeRight=0
Global $xlInsideHorizontal=0
GLOBAL $xlInsideVertical=0
With $xls.ActiveSheet.Range($az)
                .Borders($xlEdgeTop).LineStyle = $xlContinuous ;上边线
                .Borders($xlEdgeTop).ColorIndex = 0 ;上边线颜色
                .Borders($xlEdgeBottom).LineStyle = $xlContinuous ;下边线
                .Borders($xlEdgeBottom).ColorIndex = 0 ;下边线颜色
                .Borders($xlEdgeLeft).LineStyle = $xlContinuous ;左边线
                .Borders($xlEdgeLeft).ColorIndex = 0 ;左边线颜色
                .Borders($xlEdgeRight).LineStyle = $xlContinuous ;右边线
                .Borders($xlEdgeRight).ColorIndex = 0 ;右边线颜色
                .Borders($xlInsideHorizontal).LineStyle = $xlContinuous ;内横线
                .Borders($xlInsideHorizontal).ColorIndex = 0 ;内横线颜色
                .Borders($xlInsideVertical).LineStyle = $xlContinuous ;内竖线
                .Borders($xlInsideVertical).ColorIndex = 0 ;内竖线颜色
        EndWith
有更好的解决办法么?
以前用的一直是3.7.15版本的,有些IE9方面的问题,不得不升

第一个原因估计是我安装好几个版本有哪里冲突上了,全卸了重装就正常了
第二个在老版EXCEL.AU3里有声明,复制出来加脚本里一切正常。

论坛里那个3.14.4 问题好多,试了多次,完全放弃。
3.14.2(5)目前看起来还不错

用3.3.13.x版本,14.x版本对象都有问题。
转身离开
分手说不出来
海鸟跟鱼相爱
只是一场意外
我们的爱差异一直存在
风中尘埃竟累积成伤害

TOP

我一直用 3.12,曾经升级过一次,发现以前写的代码运行出错,又没水平找原因,就又返回 3.12 了。目前坚守 3.12。  能用就行了

TOP

第2个问题我找到原因了,老版里EXCEL.AU3里有相应的变量声明,弄出来就正常了。
新版毕竟能解决IE9一些点击无效问题,EXCEL功能也加强了,这2样是我主要用到的地方,我还是尽量适应吧

TOP

我一直追新,且AU3作品比较少,功能变化对我来说没影响。

TOP

返回列表