excel报表中插入或删除多行 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → excel报表中插入或删除多行

共有2486人关注过本帖树形打印复制链接主题：excel报表中插入或删除多行

一笑

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：四尾狐帖子：808 积分：6213 威望：0 精华：0 注册：2014/3/23 23:02:00

excel报表中插入或删除多行 发帖心情

Post By：2018/8/17 18:41:00 [只看该作者]

帮助文档中Insert和RemoveAt插入或删除单行，如：

Sheet.Rows.RemoveAt(0)

可否插入或删除多行？谢谢！

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：112364 积分：572076 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2018/8/17 20:30:00 [只看该作者]

循环

for i as integer = 1 to 100

Sheet.Rows.RemoveAt(0)

或者参考：http://www.foxtable.com/webhelp/scr/2121.htm

Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\Report.xls")
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
Dim Rg As MSExcel.Range = Ws.Rows("1:3")'选定多行
Rg.Delete(MSExcel.XlDirection.xlUp) '下面的单元格上移
Rg = Ws.Columns("D:F") '选定多列
Rg.Delete(MSExcel.XlDirection.xlToLeft) '右面的单元格左移
App.Visible = True

下一主题 >> << 上一主题

主题：excel报表中插入或删除多行