Foxtable(狐表)用户栏目专家坐堂 → Foxtable支持为Excel单元格添加批注


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

主题:Foxtable支持为Excel单元格添加批注

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


加好友 发短信
等级:婴狐 帖子:78 积分:888 威望:0 精华:0 注册:2012/12/1 22:12:00
Foxtable支持为Excel单元格添加批注  发帖心情 Post By:2013/6/23 21:35:00 [只看该作者]

Foxtable中没有找到为Excel单元格增加批注的介绍,但有时需要为Excel单元格添加批注。例如,数据从Excel导入时,若原始数据有错,可以利用批注提示单元格错误信息。利用VBA试了一下,Foxtable支持为Excel单元格添加批注。示例代码如下:

 

Dim App As New MSExcel.Application

Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("C:\导入测试.xls")

Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)

Ws.Range("1:5").ClearComments '清除原有批注

Ws.Range("B3").AddComment("添加批注测试")  'B3单元格添加批注,注意批注内容在园括号内

App.Visible = True

 

补充说明:Excel单元格行号iRow、列号jCol使用变量时,可以改为:

Ws.Cells(iRow,jCol).AddComment("添加批注测试")

 

 

 

 

[此贴子已经被作者于2013-6-24 11:07:49编辑过]

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2013/6/24 6:49:00 [只看该作者]

谢分享。

 回到顶部