vba - 如果某些列值相同，如何在 VBA 中组合一行单元格

Question

我有一个数据库，其中存储了用户（通过用户表单）的所有输入。在数据库中，每一列是数据类型（例如日期、班次、数量等）的不同类别，来自用户表单输入的数据被放入相应的类别。对于某些数据，除了数量之外，所有数据都是相同的。我想知道如何将这些行组合成一个并将整个数据库的数量相互添加（例如，组合第一个和第三个数据条目）。我尝试过使用几个不同的循环，但似乎无法解决任何问题。

Period    Date    Line    Shift   Type    Quantity   

4 x 2     4/3/18   A       3       14       18  
4 x 2     4/3/18   A       3       13       12  
4 x 2     4/3/18   A       3       14       15

谢谢！

标签： vbaexcel

Answer 1

如果您要修改基础数据库，您可以通过在 GROUP BY 语句中包含所有其他列，将数据查询为您想要的格式，将结果保存到另一个表，然后将原始表替换为格式正确的一个。

如果您在 Excel 中有数据，并且只想查看汇总重复行的数据，那么数据透视表将是一个不错的选择。您可以选择所有其他列作为数据透视表的行，并将数量的总和作为值。