簡體   English   中英

Excel自動更新中的從屬下拉列表

[英]Dependent drop down list in excel auto update

我可以在excel中創建簡單的依賴下拉列表,如下面的屏幕快照所示。

http://s14.postimg.org/sip3g4nc1/dropdown1.jpg如果我在單元格E1中選擇TeamA,則TeamA的所有三個成員都顯示在單元格F1的下拉列表中

現在我要實現以下方案-

  1. 選擇E1中的團隊后,第一個成員將顯示在F1中。 目前,無論我在單元格E1處選擇什么,F1都將保持不變,直到我通過單擊F1的下拉列表更改值為止。

  2. G1和H1中將有另外兩個單元來容納成員。 因此,三個成員將有三個單元。 當我在E1中選擇團隊時,將立即使用相應的成員更新三個單元格(F1,G1和H1)。 每個成員單元都有一個下拉列表,其中包含所有成員以供以后選擇所需的成員。
    http://s16.postimg.org/zb2pja4hh/dropdown2.jpg

假設您使用了間接引用( TeamA下的行命名為TeamA ,依此類推):

Private Sub Worksheet_Change(ByVal Target As Range)
Dim rng(1) As Range, rng1 As Range
Set rng(0) = Range("E1") 'your primary selection
Set rng(1) = Range("F1:H1") 'your secondary selection range
Application.EnableEvents = False
If Not Intersect(Target, rng(0)) Is Nothing Then 'if you have changed your primary selection
    For Each rng1 In rng(1) 'each cell in your secondary selection
        i = i + 1
        rng1 = Range("" & rng(0).Value2)(i, 1) 'gets changed to the nth value in the indirect reference of the primary selection ("TeamA" 's second row is "MemberA2" for example)
    Next
End If
Application.EnableEvents = True
End Sub

您需要將此子項放到工作表模塊中,並以.xlsm擴展名保存文件。

暫無
暫無

聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.

 
粵ICP備18138465號  © 2020-2024 STACKOOM.COM