如何使用Microsoft Excel Object Library实现整行及多行copy,Past

[hhqing]

使用Microsoft Excel Object Library可是实现整个Sheet的拷贝.
如何实现使用Microsoft Excel Object Library实现整行及多行(连续的)copy,Past

[zhuomaocn]

Rows("3:4").Select
Selection.Copy
Rows("7:7").Select
ActiveSheet.Paste

[hhqing]

如何实现多行的删除?谢谢

[hhqing]

如何实现多行的插入?

[zhuomaocn]

插入：
Rows("4:5").Select
Selection.Copy
Rows("7:7").Select
Selection.Insert(-4121) '-4121可以不要
删除
Rows("7:8").Select
Selection.Delete(-4162) '-4162可以不要

[hhqing]

谢谢,Rows("n:m")是不是代表从n行到m行,还有如果是在两个SHEET间使用的话,那么是不是在操作之前要ACTIVE相应的SHEET?

[zhuomaocn]

1. 你说的不错，开始行号，终了行号的意思

2. 不同页面间插入的例子
Rows("5:6").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Sheet2").Select
Rows("7:7").Select
Selection.Insert(-4121)

[hhqing]

我现在是在ASP中使用,使用VBScript,这样可以吗?

[zhuomaocn]

你只要申明了对象就可以用啊
比如

Set xlApp = server.CreateObject("Excel.Application")
strsource = "c:excelook1.xls"
Set xlbook = xlApp.Workbooks.Open(strsource)
Set xlsheet = xlbook.Worksheets(1)
...