分别合并两行

时间:2013-04-16 20:59:35

标签: excel excel-vba vba

当我在vba中执行以下操作时,两行合并为一行。我希望有两个独立的合并行,任何人都可以帮忙吗?

Range("A" & 1 & ":I" & 1).MergeCells = True
Range("A" & 2 & ":I" & 2).MergeCells = True

1 个答案:

答案 0 :(得分:0)

继续我的评论试试这个

Sub Sample()
    Range("A" & 1 & ":I" & 2).MergeCells = False

    Range("A" & 1 & ":I" & 1).MergeCells = True
    Range("A" & 2 & ":I" & 2).MergeCells = True
End Sub