blue_dvd 发表于 2016-11-25 17:55:19

Excel表格制作问题？【已解决】

本帖最后由 blue_dvd 于 2016-11-26 16:19 编辑


With $oExcel.ActiveSheet.Range("A2:I8")
      .Borders($xlEdgeTop).LineStyle = $xlContinuous             ;上边线
      .Borders($xlEdgeTop).ColorIndex = 12                     ;上边线颜色
      .Borders($xlEdgeBottom).LineStyle = $xlContinuous          ;下边线
      .Borders($xlEdgeBottom).ColorIndex = 32                  ;下边线颜色
      .Borders($xlEdgeLeft).LineStyle = $xlContinuous            ;左边线
      .Borders($xlEdgeLeft).ColorIndex = 6                     ;左边线颜色
      .Borders($xlEdgeRight).LineStyle = $xlContinuous         ;右边线
      .Borders($xlEdgeRight).ColorIndex = 45                     ;右边线颜色
                .Borders($xlInsideHorizontal).LineStyle = $xlContinuous    ;内横线
      .Borders($xlInsideHorizontal).ColorIndex = 3               ;内横线颜色
                .Borders($xlInsideVertical).LineStyle = $xlContinuous      ;内竖线
      .Borders($xlInsideVertical).ColorIndex = 4               ;内竖线颜色
EndWith
设置时出现变量未声明错误，请问如何调用Excel中的这些变量？谢谢
kevinch大哥有空过来帮忙看下！

kk_lee69 发表于 2016-11-25 21:29:22

回复 1# blue_dvd

請直接 填上 值

可 網上搜尋 xlContinuous VBA值

會有相關資料...............

kevinch 发表于 2016-11-26 14:31:03

在excel里按alt+f11，打开vbe编辑器，再按ctrl+g打开立即窗口，在立即窗口里输入?和要查询的常量名回车，即可显示对应的数值，例如：
?xlEdgeLeft
7

kevinch 发表于 2016-11-26 14:32:18

你需要把你程序中引用的常量名全部替换为对应的数值，除非你声明并赋值了对应常量

blue_dvd 发表于 2016-11-26 16:18:39

回复 3# kevinch

多谢了，终于明白了！

chzj589 发表于 2016-11-26 19:00:53

导出加上Excel表格，如果数据多导出速度会很慢

blue_dvd 发表于 2016-11-27 11:27:17

回复 6# chzj589

有无快速方法？

chzj589 发表于 2016-11-27 11:33:22

回复chzj589

有无快速方法？
blue_dvd 发表于 2016-11-27 11:27 http://www.autoitx.com/images/common/back.gif
以前我也喜欢加上Excel表格，但如果有几千条数据导出的话，会慢很多。
找不到方法，只好放弃，不用表格了。
其实在Excel编辑表格是很简单的

heroxianf 发表于 2016-11-30 01:44:46

回复 7# blue_dvd


    我们不是在数据库里kk提供的驱动吗？直接粘贴数组很快的！

blue_dvd 发表于 2016-11-30 12:24:05

回复 9# heroxianf

哪里？可以详细些吗？

heroxianf 发表于 2016-11-30 12:41:45

回复 10# blue_dvd

传送门 自己研究一下吧。
http://www.autoitx.com/thread-53866-1-1.html
页: [1]
查看完整版本: Excel表格制作问题？【已解决】