excel表内数据，连号的如何划自动划分

2024-12-02 18:03:33

推荐回答（3个）

回答1：

ALT+F11 打开VBE 编辑器 粘贴代码         选中数据所在单元格 运行此宏
Sub 分拆重组()
sr = ActiveCell.Value
arr = Split(sr, ".")
sr1 = ""
For i = 1 To UBound(arr)
If arr(i) - arr(i - 1) > 1 Then
sr1 = sr1 & "-" & arr(i - 1) & ";" & arr(i)
End If
Next
ActiveCell = arr(0) & sr1 & "-" & arr(UBound(arr))
End Sub

回答2：

您这问题解决了吗？求方法

回答3：

表示没明白你的意思
是说11变成1-1，,12变成1-2，那100变成多少？

最新问答

我非常喜欢一个男生，是我初心，一开始是异地恋，后来我渐渐的不怎么和他聊了中途还是会隔三岔五的找他，

天龙八部3天山如何打宝石

为什么excel文件打开显示word图标，打开也是word文件，但是是乱码，那位大佬告诉怎么改？

有一张10元、一张5元、一张2元、一张1元的人民币,每次拿出3张人民币,可以组成几种不同币值？请写

我把爱奇艺会员借给别人用了，但是我又不想借了，怎么让他退出登录？