Question

嗨，我需要一些帮助来开始这一工作。我有一个公式在工作表上效果很好，但是我不知道如何将其转换为VBA代码，该代码将为我填充组合框。

我已经尝试过了，并用N / A值而不是我想要的值填充了组合框：

 Dim ReturnVal As Variant

    ReturnVal = Evaluate("=INDEX('Teams'!B2:S21,MATCH(1,(""" & Me.Select_Team.Value & """ ='Teams'!B3:S3),0))")

    If Not IsError(ReturnVal) Then
        Me.Team_Leader.Value = ReturnVal
    Else
        Me.Team_Leader.Value = "N/A"
    End If

这是在Excel工作表上起作用的公式。

公式：

=INDEX(Teams!B2:S21,1,MATCH('Ticket Pools'!J6,Teams!B3:S3,0))

这会搜索团队的名称，并从一个范围中调出其分配的团队负责人。

该用户窗体称为“ Edit_Teams”，上面有一个组合框“ Team_leader”，我希望在其中填充组合框。组合框已加载，因此我只使用：

“ Me.Team_Leader.Value = ReturnVal”

有人可以帮忙吗？

Answer 1

find_library()

–斯科特·克雷纳（c.f.评论）

这有效（万一任何人都需要复制）

在用户窗体组合框中使用INDEX和MATCH函数

1 个答案: