如何在Excel儲存格中僅將第一個字母大寫？

如果您有一個全部大寫的姓名列表，並且需要更改它們以便僅將每個單字的第一個字母大寫，Excel 提供了多種解決方案。本文解釋了處理此任務的三種方法：使用公式、VBA 或 Kutools for Excel 外掛程式。

使用公式僅將 Excel 儲存格中的第一個字母大寫
使用 VBA 程式碼僅將 Excel 儲存格中的第一個字母大寫
使用 Kutools for Excel 批次僅將 Excel 儲存格中的第一個字母大寫

使用公式僅將 Excel 儲存格中的第一個字母大寫

您可以使用公式將所有大寫字母轉換為僅列表中的第一個大寫字母。 請執行以下操作。

1.選擇一個空白單元格（例如單元格C2）以查找轉換的結果，然後輸入公式 = PROPER（B2） 進入編輯欄，然後按 Enter 鍵。

大寫名稱會在幫助欄中立即轉換為正確的大小寫（首字母大寫）。

2. 選擇儲存格 C2 後，將填滿手柄向下拖曳列表，直到到達要轉換名稱大小寫的儲存格。

備註：在公式中，請根據您的列表更改單元格引用。

使用 VBA 程式碼僅將 Excel 儲存格中的第一個字母大寫

此外，您可以執行以下 VBA 程式碼將清單中的所有大寫名稱轉換為正確的大小寫。

1。 按 其他 + F11 同時打開 Microsoft Visual Basic應用程序 窗口。

2。 在裡面 Microsoft Visual Basic應用程序 窗口中，單擊 插入 > 模塊，然後將下面的VBA代碼複製並粘貼到 模塊 窗口。

VBA代碼：將所有大寫字母轉換為僅第一個大寫字母

Sub Proper_Case()
	Dim xRg As Range
	Dim xCell As Range
	Dim xAddress As String
	Dim xUpdate As Boolean
	On Error Resume Next
	xAddress                    = Application.ActiveWindow.RangeSelection.Address
	Set xRg                     = Application.InputBox("Please select a range", "Kutools for Excel", xAddress, , , , , 8)
	Set xRg                     = Application.Intersect(xRg, ActiveSheet.UsedRange)
	If xRg Is Nothing Then Exit Sub
		xUpdate                    = Application.ScreenUpdating
		Application.ScreenUpdating = False
		For Each xCell In xRg.Cells
			If xCell.HasFormula = False Then
				xCell.Value = Application.WorksheetFunction.Proper(xCell.Value)
			End If
		Next
		Application.ScreenUpdating = xUpdate
	End Sub

3。 點擊 F5 鍵或單擊 運行 按鈕以運行此代碼。 在彈出 Excel的Kutools 對話框中，選擇要將所有大寫字母轉換為僅第一個大寫字母的範圍，然後單擊 OK 按鈕。

所選範圍內的所有大寫名稱都會立即轉換為正確的大小寫。

使用 Kutools for Excel 批次僅將 Excel 儲存格中的第一個字母大寫

本節向您展示 變更案例 的效用 Excel的Kutools 只需點擊幾下即可將所有大寫字母批量轉換為正確的大小寫。

1.選擇您需要轉換大小寫的列表，然後單擊 庫工具 > 文本 > 變更案例。 看截圖：

2。 在裡面 變更案例 對話框，請選擇 適當的情況 選項，然後單擊 OK 按鈕。

所選清單中的所有大寫名稱都會立即轉換為正確的大小寫。