1,108
社区成员
发帖
与我相关
我的任务
分享用OLEObject对excel操作，怎样添加、删除一行或者多行？
用OLEObject对excel操作，怎样添加、删除一行或者多行？
OLEObject ExcelServer
integer ExcelOK
ExcelServer = CREATE OLEObject
//判断EXCEL
ExcelOK = ExcelServer.ConnectToNewObject( "Excel.application" )
if ExcelOk<>0 then
MessageBox('错误','无法与Excel联结，请通知管理员')
destroy ExcelServer
return false
end if
OLEObject ExcelServer
integer ExcelOK
ExcelServer = CREATE OLEObject
//判断EXCEL
ExcelOK = ExcelServer.ConnectToNewObject( "Excel.application" )
if ExcelOk<>0 then
MessageBox('错误','无法与Excel联结，请通知管理员')
destroy ExcelServer
return false
end if
...全文
请发表友善的回复…
发表回复
flyingti 2003-12-02
- 打赏
- 举报
ExcelServer.activeworkbook.activesheet.range("A1").EntireRow.Delete()
以上语句将删除A1一整行。
ExcelServer.activeworkbook.activesheet.Rows(4).Insert
以上语句将在第4行前插入一行。
以上语句将删除A1一整行。
ExcelServer.activeworkbook.activesheet.Rows(4).Insert
以上语句将在第4行前插入一行。
