excel中怎么在一组包括数字与字母的字符中每两个数加一个符号?
1个回答
展开全部
如果都是12位,那么假设数据在A列,在B1输入
=LEFT(A1,2)&":"&MID(A1,3,2)&":"&MID(A1,5,2)&":"&MID(A1,7,2)&":"&RIGHT(A1,2)
向下复制即可。
如果位数不定,得用宏自定义函数。同时按Alt和F11进入宏界面,点菜单的插入,模块,粘贴如下代码:
Function jmh(xStr As String) As String
Dim i As Integer
jmh = Left(xStr, 2)
For i = 2 To Int(Len(xStr) / 2) + (Len(xStr) Mod 2)
jmh = jmh & ":" & Mid(xStr, i * 2 - 1, 2)
Next
End Function
回到Excel,在B1输入
=jmh(A1)
公式复制下去。
=LEFT(A1,2)&":"&MID(A1,3,2)&":"&MID(A1,5,2)&":"&MID(A1,7,2)&":"&RIGHT(A1,2)
向下复制即可。
如果位数不定,得用宏自定义函数。同时按Alt和F11进入宏界面,点菜单的插入,模块,粘贴如下代码:
Function jmh(xStr As String) As String
Dim i As Integer
jmh = Left(xStr, 2)
For i = 2 To Int(Len(xStr) / 2) + (Len(xStr) Mod 2)
jmh = jmh & ":" & Mid(xStr, i * 2 - 1, 2)
Next
End Function
回到Excel,在B1输入
=jmh(A1)
公式复制下去。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询