时间戳

首页 > 解决方案 > 如何使这个 .additem 循环依赖于 userfor 文本框值？

excel - 如何使这个 .additem 循环依赖于 userfor 文本框值？

问题描述

我有一个子程序，它在用户窗体中的初始化事件期间被调用。cmbReqFunding这样做是在组合框 ( )中添加职位 ID #'s - 职位名称。现在，它加载了所有工作，但我想知道如何使这依赖于txtELT工作所属的领导者（）。即如果Leader 1 被填充，txtELT那么只cmbReqFunding用他们的工作填充下拉列表，并排除所有其他人。

Sub LoadReqs_Cmb()
Dim rWS As Worksheet: Set rWS = ThisWorkbook.Worksheets("Reqs")
If UserForm1.cmbFundingCategory.Value = "Req Reduction" Then
   If rWS.Cells(x, 7) = txtELT.Value Then 'see if column 7 in sheet is ELT value
        For x = 2 To rWS.Cells(Rows.Count, 1).End(xlUp).Row
            UserForm1.cmbReqFunding.AddItem rWS.Cells(x, 2) & " - " & rWS.Cells(x, 5)
        Next x
   Else
   End If
End If
End Sub

有没有办法做到这一点？我在网上找到的所有内容都处理模块窗口中的硬编码值，而不是我如何加载这些值。

标签： excelvba

解决方案

推荐阅读