ad

如何删除重複的行并仅在Excel中保存最高值?-英雄云拓展知识分享

匿名投稿 228 2024-02-24

如何删除重复的行并仅在Excel中保存最高值?

举例来看,您在Excel中有一个购买表,作为显示的第一个屏幕截图。 现在,您需要针对“水果”列删除重复的行,并将相应水果的最高值保存在“数量”列中,如第2个屏幕截图所示。 您能想到什幺解决方案吗,我们将继续深入。 本文将分享两个技能来解决它。

删除重复的行并仅使用VBA保存最高值

删除重复的行并仅使用tools for Excel保持最大值

针对一列中的条件轻鬆删除重复的行,仅在Excel中保存最高的值

如何删除重複的行并仅在Excel中保存最高值?-英雄云拓展知识分享

tools for Excel的 高级合併行 实用程序可以帮助Excel用户轻鬆地轻鬆找出另外一列中每一个项目的最小值的最大值。

立即取得 30 天的全功能免费试用!

该高级组合行实用程序还可以按指定标记组合行和单独的值,或组合行併计算其总和,出现次数,最大值/最小值,平均值等。

惊人的! 在 Excel 中使用高效率的选项卡,如 Chrome、Edge、Firefox 和 Safari!
每天节省50%的时间,并减少数千次鼠标单击!


假定您有一个表格,以下所示。 并且此方法将引入VBA宏,以删除基于某一列的重复行,并仅在Excel的另外一列中保存最大值。 请履行以下操作:

1。 按 其他 + F11 同时按下键以打开“ Microsoft Visual Basic for Applications”窗口。

2。 点击 插入 > 模块,然后将以下代码粘贴到新打开的“模块”窗口中。

VBA:删除重复的行并保持最大值

Public Sub DelDupes()

Dim xFilterRg As Range

Dim xCriteriaRg As Range

Dim xAddress As String

Dim xSUpdate As Boolean

On Error Resume Next

xAddress = Application.ActiveWindow.RangeSelection.Address

Set xFilterRg = Application.InputBox("Please select a range:", "tools for Excel", xAddress, , , , , 8)

If xFilterRg Is Nothing Then Exit Sub

Set xFilterRg = Application.Intersect(ActiveSheet.UsedRange, xFilterRg)

If xFilterRg Is Nothing Then Exit Sub

On Error GoTo 0

xSUpdate = Application.ScreenUpdating

Application.ScreenUpdating = False

Set xCriteriaRg = ActiveSheet.Cells(1, xFilterRg.Column + xFilterRg.Columns.Count).Resize(2)

xCriteriaRg.Resize(1).Offset(1).Formula = "=COUNTIF(" & xFilterRg(2, 1).Address & ":" & _

xFilterRg(2, 1).Address(False, False) & "," & _

xFilterRg(2, 1).Address(False, False) & ")>1"

With xFilterRg

.Sort key1:=xFilterRg.Cells(1, 1).Offset(0, 1), order1:=xlDescending, Header:=xlYes

.AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=xCriteriaRg

.Offset(1).SpecialCells(xlCellTypeVisible).EntireRow.Delete

.Parent.ShowAllData

End With

xCriteriaRg.Clear

Application.ScreenUpdating = xSUpdate

End Sub

3。 按 F5 键或单击 按钮以运行此VBA。

4.现在出现一个对话框。 请选择要删除重复行并保存其中最高值的列,然后单击 OK 按钮。

在本例中,我们将按“水果列”删除重复的行,并在“数量列”中保存最高的值,因此,这种情况下,如图所示,我选择了“水果”列和“数量”列。

然后,您将看到针对“水果”列删除重复的行,并将相应水果的最大值保存在“数量”列中。 看截图:

笔记:

(1)指定范围必须以删除重复行所根据的列开头。

(2)此VBA只能在删除重复行所根据的列后面保存该列中的最大值。

(3)此VBA在Microsoft Excel 2007中不起作用。


对某些用户而言,上面的VBA可能还不够容易,并且只能将最高值保存在“标準”列后面。 但是tools for Excel的 高级合併行 实用程序将帮助您轻鬆轻鬆地解决此问题。

Excel的tools - 包括 300 多个 Excel 基本工具。 享受全功能 30 天免费试用,无需信誉卡! 现在下载!

1.选择要删除重复行并保存最大值的表(在本例当选择A1:C24),然后单击 库工具 > 内容 > 高级合併行.

2.在打开的“基于列合併行”对话框中,请进行以下配置:

(1)选择“水果”列(将删除重复的行),然后单击“ 重要的关键 按钮;

(2)选择“金额”列(将保存最高值),然后单击“肯定”。 计算 > Max.

(3)针对需要为其他列指定组合规则。

3。 点击 Ok 按钮。 然后,您将看到针对“水果”列删除所有重复的行,并且“数量”列中仅保存了对应水果的最大值。 看截图:

高级合併行 tools for Excel实用程序可以轻鬆地按一列合併行,然后也能够基于此列计算其他列,例如Sum,Count,Max,Min,Product等。 点击免费试用60天,没有限制!


Excel的tools:超过 300 个方便的工具触手可及! 立即开始 30 天免费试用,没有任何功能限制。 现在就下载!


选择英雄云云表单=选择更智能的Excel

>>>>🚀🌟 点击注册 免费试用 更高级的-英雄云企业级云表单 🌟🚀 😃👉🌐>>>>

在现代企业管理中,数据的高效管理和处理至关重要。随着信息技术的不断发展,英雄云云表单已经成为了提高数据录入、管理和分析效率的不可或缺的工具。让我们来深入探讨英雄云-云表单的几大优势。

基础字段:多样性满足业务需求

英雄云云表单中包括了各种基础字段,如单行文本多行文本数字输入框单选框复选框下拉框下拉复选框日期时间分割线等。这些字段的多样性使用户可以根据具体的业务需求,轻松进行文本、数据和时间信息的录入或修改。例如,您可以使用单行文本字段录入员工姓名、产品型号等,或者使用下拉框进行多选,根据不同情况选择更加方便的字段类型。

高级字段:提升工作效率

英雄云云表单还提供了高级字段,如地址图片附件手写签名手机子表关联数据关联查询以及流水号。这些高级字段在基础字段的基础上升级,可帮助用户完成一些琐碎的工作。例如,使用地址字段可以避免逐字打字,而流水号字段可以自动生成规律性的编号,非常适用于合同编号生成等场景。

部门成员字段:精确管理与通讯录的关联

英雄云的部门成员字段允许企业对各个部门的成员进行精确管理。用户可以通过部门成员字段获取通讯录中的部门成员信息,应用于记录报销人、报销部门等场景。这些成员字段还细分为成员单选成员多选,可根据具体需求在通讯录中选择一个或多个成员。

聚合表:数据处理更智能

英雄云聚合表功能用于对已存在的表单数据进行聚合计算,从而得到一张聚合表,后续其他表单可调用聚合表进行数据联动、关联查询和关联数据等操作完成数据处理。这一功能可应用于多种场景,如进销存管理、财务管理和门店零售管理等,帮助企业完成数据处理,提高工作效率。

表单权限设置:灵活管理数据访问

英雄云的表单权限设置允许用户根据企业的具体需求管理表单的访问和操作权限。用户可以根据系统权限或自定义权限对不同成员或团队进行权限设置,以确保数据的安全和合规性。这一功能使企业能够根据变化的业务需求和团队结构,实时调整权限设置。

自定义打印模板:文档输出更便捷

英雄云云表单支持自定义打印模板,可将表单数据转换为可打印的Word文档。用户可以根据自己的需求进行排版和编辑,将产品规格说明书等文档轻松生成。这一功能提供了一种标准化的文档输出方式,简化了信息整理的过程。

综合来看,选择英雄云云表单意味着选择更智能、更灵活、更高效的数据管理工具。无论是提高工作效率,精确管理数据,还是实现数据处理,英雄云云表单都能满足您的多样化需求,助力您的业务发展。

如果您正在寻找一款强大的云表单工具,不妨考虑英雄云,它将为您带来更多的便捷和智能,助您事半功倍。


免责声明:

本网址(www.yingxiongyun.com)发布的材料主要源于独立创作和网友匿名投稿。此处提供的所有信息仅供参考之用。我们致力于提供准确且可信的信息,但不对材料的完整性或真实性作出任何保证。用户应自行验证相关信息的正确性,并对其决策承担全部责任。对于由于信息的错误、不准确或遗漏所造成的任何损失,本网址不承担任何法律责任。本网站所展示的所有内容,如文字、图像、标志、音频、视频、软件和程序等的版权均属于原创作者。如果任何组织或个人认为网站内容可能侵犯其知识产权,或包含不准确之处,请即刻联系我们进行相应处理。

上一篇:如何在Excel中的甜甜圈图中添加引线?-英雄云拓展知识分享
下一篇:如何在Excel中的数据透视野中按月过滤?-英雄云拓展知识分享
相关文章

 发表评论

暂时没有评论,来抢沙发吧~

×