Foxtable(狐表)用户栏目专家坐堂 → 求助:如何通过代码控制并修改或者删除excel表中对应的列,并形成新的EXCEL文件


  共有2343人关注过本帖平板打印复制链接

主题:求助:如何通过代码控制并修改或者删除excel表中对应的列,并形成新的EXCEL文件

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


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

Dim Book As New XLS.Book("d:\公诉信息表.xls") '定义一个Excel工作簿
Dim Sheet As XLS.Sheet = Book.Sheets(0) '引用工作簿的第一个工作表
sheet(0,4).value = "承办组"
sheet.Cols.RemoveAt(1)
Book.Save("d:\test.xls") '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = "d:\test.xls"
Proc.Start()

 回到顶部