Kako v Excelovih celicah napisati samo prvo črko z veliko začetnico?

Če imate seznam imen, napisanih z velikimi črkami, in jih morate spremeniti tako, da bo samo prva črka vsake besede velika, Excel ponuja več rešitev. Ta članek pojasnjuje tri metode za obravnavo te naloge: z uporabo formul, VBA ali dodatka Kutools for Excel.

Napišite veliko samo prvo črko v Excelovi celici s formulo
V Excelovih celicah s kodo VBA napišite veliko samo prvo črko
Z veliko začetnico v Excelovih celicah uporabite Kutools for Excel

V Excelovih celicah s formulo napišite veliko samo prvo črko

Vse zgornje meje lahko na seznamu s formulo pretvorite v samo prvo. Naredite naslednje.

1. Izberite prazno celico (pravi celica C2) za iskanje pretvorjenega rezultata in vnesite formulo = PRAVILNO (B2) v vrstico s formulami in pritisnite tipko Vnesite ključ.

Ime, napisano z velikimi črkami, se takoj v stolpcu pomoči pretvori v pravilno velikost (prva črka z veliko začetnico).

2. Z izbrano celico C2 povlecite ročico za polnjenje navzdol po seznamu, dokler ne pridete do celice, v katero želite pretvoriti veliko in malo črk imena.

Opombe: V formuli spremenite sklic na celico glede na svoj seznam.

V Excelovih celicah s kodo VBA napišite veliko samo prvo črko

Poleg tega lahko zaženete naslednjo kodo VBA, da pretvorite vsa imena, napisana z velikimi črkami, na seznamu v prave črke.

1. Pritisnite druga + F11 tipke hkrati, da odprete Microsoft Visual Basic za uporabo okno.

2. V Ljubljani Microsoft Visual Basic za uporabo okno, kliknite Vstavi > Moduliin nato kopirajte in prilepite spodnjo kodo VBA v Moduli okno.

Koda VBA: Pretvorite vse zgornje meje v samo prvo

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. Kliknite F5 ali kliknite Run za zagon te kode. V pojavnem oknu Kutools za Excel v pogovornem oknu izberite obseg, ki ga želite pretvoriti v vse zgornje meje, in nato kliknite OK gumb.

Vsa imena z velikimi črkami v izbranem obsegu so takoj pretvorjena v pravilno velikost črk.

Z veliko začetnico v Excelovih celicah uporabite Kutools for Excel

Ta razdelek vam prikazuje Spremeni veliko črko uporabnost Kutools za Excel za množično pretvorbo velikih črk v prave male črke z le nekaj kliki.

1. Izberite seznam, ki ga želite pretvoriti, in nato kliknite Kutools > Besedilo > Spremeni veliko črko. Oglejte si posnetek zaslona:

2. V Ljubljani Spremeni veliko črko pogovorno okno, izberite Pravilna zadeva in nato kliknite OK gumb.

Vsa imena z velikimi črkami na izbranem seznamu so takoj pretvorjena v pravo črko.