Foxtable(狐表)用户栏目专家坐堂 → Excel模板,在打印时能否不打印【批注】 ···解决了···


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

主题:Excel模板,在打印时能否不打印【批注】 ···解决了···

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


加好友 发短信 一级勋章
等级:版主 帖子:1993 积分:19403 威望:0 精华:20 注册:2008/9/2 10:09:00
  发帖心情 Post By:2010/7/16 14:41:00 [显示全部帖子]

可以在生成Excel报表后,通过MSExcel中Range的方法把全部的批注删除。

置顶的帖子中即将介绍到Range,敬请关注。

不要把它想的太复杂。把置顶帖子中的代码全部练习一遍,Excel中所有的常规操作基本都能用它完成了。。


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


加好友 发短信 一级勋章
等级:版主 帖子:1993 积分:19403 威望:0 精华:20 注册:2008/9/2 10:09:00
  发帖心情 Post By:2010/7/16 17:34:00 [显示全部帖子]

以下是引用mr725在2010-7-16 16:39:00的发言:

解决了:

Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("C:\Reports.xls")
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
Wb.Sheets(1).range("E3").ClearComments    ‘将E3单元格上的批注删除掉!!!
App.Visible = True

呵呵,或者将批注隐藏也可以。

Range中的属性和方法非常丰富,功能比foxtable封装的excel多太多了。


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


加好友 发短信 一级勋章
等级:版主 帖子:1993 积分:19403 威望:0 精华:20 注册:2008/9/2 10:09:00
  发帖心情 Post By:2010/7/16 18:05:00 [显示全部帖子]

以下是引用狐狸爸爸在2010-7-16 17:42:00的发言:
呵呵,快点更新教程图片点击可在新窗口打开查看

Range的内容太多了,可能的话,今晚将更新。

必须把每个示例的代码在foxtable中运行通过才行,这个有点太浪费时间。


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


加好友 发短信 一级勋章
等级:版主 帖子:1993 积分:19403 威望:0 精华:20 注册:2008/9/2 10:09:00
  发帖心情 Post By:2010/7/16 18:14:00 [显示全部帖子]

以下是引用mr725在2010-7-16 18:08:00的发言:

 

另外代码最后面还要加个Wb.Save,不然老是提示···

如果App的Visible为True,程序本身是可见的,如果修改了,关闭时只能由自己决定是否保存。

如果为False,且通过代码对Excel工作簿进行了修改,这就必须加个Save了。如果想不要提示,可以将App的DisplayAlerts设为False


 回到顶部