如果某些列值相同，如何在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

谢谢！

Answer 1

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

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