Excel 分散對齊怎麼做？解決文字與英文數字無法對齊的問題

在 Excel 設定分散對齊，中文字只需在「儲存格格式」的對齊方式選擇「分散對齊」即可；而英文與數字則需要先透過 VBA 程式碼在字元之間自動加入空格，才能讓 Excel 成功套用分散對齊效果。

今天來分享一個超實用的 Excel 教學，就是有關於「分散對齊」這功能。不過很多人都知道，「中文字」要分散對齊非常的簡單，因為字元屬性的關係，中文每個字都是被認定拆開的；但英文數字就不同了，只要中間沒有空格都不算。因此你在網路上不論怎麼找，通常只看的到中文的分散對齊，沒看過有人講英文數字分散對齊到欄位的。今天阿湯就來各別分享一下，中文和英數各別要怎麼做才能達成分散對齊的需求。

Excel 分散對齊常見問題：為什麼英文和數字無法對齊？

至於為什麼要用到分散對齊，有時就是為了排版美觀，比如像想要製作字卡等需求，會希望欄位內的文字能夠平均分配在儲存格中。先給大家看一下這是原本還沒調整過的內容，中文與英文數字都會想要分散對齊，我們接下來一個一個來處理。

中文字的分散對齊設定步驟

首先是中文字的分散對齊，這個操作非常簡單，只要使用 Excel 內建的格式設定就能完成。

1. 使用滑鼠選取你要設定的儲存格範圍，接著點擊滑鼠右鍵，在選單中選擇「儲存格格式」。

1. 在彈出的視窗中，切換到「對齊方式」頁籤，接著在「水平」的下拉選單中選擇「分散對齊」，最後按下確定。

設定完成後，然後就可以看到中文字的部份，已經自動根據欄位寬度完美對齊了。

英文與數字如何強制分散對齊？準備開啟 VBA

那英文也可以用一樣的做法嗎？如果你直接套用剛剛的步驟後，會發現只有標頭的「英文單字」被分散了，下面的英文單字聞風不動的跟你大眼瞪小眼。

這是因為英文字母字跟字之間是靠「空格」隔開的，系統把它當成一個完整的單字。那麼，我們就透過「空格」這個思維，來透過 VBA 試試強制把它們分開。

首先，要使用 VBA 必須先開啟 Excel 的開發人員選單。如果你還沒打開，請先點擊左上角的「檔案」。

接著，點擊選單最左下角的「選項」。

在彈出的 Excel 選項視窗中，點擊左側的「自訂功能區」，然後在右側的清單中，將「開發人員」勾選起來並按下確定。

透過 VBA 程式碼一鍵完成英數分散對齊

接下來回到 Excel 畫面，上方就會出現「開發人員」頁籤了。請點擊「開發人員」，再點擊最左側的「Visual Basic」開啟編輯器。在左側專案視窗中選擇你要執行的工作表，然後在右側的空白視窗中貼上以下的 VBA 程式碼。

請特別注意，程式碼中的 E2:E11 記得要改成你自己實際的儲存格範圍。

Sub AddSpacesBetweenLettersAndNumbers() Dim cell As Range Dim word As String Dim i As Integer Dim result As String ' 遍歷範圍中的每個單元格 For Each cell In Range("E2:E11") ' 將單元格的值轉換為字符串 word = CStr(cell.Value) ' 初始化結果字符串 result = "" ' 將單詞的每個字母逐個添加到結果字符串中，並在字母和數字之間添加空格 For i = 1 To Len(word) ' 檢查是否為字母或數字，如果是就在後面加上空格，否則保留原字符 If (Asc(Mid(word, i, 1)) >= 65 And Asc(Mid(word, i, 1)) <= 122) Or _ (Asc(Mid(word, i, 1)) >= 48 And Asc(Mid(word, i, 1)) <= 57) Then result = result & Mid(word, i, 1) & " " Else result = result & Mid(word, i, 1) End If Next i ' 將結果字符串填入單元格，去除最後多餘的空格 cell.Value = Trim(result) Next cell End Sub

貼上後，點擊上方的「執行」按鈕（綠色播放鍵圖示）來執行這段程式碼。

執行後回到工作表，就會看到英數也成功分散對齊囉！

這個做法的原理並不是真的透過 VBA 將文字分散對齊，阿湯這個做法，只是在選取範圍中的英文及數字之間通通加上空格，強制讓他們分開，就能順利使用 Excel 內建的分散對齊功能囉。

常見問題