如何代码实现Excel单元格合并？？？**

dupit

用 DispatchHelper 用法实现Excel 单元格的合并 ，如何写？

zfang

Sub Macro2()
'
' Macro2 Macro
' 宏由 人员1(RY1)-3 录制，时间: 2008-9-10
'

'
    Range("A3:B4").Select
    With Selection
        .HorizontalAlignment = xlGeneral
        .VerticalAlignment = xlBottom
        .WrapText = False
        .Orientation = 0
        .AddIndent = False
        .IndentLevel = 0
        .ShrinkToFit = False
        .ReadingOrder = xlContext
        .MergeCells = True
    End With
End Sub
Sub Macro3()
这是我录制的宏，你翻译到平台就可以了。（设定要合并的单元格范围，然后调用Merge属性）

dupit

...就是 DispatchHelper 用法不会 ， 才叫你们翻译啊 。

DispatchHelper 的用法，参数说明， 有没文档可以参考。

jiahaiming

论坛上很多的，楼主可以搜索一下

zfang

类似于
//合并单元格
  tUsed := DispatchHelper.Create(ATarget.PropertyGet('Range', ['C7','D7']));
  tUsed.InvokeMethod('Merge',[]);
注：
tUsed, ATarget: DispatchHelper;

dupit

自动换行及行宽度自动适应 的属性如何设置？

zfang

楼主，参考2楼和5楼的方式来实现。