公司要求用Excel模板填充数据生成Excel报表,并要求支持相同文本单元格合并功能(即行列合并)。如果是逐个单元格填充数据是很慢的。用复制粘贴文本的方法是很快的。但是怎样用最快的速度去解决单元格合并呢。

解决方案 »

  1.   

    调用宏实现Excel的格式调整。比如单元格合并。xlApp.Run("test.xls!Macro1")在test.xls里有这么一个方法:
    Sub Macro1()
        Range("C6:H10").Select
        With Selection
            .HorizontalAlignment = xlCenter
            .VerticalAlignment = xlBottom
            .WrapText = False
            .Orientation = 0
            .AddIndent = False
            .ShrinkToFit = False
            .MergeCells = False
        End With
        Selection.Merge
    End Sub