Sut i drosi'r holl gapiau i ddim ond cap cyntaf mewn ystod ddethol yn Excel?
Gan dybio bod gennych chi daflen waith gyda'r holl enwau yn cael ei chyfalafu mewn rhestr, sut i'w trosi i wneud cyfalafu llythyren gyntaf pob gair yn unig? Mae'r erthygl hon yn darparu tri dull i chi ddelio â'r broblem hon.
Trosi pob cap i wneud llythyren gyntaf pob cap geiriau gyda fformiwla yn unig
Trosi pob cap i wneud llythyren gyntaf pob cap geiriau gyda chod VBA yn unig
Troswch yr holl gapiau i wneud llythyren gyntaf pob gair cap yn unig mewn swmp gyda Kutools ar gyfer Excel
Trosi pob cap i wneud llythyren gyntaf pob cap geiriau gyda fformiwla yn unig
Gallwch drosi'r holl gapiau i ddim ond cap cyntaf mewn rhestr gyda fformiwla. Gwnewch fel a ganlyn.
1. Dewiswch gell wag (meddai cell C2) ar gyfer lleoli'r canlyniad wedi'i drosi, a nodi'r fformiwla = EIDDO (B2) i mewn i'r bar fformiwla, ac yna pwyswch y Rhowch allweddol.
Gallwch weld bod yr enw cyfalafol yn cael ei drawsnewid yn achos cywir (cap cyntaf) ar unwaith yn y golofn gymorth.
2. Daliwch i ddewis y gell C2, llusgwch y Llenwch Trin i lawr i'r rhestr nes ei bod yn cyrraedd y gell sydd ei hangen arnoch i drosi'r achos enw.
Nodyn: Yn y fformiwla, newidiwch gyfeirnod y gell yn seiliedig ar eich rhestr.
Newid achos testunau yn hawdd mewn ystod ddethol yn Excel
Kutools ar gyfer Excel's Newid Achos mae cyfleustodau yn eich helpu i newid achos testunau mewn ystod ddethol yn Excel yn hawdd. fel y dangosir y demo isod.
Dadlwythwch a rhowch gynnig arni nawr! (llwybr am ddim 30 diwrnod)
Trosi pob cap i wneud llythyren gyntaf pob cap geiriau gyda chod VBA yn unig
Ar ben hynny, gallwch redeg y cod VBA canlynol i drosi'r holl enwau cyfalafol i ddim ond cap cyntaf mewn rhestr.
1. Gwasgwch Alt + F11 allweddi ar yr un pryd i agor y Microsoft Visual Basic ar gyfer Cymhwyso ffenestr.
2. Yn y Microsoft Visual Basic ar gyfer Cymhwyso ffenestr, cliciwch Mewnosod > Modiwlau, ac yna copïo a gludo islaw cod VBA i'r Modiwlau ffenestr.
Cod VBA: Trosi pob cap yn gap cyntaf yn unig
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 Sub3. Cliciwch ar y F5 allwedd neu cliciwch y Run botwm i redeg y cod hwn. Yn y popping up Kutools ar gyfer Excel blwch deialog, dewiswch yr ystod rydych chi am drosi pob cap yn gap cyntaf yn unig, ac yna cliciwch ar y OK botwm.
Yna mae'r holl enwau cyfalafol mewn ystod ddethol yn cael eu trosi i enwau cyfalaf cyntaf yn unig ar unwaith.
Troswch yr holl gapiau i wneud llythyren gyntaf pob gair cap yn unig mewn swmp gyda Kutools ar gyfer Excel
Mae'r adran hon yn dangos i chi'r Newid Achos cyfleustodau Kutools ar gyfer Excel i drosi'r holl gapiau i ddim ond cap cyntaf mewn swmp gyda sawl clic yn unig.
Cyn gwneud cais Kutools ar gyfer Excel, os gwelwch yn dda ei lawrlwytho a'i osod yn gyntaf.
1. Dewiswch y rhestr sydd ei hangen arnoch i drosi'r achos, ac yna cliciwch Kutools > Testun > Newid Achos. Gweler y screenshot:
2. Yn y Newid Achos blwch deialog, dewiswch y Achos Priodol opsiwn, ac yna cliciwch ar y OK botwm.
Yna mae'r holl enwau cyfalafol ar y rhestr ddethol yn cael eu trosi'n achos priodol ar unwaith.
Os ydych chi am gael treial am ddim (30 diwrnod) o'r cyfleustodau hwn, cliciwch i'w lawrlwytho, ac yna ewch i gymhwyso'r llawdriniaeth yn ôl y camau uchod.
Offer Cynhyrchiant Swyddfa Gorau
Supercharge Eich Sgiliau Excel gyda Kutools ar gyfer Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed. Kutools ar gyfer Excel Yn Cynnig Dros 300 o Nodweddion Uwch i Hybu Cynhyrchiant ac Arbed Amser. Cliciwch Yma i Gael Y Nodwedd Sydd Ei Angen Y Mwyaf...
Mae Office Tab yn dod â rhyngwyneb Tabbed i Office, ac yn Gwneud Eich Gwaith yn Haws o lawer
- Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
- Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
- Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!
