excel2007中能把A1单元格中的内容“1-20、22、24-30” 在B列中完全连...
发布网友
发布时间:2024-10-24 17:51
我来回答
共2个回答
热心网友
时间:2024-11-06 00:25
这个需要用VBA来实现。
热心网友
时间:2024-11-06 00:22
我做过一个提问,与您的问题类似,您可以参考,看是否有用。
可以用vba.
按住ALT依次按F11,i,m,粘贴下面代码后按F5即可完成.
Sub test()
For r = 1 To 3 '1到3行
a = Split(Cells(r, 1).Value, ",") '1代表第1列,即A列
For i = 0 To UBound(a) - 1'用冒泡法对数据排序
For j = i + 1 To UBound(a)
If a(i) > a(j) Then
t = a(i)
a(i) = a(j)
a(j) = t
End If
Next
Next
Cells(r, 1) = Join(a, ",") '排序后的结果写回原处
Next
End Sub