将 Excel 单元格中的单词拆分为单独的列

Question

我想将包含一个单词（没有空格或分隔符）的单元格拆分为单独的列。 例如，在 A1 中，我有一个词“ABCD”，我想将其拆分为 B1：“A”、C1：“B”、D1：“C”和 E1：“D”。 我尝试使用“文本到列”但没有成功。 谢谢

Answer 1

使用中号：

=MID($A1,COLUMN(A:A),1)

把它放在第一个单元格中并拖过去。

---

如果可以访问新的动态数组公式SEQUENCE则可以通过以下方式完成：

=MID(A1,SEQUENCE(1,LEN(A1)),1)

无需复制公式。 Excel 会将结果溢出到右侧。

Answer 2

Scott Cramers 的回答从我所看到的大部分是正确的，只需要绝对定位：

=MID($A1,COLUMN(A:A),1)

它非常低效，一次只能对 1 个角色起作用。目前想不出更好的方法。

Answer 3

尝试使用 VBA。 将此代码放在工作表的代码中，如果您更改单词，它会自动更新您的单元格值。

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$A$1" Then 'Change $A$1 to the address of your cell.
        Dim str As String
        Dim index As Integer

        str = ThisWorkbook.Sheets("Tabelle1").Range("A1").Value

        For i = 1 To Len(str)
            ThisWorkbook.Sheets("Tabelle1").Cells(1, i + 1) = Mid(str, i, 1)
        Next i

    End If
End Sub