Foxtable(狐表)用户栏目专家坐堂 → 11.5版本中这这段代码好象不能运行吧


  共有10393人关注过本帖树形打印复制链接

主题:11.5版本中这这段代码好象不能运行吧

帅哥哟,离线,有人找我吗?
shixia
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:759 积分:7038 威望:0 精华:1 注册:2008/9/2 20:04:00
11.5版本中这这段代码好象不能运行吧  发帖心情 Post By:2010/11/16 20:39:00 [只看该作者]

 

Dim flg As New SaveExcelFlags
flg
.RowNumber = True
flg
.CellStyle = True
Tables(
"订单").SaveExcel("C:\data\test.xls","订单",flg
)

 

 

如果运行后就会出现错误


 回到顶部
帅哥哟,离线,有人找我吗?
czy
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章 三级勋章 二级勋章
等级:超级版主 帖子:6318 积分:33951 威望:0 精华:10 注册:2008/8/31 20:56:00
  发帖心情 Post By:2010/11/16 22:16:00 [只看该作者]

以前是不是这样的不记得了。

 

先用DirectoryExists判断一下路径中的目录是否存在,如果不存在CreateDirectory创建。不过这个活最好老六来干。


 回到顶部
帅哥哟,离线,有人找我吗?
mr725
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:5154 积分:31434 威望:0 精华:8 注册:2008/9/8 12:27:00
  发帖心情 Post By:2010/11/17 0:30:00 [只看该作者]

以前也是这样要手工先增加一个文件夹data的。

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2010/11/17 8:14:00 [只看该作者]

呵呵,我改改

 回到顶部