作者:iamlaosong
试验了一下合并单元格后读取单元格内容,假定G3:H5合并为一个单元格。
程序:
Private Sub test()
For row1 = 3 To 10
MsgBox Cells(row1, 7)
MsgBox Cells(row1, 8)
MsgBox Cells(row1, 9)
Next row1
End Sub
试验结果:合并后的单元格中第一行第一列(即G3)有内容,其它(G4、G5、H3、H4、H5)为空。
那么,如果对这些单元格赋值呢?用下面程序(J14-L14合并单元格):
Public Sub test()
a = Cells(14, 10)
b = Cells(14, 11)
c = Cells(14, 12)
Cells(14, 10) = "ssss"
Cells(14, 11) = "dddd"
Cells(14, 12) = "cccc"
a = Cells(14, 10)
b = Cells(14, 11)
c = Cells(14, 12)
End Sub
试验结果:可以对合并单元格中的任何单元格赋值,但只有第一个有效,其它单元格复制前后都是空值。