Excel数据分割技巧

一、Excel分割数据函数

Excel有一种非常方便的函数可以快速将一个单元格里的内容根据指定的分隔符进行分割，这个函数就是“Text to Columns（文本分列）”函数。

在Excel的菜单栏中选择“数据”-“文本对列”，在“文本对列向导”对话框中可以选择“分隔符”、“文本格式”等选项，以及预览分隔后的结果，最后点击“完成”即可完成分割。


// 代码示例
Range("A1").Select
Selection.TextToColumns Destination:=Range("A1"), Separator:="_", _
  DataType:=xlDelimited, TextQualifier:=xlNone, ConsecutiveDelimiter:=False, _
  Tab:=False, Semicolon:=False, Comma:=False, Space:=False, Other:=True, _
  OtherChar:="-", FieldInfo:=Array(Array(1, 1), Array(2, 1), Array(3, 1)), _
  TrailingMinusNumbers:=True

二、Excel数据分割

使用Excel的筛选功能可以轻易地进行数据分割。首先，在Excel的列头中选择需要筛选的列，然后在“数据”-“筛选”中选择“高级筛选”。

在“高级筛选”对话框中，选择“区别重复项”，然后选择“导出到位置”，即可得到分割后的数据。


// 代码示例
ActiveSheet.Range("$A$1:$C$15").AdvancedFilter Action:=xlFilterCopy, _
  CriteriaRange:=Range("$E$1:$F$2"), CopyToRange:=Range("$H$1:$J$1"), _
  Unique:=False

三、Excel分割数据符号

当需要分割含有特殊符号的数据时，需要使用转义字符将这些符号转义成常规字符。

例如，将文本“/a/b/c”分割成三列，需要在“分隔符”一栏中输入“\/”作为分隔符。


// 代码示例
Range("A1").Select
Selection.TextToColumns Destination:=Range("A1"), Separator:="\/", _
  DataType:=xlDelimited, TextQualifier:=xlNone, ConsecutiveDelimiter:=False, _
  Tab:=False, Semicolon:=False, Comma:=False, Space:=False, Other:=True, _
  OtherChar:="-", FieldInfo:=Array(Array(1, 1), Array(2, 1), Array(3, 1)), _
  TrailingMinusNumbers:=True

四、Excel分隔数据拆分

当需要将多列数据拆分成几个单元格时，可以使用Excel的“拆分单元格”功能。

在Excel的“开始”选项卡中，选择“单元格”组中的“拆分”，然后选择需要拆分的单元格，设置参数后点击“确定”即可完成拆分。


// 代码示例
Range("A1:B1").Select
Selection.UnMerge
Columns("A:B").EntireColumn.AutoFit
Range("A3:C3").Select
Selection.Split Cells(3, 1)
Range("B5:B6").Select
Selection.Merge
Range("C5:C6").Select
Selection.Merge
Range("D5:D6").Select
Selection.Merge

五、Excel分割数据公式

除了使用函数和工具，还可以使用公式完成数据分割。

例如，使用“MID”函数和“FIND”函数可以将包括特定字符的字符串分割成多个单元格。


// 代码示例
=MID(A1,FIND(" ",A1)+1,FIND(" ",A1,FIND(" ",A1)+1)-FIND(" ",A1)-1)

六、Excel分割数据公式多条件

如果需要根据多个条件来进行数据分割，则可以使用多个函数嵌套完成。

例如，嵌套“IF”函数和“MID”函数，可以根据多个条件将数据分割成多个单元格。


// 代码示例
=IF(ISERROR(FIND(",",A1,1)),RIGHT(A1,LEN(A1)-FIND("_,_",SUBSTITUTE(A1,"_","_",LEN(A1)-LEN(SUBSTITUTE(A1,"_","")))))，LEFT(A1,FIND("_,_",SUBSTITUTE(A1,"_","_",LEN(A1)-LEN(SUBSTITUTE(A1,"_","")))-1))

七、分割数据Excel

在Excel中有多种方法来分割数据。如果上述方法无法满足需求，还可以使用宏或自定义函数完成数据分割。


// 代码示例
Public Function SplitText(ByVal text As String, ByVal delimiter As String) As Variant
  Dim parts() As String
  parts = Split(text, delimiter)
  SplitText = parts
End Function

八、Excel分隔数据

在数据分析的过程中，Excel中的“分隔数据”功能非常实用。

在Excel的菜单栏中选择“数据”-“分隔数据”，可以按照行或者列对数据进行分隔，并且可以选择分隔符、文本格式等参数。


// 代码示例
Selection.TextToColumns Destination:=Range("A1"), DataType:=xlDelimited, _
  TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, _
  Tab:=False, Semicolon:=False, Comma:=True, Space:=False, Other:=False, _
  OtherChar:="/", FieldInfo:=Array(Array(1, 1), Array(2, 1), Array(3, 1)), _
  TrailingMinusNumbers:=True

九、Excel数据分割函数

除了上述“文本分列”函数外，Excel还有很多其他用于分割数据的函数。

例如，“LEFT”函数和“RIGHT”函数可以按照指定的长度分别获取字符串的左侧或右侧部分；“MID”函数可以从指定位置开始截取指定长度的字符串等。


// 代码示例
=LEFT(A1,5)
=RIGHT(A1,10)
=MID(A1,3,5)

十、数据分割Excel

Excel中数据分割的方法有很多，需要根据实际情况选择最合适的方法。

从数据的结构、大小、分割规则等多个方面考虑，选择合适的函数、工具、甚至自己写代码来完成数据分割。

原创文章，作者：小蓝，如若转载，请注明出处：https://www.506064.com/n/196444.html