如何用ASP合并Excel的单元格。在线等，急

rcyrcy 2005-09-09 09:45:57

我用
set objExcel=CreateObject("Excel.Application")
objExcel.Workbooks.Open(server.mappath("../../")&"\Template\＊＊＊.xls")
打开一个Excel模板，如何实现单元格的合并？

...全文

276 7 打赏收藏转发到动态举报

写回复

用AI写文章

7 条回复

切换为时间正序

请发表友善的回复…

发表回复

liumangrabbit 2005-09-09

打赏
举报

学习一下

qiqunet 2005-09-09

打赏
举报

另外，Excel的大部份操作代码可以通过在Excel程序中录制宏来得到

qiqunet 2005-09-09

打赏
举报

用“Activesheet.Range("A1:B5").Merge”的形式也行，只不过，要把运行时的列号数字转换为字母用起来就有点不顺畅

qiqunet 2005-09-09

打赏
举报

set myexcell=CreateObject("Excel.Application")
set mywork=myexcell.Workbooks.Open(server.MapPath("excellout\"& newfile))
myexcell.DisplayAlerts = False
set Activesheet=myexcell.sheets("sheet1")
Activesheet.cells(1,1)="基本信息"
Activesheet.Range(Activesheet.Cells(1, 1), Activesheet.Cells(1, 5)).Merge
Activesheet.cells(1,1)="项目内容"
Activesheet.Range(Activesheet.Cells(2, 1), Activesheet.Cells(5, 5)).Merge
mywork.save
mywork.close
set mywork=nothing
set myexcell=nothing

qoo1983 2005-09-09