Excel“跳转菜单”,其中下拉选项根据其他select更改
有没有可能在Excel中创build“跳转菜单”?
与在网站上使用的原则相同。 根据您select的选项,下一个菜单会改变。 请看下面的例子
谢谢
保罗
是的,你可以用下面的设置来做到这一点。
在一些表单上设置一些命名范围,例如供应商列表( VendorList
)和一些其他具有生产例如AppleList
和MSList
:
和例如产品列表:
在另一张表上,您可以设置两个单元格进行数据validation。 设置一个为VendorList
,另一个默认为AppleList
:
而其他细胞validation:
然后,在Worksheet
代码模块中,为Worksheet_Change
事件放入此代码:
Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo CleanUp If Not Intersect(Target, Range("Selection1")) Is Nothing Then 'suspend events Application.EnableEvents = False 'remove existing validation Range("Selection2").Validation.Delete 'add new validation to Selection2 Select Case Range("Selection1").Value Case "Apple" Range("Selection2").Validation.Add _ Type:=xlValidateList, _ Formula1:="=AppleList" Case "Microsoft" Range("Selection2").Validation.Add _ Type:=xlValidateList, _ Formula1:="=MSList" Case Else 'do nothing End Select End If CleanUp: Application.EnableEvents = True End Sub
请注意,代码会暂时将EnableEvents
作为事件处理程序的一部分更改为Range
值。