0

假设我有以下数据

Name   Date       Notional

Alice 10/1/2006&  1000  

Bob   12/5/2011  5000 

Dawn    1/1/2010   400

Alice   5/6/2009   500

Alice   7/13/2012   1500

Dawn    4/5/2012    100

我想再添加两列，总计和百分比。其中 Total sums Notional per person 和 Percentage 将给定的 Notional 视为 Total 的百分比。

所以爱丽丝在三个日期进行了三笔交易，三个名义上的数字分别是 1000、500 和 1500。她的总数是 3000，她的三个百分比是 33%、16.6% 和 50%

所以我的最终结果是：

Name    Date       Notional    Total    Percentage

Alice   10/1/2006  1000        3000       33%

Bob     12/5/2011  5000        5000       100% 

Dawn    1/1/2010   400         500        80%        

Alice   5/6/2009   500         3000       16.67% 

Alice   7/13/2012   1500       3000       50%  

Dawn    4/5/2012    100        500        20%

我希望编写一个宏，为提供名称匹配的每个人添加一个总和。

所以我的单元格 D2 将是 C2 * Indicator(A2,A2) + C3 * Indicator(A3,A2) + C4*Indicator(A4,A2) + C5*Indicator(A5,A2) + C6*Indicator(A6=A2) + C7*指标(A7=A2)

其中 Indicator(Ak,A2) 是一个指标函数，当 Range("Ak").Value=Range("A2").Value 时取值 1，否则取值为零。

有这样的功能吗？我想我可以自己创造一个。 

Public Function Indicator(c1 As Range, c2 As Range)
       Dim out As Integer
       If Range(c1).Value = Range(c2).Value Then
          out = 1
          Else: out = 0
          End If


End Function

我试图让它在更大的代码中运行。但是现在我遇到了很多错误。如果我可以让它运行，我会更新。

4

1 回答 1

2

我建立了一个数据透视表：

行：名称 | 日期

值：名义 [SUM] | 名义上的 [父行总数的百分比]

于 2013-11-13T18:53:19.127 回答