excel筛选数据去掉重复的数据

excel筛选数据去掉重复的数据
在Excel中，数据的整理和处理是一项基础而重要的技能。随着数据量的增加，数据重复的问题也愈发突出。去除重复数据不仅有助于提升数据质量，也有助于提高后续分析的效率。本文将详细介绍如何在Excel中筛选数据，去除重复项，帮助用户更好地管理数据。
一、理解重复数据的定义与重要性
在Excel中，重复数据指的是在某一列或多列中，出现相同值的行。例如，一个表格中，某列中有多个“100”或“200”的数据，这些数据就是重复项。重复数据可能导致分析结果的偏差，影响数据的准确性。因此，去除重复数据是数据分析过程中不可或缺的一环。
重复数据的去除方式主要有两种：一种是通过筛选功能，另一种是使用公式或数据透视表等高级功能。掌握这些方法，可以帮助用户更高效地处理数据。
二、使用Excel筛选功能去除重复数据
Excel的筛选功能是处理数据的基础工具，用户可以通过它快速定位和筛选出重复项。
1. 筛选功能的基本操作
- 打开筛选功能：点击数据区域的“数据”选项卡，选择“筛选”。
- 选择重复项：在筛选后的数据列表中，点击“选择”→“特殊”→“重复项”。
- 删除重复项：在筛选结果中，点击“删除”按钮，即可删除重复的数据行。
2. 筛选功能的高级使用
- 按单列筛选：用户可以选择某一列作为筛选依据，例如“姓名”列，然后通过“唯一值”筛选出不重复的行。
- 多列筛选：如果数据中包含多个列，用户可以同时筛选多个列，确保去除的数据是真正重复的。
3. 筛选功能的局限性
虽然筛选功能非常实用，但它有其局限性。例如，它只能去除重复值，而不能去除重复的行。如果数据中存在多个相同值，但数据行是唯一的，筛选功能仍然无法处理。
三、使用公式去除重复数据
在Excel中，公式是处理数据的强大工具。用户可以利用公式来自动识别并删除重复项。
1. 使用“公式”功能识别重复项
- 使用“COUNTIF”函数：
`=COUNTIF($A$2:$A$100, A2)`
其中，`$A$2:$A$100`表示数据区域，`A2`是当前单元格的值。该公式返回的是当前单元格值在数据区域中出现的次数。如果次数大于1，说明该值是重复的。
- 使用“IF”函数：
`=IF(COUNTIF($A$2:$A$100, A2)=1, "", A2)`
如果该值在数据区域中只出现一次，返回该值，否则返回空值。用户可以将此公式复制到需要处理的数据区域，从而自动删除重复项。
2. 使用“删除重复项”功能
- 使用“数据”选项卡：
点击“数据”→“数据工具”→“删除重复项”。
- 选择数据区域：在弹出的对话框中，选择需要处理的数据区域，然后点击“确定”。
四、使用数据透视表去除重复数据
数据透视表是处理复杂数据的利器，尤其适用于去除重复数据。
1. 创建数据透视表
- 点击“插入”→“数据透视表”。
- 选择数据区域，然后点击“确定”。
2. 使用数据透视表去除重复项
- 在数据透视表中，选择“行”区域，然后点击“值”→“值字段设置”。
- 选择“计数”作为值字段，然后点击“更改值字段的显示方式”。
- 选择“唯一值”，即可去除重复项。
3. 数据透视表的优势
数据透视表不仅能够去除重复数据，还能进行多维度的分析，帮助用户更深入地理解数据。
五、使用VBA宏去除重复数据
对于需要自动化处理大量数据的用户，VBA宏可以提供更高效的方式。
1. 编写VBA宏
打开Excel，按 `ALT + F11` 打开VBA编辑器，插入一个新模块，然后编写如下代码：
vba
Sub RemoveDuplicates()
Dim ws As Worksheet
Set ws = ThisWorkbook.Sheets("Sheet1")
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Value = ""
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").Select
ws.Range("A1").