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

如何在 Excel 中自動調整文字方塊大小,使其完美貼合內容?

作者Siluvia修改日期

當您在 Excel 工作表中插入文字方塊時,預設情況下方塊大小是固定的,不會隨著內容增減而自動調整。這意味著當您新增或刪除文字時,文字方塊仍維持原尺寸,可能導致部分文字被隱藏,或因內容過少而留下大片空白。對於經常處理動態內容或需頻繁更新試算表的使用者來說,手動調整文字方塊不僅耗時,也相當不便。所幸 Excel 提供多種方式,讓文字方塊能根據內文自動調整大小,大幅提升工作效率與視覺呈現效果。

以下是在 Excel 中讓文字框自動調整大小以完美契合內容的實用方法,適用於各種情境,例如報表、儀表板、表單,或是多人協作且資訊經常變動的試算表。


透過「依文字調整形狀大小」功能自動調整文字方塊以符合內容

若您希望個別文字方塊在輸入或刪除文字時自動調整大小,可透過調整其屬性來實現動態縮放。此方法適用於僅需讓工作表上一個或少數幾個文字方塊依內容自動調整的情境,例如用於建立標籤、說明或備註時。

1. 插入文字方塊後,將游標移至文字方塊邊框並按一下滑鼠右鍵,在出現的快捷選單中選擇大小與屬性。請參閱截圖:

顯示 Excel 文字方塊右鍵選單中「大小與屬性」選項的截圖

2. 此操作會在工作表右側開啟格式化形狀窗格。在大小與屬性「格式化形狀」窗格中的「大小與屬性」標籤索引標籤下,前往文字方塊區段,勾選標示為依文字調整形狀大小的核取方塊。啟用此選項後,即可關閉格式化形狀窗格。請參閱截圖:

Excel 中「格式化形狀」窗格的截圖,其中包含「調整形狀以符合文字」選項

從現在起,每當您在此方塊中輸入或刪除文字時,文字方塊的高度和/或寬度都會自動調整,完美貼合內容,讓版面始終整潔有序,避免文字被隱藏或溢出視窗範圍。

注意:此功能需針對每個文字方塊個別設定;Excel 並未內建一次設定多個文字框的批量功能。若您工作表中有大量文字框需套用此屬性,請為每個方塊重複上述步驟。

提示與注意事項:

  • 若工作表已受保護,您可能無法調整此屬性,直到解除保護為止。
  • 調整方塊大小不會改變字型尺寸,僅會變更方塊本身的尺寸,以容納指定的文字。
  • 若文字方塊內含大量文字,可能會超出工作表的檢視範圍,因此調整後請務必檢查版面配置。
  • 調整設定後,請務必儲存您的工作,以免變更內容遺失。

疑難排解:若未看到格式化形狀窗格,請確認您是點選文字方塊的邊框,而非文字區域內部。在舊版 Excel 中,此選項有時會顯示為格式化文字方塊

適用情境:此方法最適合僅需對少量文字框啟用自動調整功能,或需要精細控制個別方塊行為的情況。主要優點在於操作簡單,主要限制則是面對多個項目時需重複執行相同步驟。


透過 VBA 程式碼自動調整所有文字框大小以符合內容

若您的工作表包含大量文字框,逐一手動調整將極為耗時。此時可透過 VBA 巨集一次處理所有文字框,自動設定它們依內容自動調整大小。此解決方案特別適用於共用文件、問卷表單、範本,或任何大量使用文字框且需統一行為的場景。

1. 按下鍵盤上的 Alt+F11,即可立即開啟 Microsoft Visual Basic for Applications(VBA)編輯器,輕鬆輸入與管理您的 VBA 程式碼!

2. 在 VBA 編輯器視窗中,點選功能表列的插入,再選擇模組,即可為您的 Excel 工作表新增一個模組。接著,將下方提供的 VBA 程式碼複製並貼上至模組視窗中。

VBA 程式碼:自動調整工作表中所有文字框大小以符合內容

Sub TextBoxResizeTB()
    Dim xShape As Shape
    Dim xSht As Worksheet
    On Error Resume Next
    For Each xSht In ActiveWorkbook.Worksheets
        For Each xShape In xSht.Shapes
            If xShape.Type = 17 Then
                xShape.TextFrame2.AutoSize = msoAutoSizeShapeToFitText
                xShape.TextFrame2.WordWrap = True
            End If
        Next
    Next
End Sub

3. 若要執行程式碼,請在模組視窗處於作用中狀態時按下 F5 鍵。工作表中的所有文字框將立即自動調整大小以符合內容,效果如下方截圖所示!

執行 VBA 程式碼後,Excel 自動調整文字方塊大小以符合內容的截圖

執行巨集後,您的文字框將在未來每次新增或刪除文字時自動調整大小。此方法節省時間,並確保所有文字框保持一致,特別適用於設計互動式範本或表單。

VBA 使用提示:

  • 執行巨集前,務必先儲存目前的活頁簿;若您不熟悉 VBA,建議另外建立備份。
  • 在某些 Excel 環境中,巨集可能被停用;您可透過 Excel 的信任中心設定來啟用巨集。
  • 若您再次執行巨集,將自動重新套用「自動調整大小」屬性至您新增的文字框。
  • VBA 方法僅適用於目前作用中的工作表;若您在其他工作表上也有文字框,請切換至該工作表並重複此操作。
  • 若發生錯誤,請確認工作表是否包含文字方塊形狀(在 VBA 中通常稱為「Shape」物件),並檢查您的安全性設定是否允許執行巨集。

優缺點:VBA 方法在大規模更新時優勢顯著,能有效減少重複的手動作業;然而,使用者需具備 Excel VBA 編輯器的基本操作能力,且在高度受限的工作環境中可能面臨存取限制。

疑難排解與錯誤提醒:

  • 若您看到「巨集已停用」的提示,請確認已在 Excel 設定中啟用巨集。
  • VBA 程式碼的處理通常不會影響其他非特定文字框的物件,例如圖片、圖表或形狀。
  • 執行巨集後,將無法使用「復原」功能。

相關文章


最佳 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 天完整功能試用— 無需註冊,無需信用卡
  • 超值之選— 比單獨購買各增益集更省費用