Vba 总结Excel表格的部分内容

我在Microsoft Excel Office中的VBA有一个问题

有一张桌子有两行（从头到脚）和数千行

第一行是包含Adobe等软件公司名称的字符串

第2行中有字符串，其中包含第1行中公司的产品名称，如Acrobat Reader 11

所以我想要的是，在第2行中，像：“AcrobatReader11”和“AcrobatReader10”这样的字符串将被总结为“AcrobatReader”，这可能吗？ 不仅是版本号，还有“Office Word”、“Office Excel”到“Office”

你能帮我吗？顺便说一句，我是VBA和Excel的高手

---

问候

您需要首先将第二列拆分为多列。（在Excel 2010中：数据选项卡-文本到列-分隔符-分隔符：空格）-您的数据看起来像：A列：公司，B列-C列产品名称，删除其他列

之后，您应该添加一列，告诉您产品名称的第二个单词（例如Reader）是否在多行中使用，以便您可以对其进行分组，或者它是唯一的：

=COUNTIFS（B:B，B2，C:C，C2）

，让我们称此新列为唯一的

现在，如果第二个单词不唯一，您需要另一列来合并前两个单词：

=B2&if（D2>1，“&C2，”）

---

最后，创建一个包含a列和E列的透视图。

合并数据的标准是什么？按公司查找公共子字符串或组？你是说两列数千行吗？？（行和行在excel中是同义词）哦，对不起，是的，我指的是两列数千行。我的标准应该是这样合并：当第2列不同行中的前两个单词相同时，它应该合并它们。这将大大减少行数，我认为，如果不进行手动编辑，就不可能做到完美。没有VBA，您可以使用

Data->Text to Columns

将产品列拆分为每个“单词”的单独列（将其拆分为

delimited

，然后使用

space

作为分隔符）。这将给出一组列。然后可以删除除前2列以外的所有列。通过这两列，您可以对列表进行排序和筛选（或使用

数据->删除重复项

）。