如何把excel中的数据拆分为几列

来源:百度知道 编辑:UC知道 时间:2024/07/05 02:42:08
铝接续管及绝缘罩-(JY-35LY)

拆分为(名称与型号拆分出来):
铝接续管及绝缘罩 JY-35LY

先把)括号取消了,查找)替换为空白,全部替换。

然后再替换-(为(,全部替换。

然后用数据分列:选择表格内容→数据(菜单)→分列→分隔符号→下一步→其他,输入(,下一步,就完成了。

b1=left(a1,lenb(a1)-len(a1))
c1=MID(SUBSTITUTE(A1,B1,""),3,7)

每一种东西的名称和型号的字数是一样的吗,如果一样就可以用LEFT和RIGHT函数把其选中来。

做个函数,把文字提取出来,剩下的就是型号了。
Function GETWORD(name As String) As String '获取文字
t = "" '初始化t
chang = Len(name) '得到长度
For i = 1 To chang
tadd = "" '每一次执行循环i时都初始化变量tadd
namex = Mid(name, i, 1) '从商品名称/型号的第一个字符起,一直提取到最后一个字符
For j = 1 To 38
nb = Mid("0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ-#", j, 1) '与十个数字和二十六个字母以及“-”、“#”匹配
If namex = nb Then
tadd = 0 '存在数字“#”或字母时,用“0”来记录下这个信息,不要给函数结果附加任何字符,即空
End If
Next j
If tadd = 0 Then
t = t + ""
Else
t = t + namex '如果该字符不是数字或字母,就将其附加到t
End If
Next i
GETWOR