Excel减去宏

时间:2016-07-28 06:15:54

标签: excel vba

我在A列中有值,在B列中有值,我希望在C列中减去这两个值,因此它会C1=B1-A1, C2=B2-A2等。 我仍然无法在VBA中编写代码,所以我尝试手动使用宏,但问题是我在这个工作表中有很多列表,并且每个列表都有不同的行数,所以我最终在特定列表上进行了比我更多的计算需要。如何仅针对特定列表中的行数进行减法?

2 个答案:

答案 0 :(得分:3)

你不需要宏或任何东西

只需在C1中编写Formular,然后单击小黑框和右角

screenshot

并将其拖下来。

这将为C2 = A2+B2等等提供C3 A3+B3

答案 1 :(得分:1)

试试这个:

Sub forEachWs()
        Dim ws As Worksheet
        Dim lastRow As Long
        For Each ws In ActiveWorkbook.Worksheets
            lastRow = ws.Cells.Find("*", SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row
            ws.Range("C1:C" & lastRow).Formula = "=B1-A1"
        Next
    End Sub