3

我有一个公式可以在另一张纸上搜索列标题，然后一旦找到它就会通过一些sumifs. 我的数据大致如下：

    1                          8            10                      11         12
Column E  ...  Column N ... Column O ... Column AB   Column AC   Column AD   Column AE

Existing        CCS           data         100.00      100.00     120.00      150.00

列名上方的数字很重要，我用它们来指定与我的公式相关的列。现在，实际上只有少数几个单元对循环很重要。单元格 A1 具有我要终止的列的编号。单元格 B1 具有我要开始的列的编号。因此，如果我选择A1=8and B1=1，我希望下面的代码sumifs通过搜索 column 开始运行1，然后搜索 column 2，一直到 column8并将每个循环中的所有值加在一起并给我总数。以上表为例，如果我设置A1="12"and B1="10"，我希望它吐出370.00。

我目前的公式是这样的：

=SUMIFS(INDEX('Program Data'!$A:$GA,0,MATCH(A1,'Data'!$1:$1,0)),'Data'!$N:$N,"CCS", 'Data'!$E:$E,"Existing")+SUMIFS(INDEX('Data'!$A:$GA,0,MATCH(A1,'Data'!$1:$1,0)), 'Data'!$N:$N,"CCS",'Data'!$E:$E,"Deep")

上面的公式只为我提供了包含 中的数字字符串的列的A1总数，但我需要包含来自 的字符串的所有列的总数B1 -> A1。

编辑

根据要求，这是我在此循环中的失败尝试。由于 B1 本质上始终是一个静态数字（意味着它将始终为 45 或 88 之类的），我想我可以创建一个循环，告诉它从 B1 的任何值开始，并根据需要创建公式并将其放入单元格中它。所以对于这个，B1=1=z...

Sub LoopingYTD()
Dim z As Integer: z = 1
Dim formulaString2 As String
Do Until z = Range("A1") + 1
    If formulaString2 = "" Then
        formulaString2 = "="
    Else
        formulaString2 = formulaString2 & " + "
    End If

    formulaString2 = formulaString2 + " SUMIFS(INDEX('Data'!A:GA,0,MATCH("
    formulaString2 = formulaString2 & """*"" & 
    formulaString2 = formulaString2 & "z"&" ""
    formulaString2 = formulaString2 & """*""" & ",'Data'!1:1,0)),"
    formulaString2 = formulaString2 & "'Data'!$N:$N,”CCS”,”        
    formulaString2 = formulaString2 & “'Data'!$E:$E,”Existing”))"

    formulaString2 = formulaString2 & "+ SUMIFS(INDEX('Data'!A:GA,0,MATCH("
    formulaString2 = formulaString2 & """*"" & 
    formulaString2 = formulaString2 & "z"&" ""
    formulaString2 = formulaString2 & """*""" & ",'Data'!1:1,0)),"
    formulaString2 = formulaString2 & "'Data'!$N:$N,”CCS”,”        
    formulaString2 = formulaString2 & “Data'!$E:$E, ”Deep”))"
    z = z + 1
Loop
Range("B20").Value = formulaString2

我不断收到“应用程序定义的或对象定义的错误”，但我不确定对此的补救措施是什么。

这是基于我之前提出的问题的建议。从那时起，我一直在尝试简化它，因为这有点乱，所以我只希望它搜索单个数字字符串。基本上运行链接中的代码，但不是一些基于多个单元格的长而复杂的字符串，我只想让它计数直到它达到 A1 中的值。

4

1 回答 1

1

好吧，如果 B 始终是一个静态数字，只需创建一个列，其中包含从 B 开始的可能数字，并计算附加到一个月的所有可能数字。因此，如果 B=20 且 A <=32，则该列将如下所示（假设这是 AD 列）：

AC   AD 
Jan  20
Feb  21
...
Dec  32

然后创建一个公式，将这些数字与您在 A1 中使用 AC 中的月份符号选择的数字进行比较，如果 A1<=（AD 列中的值），则将其相加。公式会有点长，但看起来像这个：

=SUM(
 (SUMIFS(INDEX('Program Data'!$A:$GA,0,MATCH($AD1,'Data'!1:1,0)),   
   'Data'!$N:$N,"CCS",'Data'!$E:$E,"Existing")+SUMIFS(INDEX(' 
   'Data'!$A:$GA,0,MATCH($AD1,'Data'!1:1,0)),'Data'!$N:$N,"CCS", 
   'Data'!$E:$E,"Deep"))*(1<=MATCH($A$1,$AC$1:$AC$12,0)),
 (SUMIFS(INDEX('Data'!$A:$GA,0,MATCH($AD2,'Program Data'!1:1,0)),   
   'Data'!$N:$N,"CCS",'Data'!$E:$E,"Existing")+SUMIFS(INDEX(' 
   'Data'!$A:$GA,0,MATCH($AD2,'Data'!1:1,0)),'Data'!$N:$N,"CCS",
   'Data'!$E:$E,"Deep"))*(2<=MATCH($A$1,$AC$1:$AC$12,0)),
 (SUMIFS(INDEX('Data'!$A:$GA,0,MATCH($AD3,'Data'!1:1,0)), 
   'Data'!$N:$N,"CCS",'Data'!$E:$E,"Existing")+SUMIFS(INDEX(
   'Data'!$A:$GA,0,MATCH($AD3,'Data'!1:1,0)),'Data'!$N:$N,"CCS", 
   'Data'!$E:$E,"Deep"))*(3<=MATCH($A$1,$AC$1:$AC$12,0)),
  ....,....,....
 (SUMIFS(INDEX('Data'!$A:$GA,0,MATCH($AD12,'Data'!1:1,0)),
   'Data'!$N:$N,"CCS",'Data'!$E:$E,"Existing")+SUMIFS(INDEX( 
   'Data'!$A:$GA,0,MATCH($AD12,'Data'!1:1,0)), 
   'Data'!$N:$N,"CCS",'Data'!$E:$E,"Deep"))*(12<=MATCH($A$1,$AC$1:$AC$12,0)))

其中 A1 = 您要停止的数字。请注意，您将语句末尾的匹配数字更改为每个升序的月份数字（1-12，而不是分配的数字）。这样它看起来对用户来说很好（他们不一定会理解这些数字）并且仍然会输出您想要的结果。

于 2013-11-26T21:40:44.403 回答