-----------|
   内盒    |
-----------|
 长| 宽| 高|
-----------|
以上是我想合并的效果
代码如下:
        Range := exele.ActiveSheet.Range['A2:C2'];
        Range.merge;
        //Sheet.Cells[1, 1].value := '内盒'; //此行是把合并后的单元格赋值,虽然成功,但是会跳出提示框,且我有很多出用到合并,因为会跳出很多提示筐
        Sheet.Cells[2, 1].value := '长';
        Sheet.Cells[2, 2].value := '宽';
        Sheet.Cells[2, 3].value := '高';
问题是:1:我要怎么合并单元格
        2:我那样合并可以吗?如果可以要怎么赋值给合并的单元格;且不让它跳出,有点类似错误的提示筐;

解决方案 »

  1.   

    ExcelWorksheet1.Columns.Range['A1','C1'].Merge(True);
      

  2.   

    更正:Range := exele.ActiveSheet.Range['A2:C2'];改为
    Range := exele.ActiveSheet.Range['A1:C1'];
      

  3.   

    to: fyje(云中仙) 
    如何赋值给单元格啊?谢谢
      

  4.   

    合并后,导出excel 提示如下信息筐
    “选定区域包含多重数值,合并到一个单元格后只能保留最左上角的数据”
    每次都要点击确定才可以