如何在 Excel 中將文字插入到所選儲存格內容的中間？

作者Siluvia修改日期2024-11-22

在 Excel 中，將新文字插入至選取儲存格的中間，是整理與呈現資料的實用技巧。本指南提供清晰、逐步的操作說明，教您善用 Excel 內建函數與功能，在儲存格既有內容中精準插入所需文字。

在選取的公式中間插入添加文本
使用 Kutools for Excel 在選取儲存格中間插入添加文本
使用 VBA 程式碼在選取儲存格中間插入添加文本

在選取的公式中間插入添加文本

本節將提供在所選儲存格中插入文字的公式，請依照下列步驟操作。

1. 此方法需使用輔助欄位，請選取鄰近原始資料的空白儲存格（此處以 B2 為例）。

2. 將公式 =LEFT(A2,1) & "D" & MID(A2,2,100) 複製並貼上至編輯欄，然後按下 Enter 鍵。請參閱截圖：

使用公式在儲存格中間新增文字

注意事項：

1）。公式中的數字 1 表示文字將在儲存格第一個字元後插入。
2）。數字 2 與 100 表示原始儲存格中從第 2 個到第 100 個字元，將接在新插入的文字之後。
3）。若您希望在第二個字元後插入文字，請將公式中的數字 1 改為 2，並將 2 改為 3.
4）。其中字元「D」即為您要新增至儲存格的文字，請依需求調整。

3. 選取 B2 儲存格，向下拖曳填滿控點至您希望套用此公式的儲存格，文字便會自動置於清單中每個儲存格的中央位置。

向下拖曳填滿控制點至儲存格

提示：除了上述公式外，您也可套用此公式 =REPLACE(A2,2,0,"D")（數字 2 代表要插入文字的位置，字母 D 則是要新增的文字，兩者皆可依需求調整），按下 ENTER 鍵即可立即取得結果！

使用 Kutools for Excel 在選取儲存格中間插入添加文本

我們必須承認，上述兩種方法對使用者來說並不便利。在此為您介紹添加文本工具——它屬於 Kutools for Excel，讓您輕鬆指定清單的中間位置，並一次性將特定文字新增至整個清單的該處！

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

1. 選取您要在儲存格中插入文字的清單，然後點擊 Kutools> 文字> 添加文本。請參閱截圖：

按一下 Kutools > 文字 > 新增文字

2. 在添加文本對話方塊中，於文字方塊輸入要新增至儲存格的文字，勾選指定選項以設定插入位置（此處輸入數字 1），再點擊確定按鈕即可完成！（右側方塊可即時預覽新增結果）

在對話方塊中指定選項

注意：若要一次在選取儲存格的多個位置加入文字，您可在指定方塊中以逗號分隔輸入多個位置。請參閱截圖：

指定以逗號分隔的位置，以便在多個位置新增文字

現在，指定的文字已插入至選取範圍中每個儲存格的第一個字元之後。

指定的文字已新增在第一個字母之後

想免費試用此工具 30 天嗎？立即下載，並依照上述步驟操作！

使用 VBA 程式碼在選取儲存格中間插入添加文本

此外，您也可以透過 VBA 程式碼，在選取的儲存格中插入文字。

1. 請按下 Alt+F11，即可開啟 Microsoft Visual Basic 應用程式視窗！

2. 點擊插入＞模組，然後將下方 VBA 程式碼複製並貼上至程式碼編輯器中。

將程式碼複製並貼到模組中

VBA 程式碼：在資料清單的第一個字元後添加文本

Sub AddString()
	Dim Rng As Range
	Dim WorkRng As Range
	On Error Resume Next
	xTitleId = "KutoolsforExcel"
	Set WorkRng = Application.Selection
	Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type: = 8)
	For Each Rng In WorkRng
		Rng.Value = VBA.Left(Rng.Value, 1) & "D" & VBA.Mid(Rng.Value, 2, VBA.Len(Rng.Value) - 1)
	Next
End Sub

3. 按下 F5 鍵執行程式碼後，在彈出的 KutoolsforExcel 對話方塊中選取要添加文本的範圍，再點擊確定按鈕完成操作。

選取要新增文字的範圍

現在，指定的文字已插入至所選儲存格的第一個字元之後。

注意：在上述程式碼中，您會在儲存格內第一個字元後插入特定值。若要在第二個字元後新增文字，只需將程式碼中的數字 1 與 2 改為 2 與 3，如下所示：VBA.Left(Rng.Value, 1) & "D" & VBA.Mid(Rng.Value, 2, VBA.Len(Rng.Value) - 1)，其中字母 D 即為您要插入的新文字。

本指南為您詳細介紹三種實現方式：運用 Excel 公式、善用 Excel 增益集 Kutools，以及應用 VBA 程式碼。每種方法皆提供獨特途徑，在儲存格既有內容中插入新文字，滿足不同 Excel 熟練度與使用者需求。想掌握更多 Excel 實用技巧？我們網站提供數千篇教學文章，立即點此瀏覽！

如何在 Excel 中將文字加到所有儲存格的開頭或結尾？

最佳 Office 生產力工具

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