KutoolsforOffice — 一套方案,五大工具。事半功倍。三月特賣:20% 折扣

如何在 Excel 中打亂單字內的字母順序?

作者Siluvia修改日期

在某些情況下,您可能需要將 Excel 工作表中的單字字母順序打亂。例如,用於資料匿名化、設計文字遊戲,或準備教學與測驗練習。如下方截圖所示,您有一份單字清單,目標是將每個單字的字母隨機重新排列。本文將介紹幾種高效實用的方法,協助您輕鬆完成此任務,並兼顧不同需求、Excel 版本及使用者技能水平。

Excel 中單字清單被打亂的螢幕截圖

使用自訂函數打亂單字中的字母
透過 Kutools for Excel 輕鬆打亂單字中的字母
使用 Excel 公式打亂單字中的字母(適用於 Excel 365 及更新版本)


使用自訂函數打亂單字中的字母

在 Excel 中打亂單字字母的一種方法,是使用以 VBA 編寫的自訂函數(UDF)。此方法適合熟悉 Excel 內建 VBA 編輯器並能運用自訂函數的使用者。VBA 解決方案的一大優勢,在於幾乎適用於所有 Excel 版本,且能輕鬆重複套用於不同資料集。

注意:此方法必須啟用巨集。執行或編輯 VBA 程式碼前,務必先儲存您的工作,並僅使用來自可信來源的 VBA 程式碼,以避免潛在的安全風險。

若要使用自訂函數打亂儲存格內的字母,請依照下列步驟操作:

1. 同時按下 AltF11 鍵,即可開啟 Microsoft Visual Basic for Applications 視窗。

2. 在 Microsoft Visual Basic for Applications 視窗中,點擊插入 模組,接著將下方顯示的 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

包含打亂字母函數程式碼的 VBA 編輯器視窗螢幕截圖

3. 貼上程式碼後,按下 AltQ,即可關閉 VBA 編輯器並返回 Excel 工作表。

4. 在工作表中選取一個空白儲存格作為亂序結果的輸出位置,然後在編輯欄中輸入下列公式。例如,若要打亂的單字位於 A2 儲存格,請使用:

=scramble(A2)

按下 Enter。若要將清單中的其他單字一併打亂,請點選結果儲存格,並向下拖曳填滿控點,即可自動將公式套用至剩餘儲存格,產生每個單字的隨機亂序版本!亂序後的單字在 Excel 中顯示效果如下圖所示:

在 Excel 中套用打亂函數後的打亂單字結果螢幕截圖

注意:公式中的 A2 代表您要打亂的原始單字。若您的資料位於其他欄或列,請相應調整儲存格參照。每次工作表重新計算時,函數都會重新打亂字母;若您希望結果固定不變,可將結果複製後,以「選擇性貼上→數值」的方式貼回。

優點:適用於大多數 Excel 版本,並能根據更複雜的需求進行自訂。

缺點:需啟用巨集並具備 VBA 操作經驗,且在安全政策嚴格的組織中可能無法使用。


透過 Kutools for Excel 輕鬆打亂單字中的字母

如果您偏好簡單直觀、無需編寫程式碼的解決方案,Kutools for Excel 提供了一項實用的文字處理功能。雖然其反轉文字功能並非專門的字母亂序工具,但能快速重新排列所選範圍內的字母順序,非常適合基本亂序需求、資料測試,或教學練習中生成替代文字模式!

Kutools for Excel 提供超過 300 項進階功能,簡化複雜作業,提升創造力與效率。整合 AI 功能,Kutools 能精準自動化各項任務,讓資料管理輕鬆無負擔。Kutools for Excel 的詳細資訊……         免費試用……

1. 首先,選取包含要重新排列單字的儲存格範圍。接著,切換至 Kutools 索引標籤,點擊文字,並選擇反轉文字,如下方所示:

Excel 功能區中 Kutools「反轉文字順序」選項的螢幕截圖

2. 在反轉文字對話方塊中,指定用來定義反轉單位的分隔符號。若要打亂個別字母,請選擇選項,再點擊確定

「反轉文字」對話框的螢幕截圖

所選單字已依字母反向排序重新排列,如下方截圖所示。若想重試或調整分隔符號設定,請按 Ctrl+Z 撤銷操作。

使用 Kutools 後 Excel 中打亂單字的螢幕截圖

Kutools for Excel-透過超過 300 項必備工具全面強化 Excel,讓您的工作更快速、更輕鬆,並運用 AI 功能實現更聰明的資料處理與高效生產力!立即取得

優點:操作簡便,無需任何程式碼,非常適合快速文字處理,即使不熟悉公式或 VBA 的使用者也能輕鬆掌握!

缺點:主要採用字母反轉,而非真正的隨機亂序,且需購買並安裝此增益集。


使用 Excel 公式打亂單字中的字母(適用於 Excel 365 及更新版本)

Excel 365 及更新版本內建強大的動態陣列函數,例如 SORTBYRANDARRAY。這些函數可與 MIDSEQUENCE 結合,輕鬆打亂單字中的字母,打造無需增益集或 VBA 程式碼的公式型亂序解決方案!此方法專為現代 Excel 使用者設計,讓您在個別儲存格中以公式驅動、動態實現文字亂序,高效又靈活!

當您希望建立一套可重現且完全透明的亂序工具,並搭配輔助欄位使用時,此方法效果最佳。操作步驟如下:

1. 假設您的原始單字位於 A2 儲存格,請在 B2 儲存格中輸入下列公式:

=TEXTJOIN("", TRUE, SORTBY(MID(A2, SEQUENCE(LEN(A2)),1), RANDARRAY(LEN(A2))))

2. 按下 EnterA2 中的單字亂序結果將立即顯示於 B2. 若要套用至 A 欄的其他儲存格,請選取 B2 儲存格,並使用填滿控點向下拖曳至您想打亂更多單字的範圍。

參數說明:

  • MID(A2, SEQUENCE(LEN(A2)),1):將單字拆解為個別字母。
  • RANDARRAY(LEN(A2)):為每個字母產生一個隨機數,用於後續亂序排列。
  • SORTBY(..., RANDARRAY(...)):利用隨機數對字母進行排序,輕鬆實現亂序排列!
  • TEXTJOIN("", TRUE, ...):將打亂順序的字母重新組合成單一單字。

提示:每次工作表重新計算時,由於結果依賴隨機產生的數字,亂序結果可能會改變。若您需要靜態結果,請複製輸出儲存格,並以「選擇性貼上 → 數值」的方式貼回。若出現 #NAME? 錯誤,請確認您使用的是支援 SORTBYRANDARRAY 函數的 Excel 365 或其他相容版本。

優點:無需撰寫程式碼,相容於所有支援動態陣列的試算表,且每次計算皆會產生不同的亂序結果。

缺點:僅適用於 Excel 365 及更新版本;若舊版 Excel 不支援類似的動態陣列功能,則無法使用。

疑難排解建議:若結果未更新,請先確認計算模式已設為自動(公式 > 計算選項 > 自動),並仔細檢查公式是否有拼寫錯誤。同時,請確保輸出儲存格的格式設定為「一般」或「文字」。若亂序文字未如預期顯示,請清除可能阻擋公式更新的篩選條件或資料驗證規則。

重點提示:對多數使用者而言,若您使用的是近期版本的 Excel,可透過公式快速有效地打亂字母順序。若需取得固定的亂序結果,或需支援舊版 Excel,則建議改用 VBA 方法或 Kutools 作為替代方案。


相關文章

最佳 Office 生產力工具

🤖KUTOOLS AI 助手:基於以下內容徹底革新數據分析:智慧執行     產生程式碼  建立自訂公式    分析資料並產生圖表  呼叫增強函數……
熱門功能尋找、醒目提示或標記重複值     刪除空白行     合併列或儲存格而不遺失資料     不使用公式的四捨五入……
高級 LOOKUP多重條件 VLookup    多重數值 VLookup     跨多個工作表 VLookup      模糊查找……
高級下拉列表快速建立下拉式清單     相依式下拉式清單     多選下拉式清單……
欄位管理員新增指定數量的欄位移動欄位切換隱藏欄位的可見狀態比較範圍與欄位……
精選功能網格聚焦     設計視圖   增強編輯欄    工作簿與工作表管理員     資源庫(自動文字)  日期提取     合併工作表    加密/解密儲存格    依清單傳送電子郵件     超級篩選      特殊篩選(篩選粗體儲存格/斜體/刪除線……) ......
頂尖 15 工具組12 文字工具添加文本刪除特定字符,……)   50+ 圖表 類型甘特圖,……)   40+ 實用公式基於生日計算年齡,……)   19 插入工具插入二維碼從路徑插入圖片,……)   12 轉換工具金額轉大寫匯率轉換,……)   7 合併和拆分工具高級合併行分割儲存格,……)……以及更多
在您的慣用語言中使用 Kutools—支援英文、西班牙文、德文、法文、中文及另外 40+ 種語言!

運用 Kutools for Excel 強化您的 Excel 技能,體驗前所未有的高效能!Kutools for Excel 提供超過 300 項進階功能,大幅提升生產力並節省寶貴時間。立即點擊,取得您最需要的功能……


Office Tab 為 Office 帶來分頁式介面,讓您的工作更輕鬆自在!

  • 在 Word、Excel、PowerPoint 中啟用分頁式編輯與閱讀功能,以及 Access、Visio 與 Project。
  • 在同視窗的新分頁中開啟並建立多份文件,而非另開新視窗。
  • 每天為您提升 50% 的工作效率,並省下數百次滑鼠點擊!

所有 Kutools 增益集,一個安裝程式

Kutools for Office 套件整合了 Excel、Word、Outlook 與 PowerPoint 的增益集,以及 Office Tab Pro,非常適合需要跨多個 Office 應用程式協作的團隊使用!

ExcelWordOutlookTabsPowerPoint
  • 全能套件— 包含 Excel、Word、Outlook 與 PowerPoint 增益集,以及 Office Tab Pro
  • 一個安裝程式,一個授權— 數分鐘內即可完成設定(支援 MSI)
  • 協同運作更出色— 在多個 Office 應用程式間實現流暢的生產力體驗
  • 30 天完整功能試用— 無需註冊,無需信用卡
  • 超值之選— 比單獨購買各增益集更省費用