根据数据validation列表select清除合并的单元格内容

我试图根据数据validation列表中的select清除合并单元格的内容（该列表也在合并的单元格中）。 是的，“不要使用合并的单元格！” 是伟大的build议（我更喜欢“中心对面”），但会在这种情况下复杂的事情。 我尝试使用“MergeArea”命名合并的单元格，但是我还没有成功find解决scheme。

下面是我有最新的迭代。 请注意，在添加第二个select（或本例中的“空白”）之前，我一直试图做出一个select（在这种情况下为“是”）。

Private Sub Worksheet_Change(ByVal Target As Range) Application.EnableEvents = False If Range("Max_Advance").MergeArea Then If Range.Validation.Type = 2 Then Range("Days_Needed").MergeArea.ClearContents End If End If exitHandler: Application.EnableEvents = True Exit Sub End Sub 

谁能帮忙？ 我还附上了一张照片，以直观地展示我正在处理的事情：

Answer 1

这对你有用吗？

 Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address(0, 0) = "A2" Then On Error GoTo exitHandler Application.EnableEvents = False If LCase(Target.Value) <> "no. please enter." Then Range("Days_Needed").MergeArea.ClearContents End If End If exitHandler: Application.EnableEvents = True Exit Sub End Sub 

Answer 2

通常可以通过将合并单元格的内容视为合并中的第一个单元格来清除其内容。

例如：

 Range("A2")=""