Kako pretvoriti vse zgornje meje v samo prvo zgornjo mejo v izbranem obsegu v Excelu?

Če imamo delovni list z vsemi imeni, ki so na seznamu napisana z velikimi tiskanimi črkami, kako jih pretvoriti, tako da bo prva črka vsake besede napisana z velikimi črkami? Ta članek ponuja tri metode za reševanje te težave.

Pretvori vse velike črke tako, da bo prva črka vsake besede omejena s formulo
Pretvorite vse velike črke tako, da bo prva črka vsake besede omejena s kodo VBA
Pretvorite vse velike črke tako, da v Kutools za Excel naredite samo prvo črko vsake besede v velikem obsegu

---

Pretvori vse velike črke tako, da bo prva črka vsake besede omejena s formulo

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č.

V stolpcu s pomočjo lahko takoj vidite, kako je veliko ime pretvorjeno v pravilno črko (prva kapica).

2. Nadaljujte z izbiro celice C2, povlecite ročico za polnjenje navzdol na seznam, dokler ne pride do celice, ki jo potrebujete za pretvorbo velikih črk imena.

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

---

---

Pretvorite vse velike črke tako, da bo prva črka vsake besede omejena s kodo VBA

Poleg tega lahko zaženete naslednjo kodo VBA, da pretvorite vsa velika imena v prvo začetnico na seznamu.

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.

Nato se vsa velika imena v izbranem obsegu takoj pretvorijo v samo prva velika imena.

---

Pretvorite vse velike črke tako, da v Kutools za Excel naredite samo prvo črko vsake besede v velikem obsegu

Ta razdelek vam prikazuje Spremeni veliko črko uporabnost Kutools za Excel če želite pretvoriti vse zgornje meje v samo prvo zgornjo mejo v velikem obsegu, samo z več 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.

Nato se vsa velika imena z izbranega seznama hkrati pretvorijo v ustrezne črke.