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

[rcyrcy]

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

[wtg321]

首先,你既然有模板,那就直接在模板里先合并好了就是了.

其次:我在网上看到的命令是:

objExcelSheet.Range("A1:C3").merge

你试一下吧.我没试过.

[legend1970]

我同意这个：你既然有模板,那就直接在模板里先合并好了就是了，objExcelSheet.Range("A1:C3").merge，不得行。网上有类似的方法！

[qoo1983]

直接合并摩板不可以吗

[qiqunet]

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

[qiqunet]

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

[qiqunet]

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

[liumangrabbit]

学习一下