Note: The other languages of the website are Google-translated. Back to English

Sut i wyrdroi llinyn testun neu drefn geiriau yn Excel?

Pan ddefnyddiwch y daflen waith Excel, sut ydych chi'n gwrthdroi'r llinyn testun neu'r drefn eiriau yn Excel? Er enghraifft, rydych chi am wyrdroi “Mae Excel yn offeryn defnyddiol i ni"I"su rof loot lufesu a si lecxE”. Neu weithiau gallwch chi wyrdroi'r drefn geiriau fel “Excel, Word, PowerPoint, OneNote"I"OneNote, PowerPoint, Word, Excel”. Fel rheol mae hyn ychydig yn anodd datrys y broblem hon. Edrychwch ar y dulliau canlynol:

Gwrthdroi llinyn testun gyda Swyddogaeth Diffiniedig Defnyddiwr

Gorchymyn geiriau gwrthdroi wedi'i wahanu gan wahanydd penodol gyda chod VBA

Gwrthdroi llinyn testun neu orchymyn geiriau gyda Kutools ar gyfer Excel yn gyflym ac yn hawdd


swigen dde glas saeth Gwrthdroi llinyn testun gyda Swyddogaeth Diffiniedig Defnyddiwr

Gan dybio bod gennych chi ystod o dannau testun rydych chi am eu gwrthdroi, fel “ychwanegu seroau blaenllaw yn Excel"I"lecxE ni sorez gnidael dda”. Gallwch chi wyrdroi'r testun gyda'r camau canlynol:

1. Daliwch i lawr y ALT + F11 allweddi, ac mae'n agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Cliciwch Mewnosod > Modiwlau, a gludwch y macro canlynol yn y Modiwlauffenestr.

Function Reversestr(str As String) As String
    Reversestr = StrReverse(Trim(str))
End Function

3. Ac yna arbed a chau'r cod hwn, ewch yn ôl i'r daflen waith, a nodi'r fformiwla hon: = gwrthdröydd (A2) mewn cell wag i roi'r canlyniad, gweler y screenshot:

4. Yna llusgwch y ddolen llenwi i lawr i gopïo'r fformiwla hon, ac mae'r testun yn y celloedd yn cael ei barchu ar unwaith, gweler y screenshot:


swigen dde glas saeth Gorchymyn geiriau gwrthdroi wedi'i wahanu gan wahanydd penodol gyda chod VBA

Os oes gennych chi restr o eiriau celloedd sydd wedi'u gwahanu gan atalnodau fel hyn “athro, meddyg, myfyriwr, gweithiwr, gyrrwr”, Ac rydych chi am wyrdroi trefn geiriau fel hyn“gyriant, gweithiwr, myfyriwr, meddyg, athro”. Gallwch hefyd ddefnyddio dilyn VBA i'w ddatrys.

1. Daliwch i lawr y ALT + F11 allweddi, ac mae'n agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Cliciwch Mewnosod > Modiwlau, a gludwch y macro canlynol yn y Modiwlau ffenestr.

Sub ReverseWord()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
Dim Sigh As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Sigh = Application.InputBox("Symbol interval", xTitleId, ",", Type:=2)
For Each Rng In WorkRng
    strList = VBA.Split(Rng.Value, Sigh)
    xOut = ""
    For i = UBound(strList) To 0 Step -1
        xOut = xOut & strList(i) & Sigh
    Next
    Rng.Value = xOut
Next
End Sub

3. Yna pwyswch F5 allwedd, arddangosir deialog, dewiswch ystod i weithio gyda hi. Gweler y screenshot:

4. Ac yna pwyswch Ok, mae deialog arall wedi'i nodi er mwyn i chi nodi'r gwahanydd yr ydych am wyrdroi'r geiriau yn seiliedig arno, gweler y screenshot:

5. Yna cliciwch OK, a gallwch weld bod y geiriau a ddewiswyd yn cael eu gwrthdroi, gweler sgrinluniau:


swigen dde glas saeth Gwrthdroi llinyn testun neu orchymyn geiriau gyda Kutools ar gyfer Excel yn gyflym ac yn hawdd

Mae Kutools ar gyfer Excel'S Gorchymyn Testun Gwrthdroi gall eich helpu yn gyflym ac yn gyfleus i wyrdroi llinynnau testun amrywiol. Gall wneud gweithrediadau canlynol:

Gwrthdroi'r testun o'r dde i'r chwith, fel “tapiwch rai geiriau"I"sdrow emos pat";

Mae gwrthdroi'r testun yn cael eu gwahanu gan ofod neu gymeriadau penodol eraill, fel “grawnwin oren afal"I"afal oren grawnwin";

Kutools ar gyfer Excel : gyda mwy na 300 o ychwanegiadau Excel defnyddiol, am ddim i geisio heb unrhyw gyfyngiad mewn 30 diwrnod

Gwrthdroi'r testun o'r dde i'r chwith:

1. Dewiswch yr ystod rydych chi am ei gwrthdroi.

2. Cliciwch Kutools > Offer Testun > Gorchymyn Testun Gwrthdroi, gweler y screenshot:

3. Yn y Testun Gwrthdroi blwch deialog, dewiswch yr opsiwn cywir o gwahanydd sy'n cyfateb â gwerthoedd y gell. A gallwch chi ragolwg y canlyniadau o'r Rhagolwg Pane. Gweler y screenshot:

 Dadlwythwch a threial am ddim Kutools ar gyfer Excel Now!


Mae gwrthdroi'r testun wedi'u gwahanu gan ofod neu gymeriadau penodol eraill:

Gall y nodwedd hon hefyd eich helpu i wyrdroi'r llinynnau testun sydd wedi'u gwahanu gan gymeriadau penodol.

1. Dewiswch y celloedd a chymhwyso'r cyfleustodau hwn trwy glicio Kutools > Testun > Gorchymyn Testun Gwrthdroi.

2. Yn y Testun Gwrthdroi blwch deialog, dewiswch y gwahanydd sy'n gwahanu'r gwerthoedd celloedd rydych chi am wyrdroi'r geiriau yn seiliedig arnyn nhw, gweler y screenshot:

3. Yna cliciwch Ok or Gwneud cais, mae'r geiriau yn y celloedd wedi'u gwrthdroi ar unwaith. Gweler sgrinluniau:

Nodyn: Gwirio Sgipio di-destun celloedd i'ch atal rhag gwrthdroi'r rhifau mewn amrediad dethol.

I wybod mwy am y swyddogaeth hon, ewch i Gorchymyn Testun Gwrthdroi.

Dadlwythwch a threial am ddim Kutools ar gyfer Excel Now!


swigen dde glas saeth Demo: Llinyn testun gwrthdroi yn seiliedig ar wahanydd penodol gyda Kutools ar gyfer Excel

Kutools ar gyfer Excel: gyda mwy na 300 o ychwanegiadau Excel defnyddiol, am ddim i geisio heb unrhyw gyfyngiad mewn 30 diwrnod. Dadlwythwch a threial am ddim Nawr!

Erthygl gysylltiedig:

Sut i fflipio'r enw cyntaf ac olaf mewn celloedd yn Excel?


Yr Offer Cynhyrchedd Swyddfa Gorau

Mae Kutools for Excel yn Datrys y rhan fwyaf o'ch Problemau, ac yn Cynyddu Eich Cynhyrchedd 80%

  • Ailddefnyddio: Mewnosod yn gyflym fformwlâu cymhleth, siartiau ac unrhyw beth rydych chi wedi'i ddefnyddio o'r blaen; Amgryptio Celloedd gyda chyfrinair; Creu Rhestr Bostio ac anfon e-byst ...
  • Bar Fformiwla Gwych (golygu llinellau lluosog o destun a fformiwla yn hawdd); Cynllun Darllen (darllen a golygu nifer fawr o gelloedd yn hawdd); Gludo i'r Ystod Hidlo...
  • Uno Celloedd / Rhesi / Colofnau heb golli Data; Cynnwys Celloedd Hollt; Cyfuno Rhesi / Colofnau Dyblyg... Atal Celloedd Dyblyg; Cymharwch y Meysydd...
  • Dewiswch Dyblyg neu Unigryw Rhesi; Dewiswch Blank Rows (mae pob cell yn wag); Darganfyddiad Gwych a Darganfyddiad Niwlog mewn Llawer o Lyfrau Gwaith; Dewis ar Hap ...
  • Copi Union Celloedd Lluosog heb newid cyfeirnod fformiwla; Auto Creu Cyfeiriadau i Daflenni Lluosog; Mewnosod Bwledi, Blychau Gwirio a mwy ...
  • Testun Detholiad, Ychwanegu Testun, Tynnu yn ôl Swydd, Tynnwch y Gofod; Creu ac Argraffu Subtotals Paging; Trosi rhwng Cynnwys a Sylwadau Celloedd...
  • Hidlo Super (arbed a chymhwyso cynlluniau hidlo i ddalenni eraill); Trefnu Uwch yn ôl mis / wythnos / dydd, amlder a mwy; Hidlo Arbennig gan feiddgar, italig ...
  • Cyfuno Llyfrau Gwaith a Thaflenni Gwaith; Uno Tablau yn seiliedig ar golofnau allweddol; Rhannwch Ddata yn Daflenni Lluosog; Trosi Swp xls, xlsx a PDF...
  • Mwy na 300 o nodweddion pwerus. Yn cefnogi Swyddfa / Excel 2007-2019 a 365. Yn cefnogi pob iaith. Defnydd hawdd yn eich menter neu sefydliad. Nodweddion llawn treial am ddim 30 diwrnod. Gwarant arian yn ôl 60 diwrnod.
tab kte 201905

Mae Tab Office yn Dod â rhyngwyneb Tabbed i'r Swyddfa, a 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!
gwaelod officetab

 

sylwadau (19)
Dim sgôr eto. Byddwch y cyntaf i sgorio!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae hyn yn hurt. Cymaint o god i gyflawni tasg syml o wrthdroi'r llinyn? :o Dim ond ffwythiant 3 llinell sydd angen ei ychwanegu yn y modiwl fel isod: Ffwythiant strrev(strValue As Llinynnol) strrev = StrReverse(strValue) Swyddogaeth Diwedd Nawr gellir defnyddio'r fformiwla = strrev(A1) yn y daflen Excel. Mae hyn yn gweithio gan fod StrReverse yn swyddogaeth gynhenid ​​i VBA. :D
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Un arall... Swyddogaeth InvertText(str Fel Llinynnol) 'Gan Faseeh Muhammad Dim m Fel Cyfanrif Ar gyfer m = Len(str) I 1 Cam -1 countRepp = countRepp a Chanolbarth(str, m, 1) Nesaf m Diwedd Swyddogaeth
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Sori ychydig o olygu Swyddogaeth InvertText(str Fel Llinynnol) 'Gan Faseeh Muhammad Dim Curr Fel Llinynnol Dim m Fel Cyfanrif Ar gyfer m = Len(str) I 1 Cam -1 countRepp = countRepp & Mid(str, m, 1) Nesaf m Inverttext Swyddogaeth Diwedd
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo pawb, rwyf wedi rhoi cynnig ar y swyddogaeth hon: Sub ReverseText() 'Updateby20131128 Dim Rng As Range Dim WorkRng As Range On Error Ail-ddechrau Nesaf xTitleId = "KutoolsforExcel" Set WorkRng = Application.Selection Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8) Ar gyfer Pob Rng Mewn WorkRng xValue = Rng.Gwerth xLen = VBA.Len(xValue) xOut="" Ar gyfer i = 1 I xLen getChar = VBA.Right(xValue, 1) xValue = VBA.Left(xValue, xLen - i) xOut = xOut & getChar Next Rng.Value = xOut Next End Is ond pan dwi wedi ei redeg gyda rhifau mae wedi dileu pob sero. ydych chi'n gwybod swyddogaeth nad yw'n dileu sero? Diolch!!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Defnyddiwch god ffwythiant Vineet fel modiwl ac wrth ddefnyddio'r fformiwla, defnyddiwch y tric hwn: =strrev ("&D9&"") lle mae D9 yn cynnwys y rhif. Cod VBA Vineet ar gyfer y ffwythiant hwnnw yw: Swyddogaeth strrev(strGwerth Fel Llinyn) strrev = StrReverse(strValue) Swyddogaeth Terfynol
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Defnyddiwch hwn..rhowch eich mewnbwn yn A1 yna bydd yr allbwn yn B1 Is zzzText() Dim xlen, xvalue, xoutput xlen = VBA.Len(Amrediad("A1")) xvalue = Ystod ("A1").Value xoutput = "" Ar gyfer i = 1 I xlen GetText = VBA.Right(xvalue, 1) xvalue = VBA.Left(xvalue, xlen - i) xoutput = xoutput & GetText Next i Ystod("B1").Value = Ystod xoutput( "C1").Gwerth = Ystod xlen("D1").Gwerth = xvalue Diwedd Is
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Rwy'n sylwi bod llawer o bobl yn ail-ddyfeisio'r olwyn trwy wneud gorchmynion chwith, dde, mae VB6 yn cefnogi gwrthdro llinynnol SYNTAX: strRevese ("Llinynnol") dyna'r cyfan sydd ei angen arnoch chi Dim stCellValue, i Ar gyfer i = Ystod 1 i 5 ("A" & X).Dewiswch stCellValue = Ystod("A" & X).Gwerth stCellValue = Ystod StrReverse(stCellValue)("A" & X).Gwerth = stCellValue dan 10 ond angen bod mewn fformat amser fel "10:01:24" yn hytrach na "10:1:24" intMins = 1 stMinutes = iawn( "00" & intMins, 2) result = 01
Lleihawyd y sylw hwn gan y safonwr ar y wefan
diolch mae'n ddefnyddiol iawn i mi :roll:
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo hoffwn wrthdroi Dyddiadau. 20/11/2015 i 2015/11/20 Unrhyw Gymorth? Diolch
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Ar gyfer dyddiadau y cyfan sydd angen i chi ei wneud yw newid fformat y gell i'r fformat sydd ei angen. De-gliciwch ar y gell yr hoffech ei wrthdroi a dewis cell fformat. Dewiswch Dyddiad o dan yr adran categori a newidiwch y lleoliad o ble bynnag yr ydych i UDA neu Tsiec neu wlad arall a allai ddefnyddio'r fformat y mae gennych ddiddordeb ynddo. Yna dewiswch yr un sy'n cyfateb i'ch gofynion.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
helo, nid oes gennyf Kutools i wrthdroi cymeriad testun, os oes gan unrhyw un yr offer hwn ac eisiau fy helpu, anfonwch e-bost ataf i anfon fy ffeil atoch i'w wrthdroi. fy e-bost yw: [b][b]mohanned1@windowslive.com[/b][/b] o ran,
Lleihawyd y sylw hwn gan y safonwr ar y wefan
ewch trwy'r cyfarwyddiadau a roddir gan wefan y swyddfa Estyn ar ôl chwilio gyda google trwy linyn cefn yn excel.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae'n bosibl gwrthdroi testun gan ddefnyddio fformiwla, mae'n ailadroddus ac yn gyfyngedig i ba mor bell rydych chi'n barod i fynd ac yn amodol ar nifer y nodau bydd excel yn caniatáu yn y bar fformiwla. Uchafswm hyd y testun fydd 30 nod ac mae yng nghell A1. Byddai cell B1 yn darllen: =TRIM(MID(LEFT(A1&REPT(" ",31),31),30,1)&MID(CHWITH(A1&REPT("", 31),31),29,1)&MID(CHWITH( A1&REPT(" ",31),31),28,1)&MID(LEFT(A1&REPT(" ",31),31),27,1)&MID(CHWITH(A1&REPT("",31),31),26,1 ,1)&MID(CHWITH(A31&REPT(" ",31),25,1),1)&MID(LEFT(A31&REPT(" ",31),24,1),1)&MID(CHWITH(A31&REPT("", 31), 23,1), 1&MID(LEFT(A31&REPT(" ",31),22,1),1)&MID(LEFT(A31&REPT(" ",31),21,1),1)&MID( CHWITH(A31&REPT(" ",31),20,1),1)&MID(LEFT(A31&REPT(" ",31),19,1),1)&MID(CHWITH(A31&REPT("", 31),18,1) ,1)&MID(LEFT(A31&REPT(" ",31),17,1),1)&MID(CHWITH(A31&REPT(" ",31),16,1),1)&MID(CHWITH(A31&REPT(" ", 31), 15,1), 1)&MID(LEFT(A31&REPT(" ",31),14,1),1)&MID(CHWITH(A31&REPT(" ",31),13,1),1) &MID(LEFT(A31&REPT(" ",31),12,1),1)&MID(LEFT(A31&REPT(" ",31),11,1),1)&MID(CHWITH(A31&REPT(" ",31), 10,1), 1)&MID(CHWITH(A31&REPT(" ",31),9,1),1)&MID(CHWITH(A31&REPT(" ",31),8,1),1)&MID(CHWITH(A31&REPT" (" ",31),7,1),1)&MID(LEFT(A31&REPT(" ",31),6,1),1)&MID(CHWITH(A31&REPT("",31),5,1),1, 31 ID(LEFT(A31&REPT(" ",4,1),1),31)&MID(LEFT(A31&REPT(" ",3,1),1),31)) Canlyniad: A31: Duncan Sullivan-Shaw B2,1: wahS -navilluS nacnuD Yn y bôn, mae eich testun yng nghell A1 yn troi'n 31 nod o hyd trwy ychwanegu digon o fylchau i alluogi hyn, a darllenir pob nod yn unigol o'r dde i'r chwith nes i chi gyrraedd y nod cyntaf. Bydd hyn yn arwain at eich testun wedi'i wrthdroi yn cynnwys bylchau arweiniol, y mae'r gorchymyn TRIM yn eu tynnu i chi. Er mwyn lleihau neu gynyddu'r hyd byddech yn dileu neu ychwanegu pob gosodiad. Dylai’r rhif yn y datganiad REPT fod 31 yn fwy na’r hyd mwyaf yr ydych yn gweithio iddo a bydd eich datganiad MID cyntaf yn dechrau ar yr hyd mwyaf yn gweithio i lawr i 1,1.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Canfûm fod yr Is-adran wreiddiol yn rhoi'r canlyniadau gydag ochenaid ychwanegol ar ddiwedd pob cell a ddewiswyd. Felly yr wyf yn trwsio y rhan hon. Ar gyfer i = UBound(strList) I 0 Cam -1 Os fi > 0 Yna xOut = xOut & strList(i) & Sigh Arall xOut = xOut & strList(i) Nesaf Rng.Value = xOut
Lleihawyd y sylw hwn gan y safonwr ar y wefan
A yw'n bosibl cychwyn y cefn ar hyd nod penodol (ar gyfer y swyddogaeth a ddiffinnir gan y defnyddiwr neu'r cod VBA)? Er enghraifft, gwerthoedd cell gwrthdro A1 sy'n dechrau ar ôl y cyfrif nodau sy'n hafal i werth B1. Felly os yw B1 yn 10 nod bydd y cefn yn dechrau ar nodau 11+ yn A1.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch yn fawr iawn. Helpodd y cod hwn fy ffrind mewn ffordd dda iawn
Lleihawyd y sylw hwn gan y safonwr ar y wefan
anhygoel ddefnyddiol iawn diolch am rannu'r manylion
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae hyn yn wirioneddol yn help mawr ... Diolch yn fawr iawn
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Ik zoek een manier om een ​​heleboel woorden yn 'rijm-fabetische volgorde' te zetten. Dus de laatste llythyrau van het woord moeten in alfabetische volgorde. Iemand enig idee? VrGr Amanda
Nid oes unrhyw sylwadau wedi'u postio yma eto
Gadewch eich sylwadau
Postio fel Gwestai
×
Graddiwch y swydd hon:
0   Cymeriadau
Lleoliadau a Awgrymir