Question

EXCEL，vba--求助，单元格满足条件时向→第4个单元格写入特定值

但右边那个单元格是合并单元格如图（E18：E21合并），但满足条件单元格是A21。这时候它的右边单元格却是E18怎么办00。
指向某单元格时发现这格单元格不存在。。合并后单元格遇到这种情况怎么办？





Answer 1

对于合并了的单元格，只有向合并区域第一个单元格存数才有效果，向其他单元格写入数据都是无效的。

方案一、代码首先取消所有单元格合并：
Cells.UnMerge
这样就可以确保一对一填写数据

方案二、合并区域需要写入数据的时候，写入到合并区域的第一个单元格：
Range("E21").MergeArea = 5
如果E18:E21合并，此语句能把数据写入E18，能显示出来，但是如果E18、E19、E20也分别这样写入，只有最后一次的数据得到保存。

数据处理人员反对一切形式的单元格合并。

Answer 2

Sheets(10).Cells(j,1).Offset(,4).MergeArea = Cells(i,2)

如果要向A5单元格赋值, 但是不确定A5单元格是否是合并单元格, 直接用以下代码即可

Cells(5,1).MergeArea = 1

如果A5不是合并单元格就等于直接给A5赋值, 如果A5在合并单元格里, 就是给A5所在的合并单元格赋值.

追问

直接在后面添加mergearea？

追答

是的, 你试试

追问

感觉是对的✧٩(ˊωˋ*)و✧谢谢