变体加入MS Access

时间:2015-02-24 23:25:56

标签: sql ms-access access-vba

我正在转换一个超过80个Sumifs的电子表格用于输出。

对于查询,我可以加入2个表,但它们依赖于6-8个不一致的因子,因此,总和。

在某些情况下,我已经成功进行了正确的连接,但大部分时间我都需要在所有条件下进餐。

我的一种方法是写一个这样的函数:

Public Function DetermineCOB_ID(strFund As String, strType As String, strMDEP As String, _
strTier1 As String, strAirGround As Variant, strAcctType As String) As Integer

    If strFund = "A82AB" And strType = "Base" And strTier1 = "2 BCT" And strMDEP = "W25D" And strAcctType = "Subordinate_Cmds" Then
        DetermineCOB_ID = 1
    ElseIf strFund = "A82AC" And strType = "Base" And strMDEP = "W25D" And strAcctType = "Subordinate_Cmds" Then
        DetermineCOB_ID = 2
    ElseIf strFund = "A82AD" And strType = "Base" And strMDEP = "W25D" And strAirGround = "Ground" And strAcctType = "Subordinate_Cmds" Then
        DetermineCOB_ID = 3
    Else
        DetermineCOB_ID = 0
    End If


End Function

但我必须写80个单独的ElseIf语句。

我想将我的逻辑连接到控制表,用户可以更改决定值的因素。

这会以某种方式涉及“变体”连接,只要有连接,就不需要连接。我希望我有意义。

有没有其他方法可以解决这个问题?

1 个答案:

答案 0 :(得分:0)

是的,我正在使用后端,这有很多不足之处。在此期间,我正在探索其他解决方案。你知道一种方法使连接响应变量变量,即它可以使用空值。我已经尝试过外连接,但它并没有真正起作用。