我有一个动态的字符串列,想要执行转置和求和。该专栏的一个例子和最终目标如下:
**VARIABLE COLUMN TITLE**
VPPTest1
VPPTest2
VPPTest3
VPPTest4
VPPTest5
VPPTest6
我正在尝试获取公式(或一系列公式)来创建以下内容。如果这是最简单的话,也可以用VBA完成。
VPPTotal = VPPTest1 + VPPTest2 + VPPTest3 + VPPTest4 + VPPTest5 + VPPTest6
其中所有内容都是字符串,并将求和公式输出到单元格中。
注意输出是STRING而不是数值的整数。实际输出将是使VPPTotal高于字符串的串联。
任何帮助表示感谢。
谢谢!
答案 0 :(得分:1)
看起来像vba
,
此片段对" A2"之间的所有值进行求和。列#34; A"中的最后一个非空单元格,并将总和追加到列的末尾" A"
Dim row As Integer
Dim col as String
Dim total as Integer
col = "A"
row = 2
While Range(col & row) <> ""
total = total + Range(col & row)
row = row + 1
Wend
Range(col & row) = total
我希望它有用