别告诉我先删除在插入行的方法,而且要块、行、列的。

解决方案 »

  1.   

    类似Delphi7目录下的Excel2000的函数UnMerge给我的启发,我仔细察看了F1Book6的函数文件,
    没有发现UnMerge的函数,带的英文帮助里也没有线索,我试着调出运行期的右键菜单,发现只
    要把Merge复选框的勾去掉就会使已经合并的单元格拆开,带着这点启发,我试着把合并单元格
    的代码反操作,发现了拆分单元格的方法:procedure TfrmTemplateBase.btnFmtUnCombinCellClick(Sender: TObject);
    var
      aF1CellFormat: IF1CellFormat;
    begin
      //取消合并单元格
      aF1CellFormat := F1Book601.GetCellFormat;
      aF1CellFormat.MergeCells := false;//或aF1CellFormat.MergeCells(false);
      F1Book601.SetCellFormat(aF1CellFormat);
    end;
    这样您预先用鼠标选中的已经合并的单元格就会拆开了。
    再看F1Book的函数文件(文件名忘了,可以鼠标+Contrl键点代码中的SetCellFormat调出它)
    MergeCells是个过程,只有一个Bool型的参数,看来以后再遇到类似的问题,都可以用这个
    方法试验一下。