如何在Excel中对单词中的字母进行加扰？

假设您有一个单词列表，出于某种目的，您需要对这些单词中的所有字母进行加扰，如下图所示。 请尝试本文中的方法。

使用用户定义的功能对单词中的字母进行加扰
使用 Kutools for Excel 轻松打乱单词中的字母

使用用户定义的功能对单词中的字母进行加扰

您可以使用以下用户定义的功能来对单元格中的字母进行加扰。 请执行以下操作。

1。 按 其他 + F11 同时打开 Microsoft Visual Basic应用程序 窗口，

2.在 Microsoft Visual Basic应用程序 窗口中，单击 插页 > 模块，然后将下面的VBA代码复制并粘贴到 代码 窗口。 看截图：

VBA代码：拼写单词中的字母

Function Scramble(oldname)
    On Error Resume Next
    n = Len(oldname)
    newname = ""
    Do
        i = Int(Rnd() * n) + 1
        c = Mid(oldname, i, 1)
        If c <> "*" Then
            newname = newname & c
            oldname = Replace(oldname, c, "*", , 1)
        End If
    Loop Until Len(newname) = n
    Scramble = LCase(newname)
End Function

3.然后按 其他 + Q 关闭键 Microsoft Visual Basic应用程序 窗口。

4.选择一个空白单元格以查找反向字母，然后输入公式 =加扰（A2） 进入编辑栏，然后按 输入 键。 继续选择结果单元格，然后向下拖动其“填充手柄”以获取所有结果。 看截图：

备注：A2是包含您需要扰乱字母的单词的单元格。 请根据需要进行更改。

使用 Kutools for Excel 轻松打乱单词中的字母

在这里，我建议一个有用的加载项- Kutools for Excel。 随着它 反向文字顺序 实用程序，只需单击几下就可以轻松地扰乱指定单元格的字母。

1.选择需要在其中加字母的单元格，然后单击 库工具 > 文本 > 反向文字顺序。 看截图：

2.在 反向文字 对话框，请指定一个分隔符，您将根据 分隔器 部分，然后单击 OK 按钮。

现在，所选单词立即被打乱，如下图所示。

相关文章:

• 如何在Excel中根据首字母/字符有条件地格式化单元格？
• 如何在Excel中的单元格或列中将所有字母大写？
• 如何在Excel中按首字母或最后一个字符过滤值？