Excel宏-将一列添加到另一列

Excel宏-将一列添加到另一列,excel,vba,Excel,Vba,您好,我有一个Excel工作表,其中包含以下数据: VISIT <48 >48 TOTAL BILLED NOT BILLED 10 4 3 7 3 访问48总账单未账单 10 4 3 7 3 我需要一个宏,可以将未计费的添加到您问题中的,我根据要求编写了一个测试和运行的宏。 假设您的单元格列与下面的部分相同。(请注意,行可能不同,并且可能从不同的位置开始) 您

您好,我有一个Excel工作表,其中包含以下数据:

VISIT  <48  >48  TOTAL BILLED   NOT BILLED

10      4   3         7             3
访问48总账单未账单
10      4   3         7             3

我需要一个宏,可以将未计费的添加到您问题中的,我根据要求编写了一个测试和运行的宏。
假设您的单元格与下面的部分相同。(请注意,行可能不同,并且可能从不同的位置开始)

您可以选择图片中显示的需要处理的行

子计算()
'为任何选择中的每一行计算
'在C中取值,在F中加值,如果F中的值大于0,则随后使F中的值等于0
'Asumes,列“C”有“Visit”,列“F”是“Not Billed”列
昏暗的选择范围
变暗rw As范围
我和你一样长
设置sel=选择
对于sel'中的每个rw,使其适应,但您需要指定要使用的选择
如果(单元格(rw.Row,6).Value>0),则“测试是否需要处理该值”
l=单元格(rw.Row,3)。数值+单元格(rw.Row,6)。数值
单元格(rw.Row,6)。值=0
单元格(rw.Row,3)。值=l
'单元格(rw.Row,3)将是C列
'单元格(rw.Row,6)将是F列
如果结束
下一个
端接头
运行宏后,您的文件将如下所示:


让我知道它是否适合你

这是一个循环引用,应该使用vba而不是公式来处理。这是一种危险的方法。仅通过查看数据,您如何知道未计费的已添加到