1

vba で次のようにすると、2 つの行が 1 つにマージされます。2 つの別々のマージされた行が必要です。誰か助けてもらえますか??

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

1 に答える 1

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
于 2013-04-16T21:07:08.640 に答える