Excel VBA:基于列值合并(求和)行

Excel VBA:基于列值合并(求和)行,vba,excel,Vba,Excel,我有一个随机生成的语言列表,每个文件有不同的字数,我需要根据列a中的值合并(求和)函数行 基本上,我需要它根据A列上的值合并B-J列的行(值)。只有当值相同时,否则不要合并任何内容 一种语言的多行意味着该语言有更多的文件。如果有更多的文件,那么我需要通过合并行来获得总字数 请参阅以下参考图片: 源表 更新表 有什么想法吗 EDIT1:我有一个大宏,可以加载CSV和所有这些数据并处理它们。我的目标是拥有一个按钮宏,它将导入CSV并以我需要的格式处理数据。有几十个代码可以让它看起来像上面的截图。

我有一个随机生成的语言列表,每个文件有不同的字数,我需要根据列a中的值合并(求和)函数行

基本上,我需要它根据A列上的值合并B-J列的行(值)。只有当值相同时,否则不要合并任何内容

一种语言的多行意味着该语言有更多的文件。如果有更多的文件,那么我需要通过合并行来获得总字数

请参阅以下参考图片:

源表

更新表

有什么想法吗


EDIT1:我有一个大宏,可以加载CSV和所有这些数据并处理它们。我的目标是拥有一个按钮宏,它将导入CSV并以我需要的格式处理数据。有几十个代码可以让它看起来像上面的截图。最后一件事是合并单元格。感谢您的建议。

选择数据下方最左边的单元格,然后点击“数据”选项卡上的按钮。
在新窗口中:标记您的范围,选择“总和”并在“左栏中使用标签”和“确定”

这将为您提供汇总列表:

提示:使用record macro()可以获得如下代码:

Selection.Consolidate Sources:="[Book1]Sheet2!R2C1:R11C10", Function:=xlSum, TopRow:=False, LeftColumn:=True, CreateLinks:=False
最好的部分是:您可以使用外部数据来完成此操作!因此,可以直接从csv导入;)


做“真正的代码”取决于你自己

如果您不喜欢使用透视表,请使用透视表,就像非常简单地使用
SUMIF
。你尝试过或研究过什么?这不起作用,因为我有一个大宏,它可以加载CSV和所有这些数据并处理它们。我的目标是拥有一个按钮宏,它将导入CSV并以我需要的格式处理数据。有几十个代码可以让它看起来像上面的截图。最后一件事是合并单元格。感谢您的建议。然后使用
Application.WorksheetFormula.SumIfs()
。谢谢,不客气。如果有任何问题,只要问:)