假设我的一级菜单是在A列,二级菜单在B列,现在的需求是:更改一级菜单后使二级菜单清空。
这样做目的是重新填二级菜单,避免信息无效(如果只改一级菜单内容,二级菜单可能就不是一级菜单底下的了)
这里只能用宏来实现,写VBA程序实现
看效果
〇、鼠标右键点击工作表标签,选择“查看代码”,将下面的代码粘贴到宏编辑框:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Rng As Range
If Target.Row < 2 Then Exit Sub '修改第一行(标题)不往下执行
For Each Rng In Target
If Rng.Column = 1 Then '修改A列
Rng.Offset(0, 1).ClearContents '清除B列
End If
If Rng.Column = 2 Then '修改B列
Rng.Offset(0, 1).ClearContents '清除C列
End If
Next
End Sub
----然后粘贴-->>>>