根据另一列但相同行中的值在列中添加多个单元格

时间:2016-12-15 18:22:31

标签: excel vba

如果之前已经回答过这个问题我很抱歉,我不太确定如何提出这个问题。我正在为工作制作邮资报告。我们在批次信息列A-F(批次#,方案,下降时间,总件数,折扣和邮资)中输入了一个区域。我在K-O栏中有一个区域来总结批次(批次1中的所有部分将在K列中总计)

现在有时我们可以拥有批次1a,1b和最多1c。我想要做的是总结批次1的总数,即使它不止一个,全部在Total Pieces列下的一个单元格中。更具体地说:列D中的行单元格,其中行在列A中具有批处理#。是否有公式要执行此操作,还是应该以不同方式修改表格?

enter image description here

Private Sub CommandButton1_Click()

Dim iRow As Long

Dim ws As Worksheet
Set ws = ThisWorkbook.ActiveSheet

iRow = ws.Cells(Rows.Count, 1) _
.End(xlUp).Offset(1, 0).Row

With ws
.Cells(iRow, 1).Value = Me.TextBox1.Value
.Cells(iRow, 2).Value = Me.TextBox2.Value
.Cells(iRow, 3).Value = Me.TextBox3.Value
.Cells(iRow, 4).Value = Me.TextBox4.Value
.Cells(iRow, 5).Value = Me.TextBox5.Value
.Cells(iRow, 6).Value = Me.TextBox6.Value
End With

Unload Me

End Sub

1 个答案:

答案 0 :(得分:0)

您可以使用函数SUMIF()来实现此目的。您可以在此处找到详细信息或使用此公式:https://www.techonthenet.com/excel/formulas/sumif.php