excel - 如何在excel的“文本到列”中使用两个斜杠？

Question

为什么 Excel 不允许我们在Data > Text to Columns > Delimited > Other部分中使用两个斜杠？

我有几行具有相似的数据。每行还有两个连续的斜线。

我想分隔从两个斜杠开始的列。

怎么做 ？

Answer 1

勾选“将连续分隔符视为一个”，在其他分隔符中输入一个斜杠，应该可以解决您的问题

Answer 2

Text-to-Columns 只能接受单个字符作为“其他”分隔符，但 Split 可以分割任意数量的字符作为分隔符¹。只需编写您自己的 Text-to-Columns 版本。

Option Explicit

Sub myT2C()
    Dim vals As Variant, tmp As Variant, i As Long, j As Long, mx As Long

    With Worksheets("sheet8")
        vals = .Range(.Cells(2, "A"), .Cells(.Rows.Count, "A").End(xlUp)).Value2
        For i = LBound(vals, 1) To UBound(vals, 1)
            tmp = Split(vals(i, 1), "//")
            mx = Application.Max(mx, UBound(tmp) + 1)
            ReDim Preserve vals(LBound(vals, 1) To UBound(vals, 1), 1 To mx)
            For j = LBound(tmp) To UBound(tmp)
                vals(i, j + 1) = tmp(j)
            Next j
        Next i
        .Cells(2, "A").Resize(UBound(vals, 1), UBound(vals, 2)) = vals
    End With
End Sub

¹_{可能有一个我不知道的限制；大概 255 个字符。}