51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 1815|回复: 4
打印 上一主题 下一主题

[原创] QTP删除excel内指定sheet!

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2011-11-25 10:37:39 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
那位大侠给个案例!学习下!
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

2#
发表于 2011-11-25 12:27:20 | 只看该作者
你需要创建EXCEL 的对象
Set ObjExcel = CreateObject("Excel.Application")
ObjExcel .Visible = True   'Excel可见
Set ShExcel = ObjExcel.WorkBooks.Open(PATHS)   'PATHS 是你的EXCEL的路径
ShExcel.Worksheets(1).Delete  '删除 第一个SHEET   也可以写名字 如"Sheet1"

网上有许多介绍Excel.Applicatio 这个玩意的~ 可以上GOOGLE 百度一下~~ 哈哈
回复 支持 反对

使用道具 举报

该用户从未签到

3#
发表于 2011-11-27 11:02:09 | 只看该作者
回复 2# bfhx1314


    支持
回复 支持 反对

使用道具 举报

该用户从未签到

4#
发表于 2011-11-28 11:53:46 | 只看该作者
帮助手册,搜索DateTable,你会得到更多的强大,并且绝对能通过的例子!
回复 支持 反对

使用道具 举报

该用户从未签到

5#
 楼主| 发表于 2011-11-29 11:00:50 | 只看该作者
3Q各位!
回复 支持 反对

使用道具 举报

本版积分规则

关闭

站长推荐上一条 /1 下一条

小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 关于我们

GMT+8, 2024-11-16 12:36 , Processed in 0.086724 second(s), 27 queries .

Powered by Discuz! X3.2

© 2001-2024 Comsenz Inc.

快速回复 返回顶部 返回列表