excel中二级菜单怎么能随一级菜单的改变而清空?

关键字：excel 更新时间：2021-06-06 01:22:55 699次访问

做了个excel表，制作了二级菜单，当一级菜单的项目变了，而二级菜单的内容还不变。
请教各位大神，如何设置，才能实现当一级菜单有变时，二级菜单里的内容能自动清空？谢谢。

这种情况要用VBA代码来实现。前提条件是：A列为一级菜单所在列，B列为二级菜单所在列，都是从第二行开始。（如果不是，代码做一个简单修改即可）

1、按ALT+F11进入VBA编辑器。

2、在左而工程-VBAproject窗口选中数据所在的sheet,将下便代码复制过去即可。

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      

       Next 

End Sub

相关标签：excel