Excel VBA: Sut i Amnewid Testun mewn Llinyn (5 Ffordd Effeithiol)

Hugh West

20-07-2023 Macros & Excel VBA
  • Rhannu Hwn
Hugh West

Os ydych chi'n chwilio am ffyrdd i amnewid testun mewn llinyn gan ddefnyddio Excel VBA , bydd yr erthygl hon yn ddefnyddiol i chi. Gall ailosod rhan destun benodol arbed llawer o amser wrth deipio'r llinynnau testun eto. Felly, gadewch i ni fynd i mewn i'r brif erthygl i wybod y manylion am y dasg newydd hon.

Lawrlwythwch y Llyfr Gwaith

Amnewid Testun yn Llinynnol.xlsm

5 Ffordd o Amnewid Testun mewn Llinyn Gan Ddefnyddio Excel VBA

Yma, mae gennym y set ddata ganlynol sy'n cynnwys rhai cofnodion o'r gweithwyr sydd â'u IDau e-bost. Ein tasg ni yw disodli'r hen enwau parth gyda'r rhai newydd. Yn y dulliau canlynol, byddwn yn gweithio gyda'r set ddata hon ynghyd â rhai llinynnau testun ar hap i ddisodli'r testun dymunol â chodau VBA .

Rydym wedi defnyddio Fersiwn Microsoft Excel 365 yma, gallwch ddefnyddio unrhyw fersiynau eraill yn ôl eich hwylustod.

Dull-01: Amnewid Testun Yn dechrau o'r n-fed Safle Llinyn Ar Hap

Yma, byddwn yn disodli testun mewn llinyn testun ar hap ar gyfer gwahanol leoliadau cychwyn.

Cam-01 :

➤ Ewch i'r Tab Datblygwr >> Cod Grŵp >> Visual Basic Opsiwn.

Yna, y Golygydd Sylfaenol Gweledol Bydd yn agor.

➤ Ewch i'r Mewnosod Tab >> Modiwl Opsiwn.

Ar ôl hynny, bydd Modiwl yn cael ei greu.

Cam-02 :

➤ Ysgrifennwch y canlynolcod 

5184

Yma, rydym wedi datgan full_txt_str a updated_str fel Llinyn ac yna wedi neilltuo full_txt_str i destun ar hap string- “Cant Ceir Hanner cant o geir Deg Car” . Yna mae'r ffwythiant VBA REPLACE yn cael ei ddefnyddio i ddisodli rhan Ceir o'r llinyn hap yma gyda Beiciau<10 Defnyddir a 1 yma i gychwyn y cyfnewid o safle 1 y llinyn hwn. Yn olaf, rydym wedi aseinio'r llinyn testun newydd hwn i updated_str a gyda blwch neges ( MsgBox ) byddwn yn gweld y canlyniad.

0>➤ Pwyswch F5 .

Yna bydd blwch neges yn ymddangos gyda'r llinyn testun newydd gyda'r testun newydd Beiciau 2>.

➤ I wneud y broses amnewid o'r ail achos o Ceir defnyddiwch y cod canlynol.

5950

Yma, rydym wedi defnyddio'r man cychwyn fel 14 oherwydd rydym am gael y rhan o'r llinyn ar ôl Hundred Cars a disodli'r <1 Ceir yma.

2> ➤ Ar ôl rhedeg y cod, bydd gennym y blwch neges canlynol gyda'r llinyn testun yn cychwyn o'r testun Fifty a gyda Beiciau yn safle Ceir .

➤ Am mai dim ond y rhan olaf o'r llinyn hwn sydd gennym, rydym yn defnyddio'r cod canlynol.

3532

Yma, rydym wedi defnyddio'r man cychwyn fel 25 oherwydd rydym eisiau cael y rhan o'r llinyn ar ôl Fifty Cars a disodli'r Ceir gyda Beiciau yma.

Yn olaf, bydd gennym flwch neges gyda'r rhan o'r llinyn a ddymunir yn cael ei amnewid gyda Beiciau .

Darllen Mwy: Excel VBA: Amnewid Cymeriad mewn Llinyn fesul Safle (4 Ffordd Effeithiol)

Dull-02: Amnewid Testun ar gyfer n-fed Llinyn Ar Hap yn Achlysur Gan Ddefnyddio Excel VBA

Yn yr adran hon, byddwn yn disodli testun mewn llinyn ar hap ar gyfer gwahanol niferoedd o ddigwyddiadau gyda'r cymorth o god VBA .

Camau :

➤ Dilynwch Cam-01 o Dull-1 .

➤ Teipiwch y cod canlynol.

9581

Yma, rydym wedi datgan full_txt_str a updated_str fel Llinyn ac yna aseinio full_txt_str i linyn testun ar hap- “Hundred Cars Fifty Cars Ten Car” . Ar ôl hynny, mae'r ffwythiant REPLACE yn cael ei ddefnyddio i ddisodli'r rhan Ceir o'r llinyn hap hwn gyda Beiciau 9>, 1 yn cael ei ddefnyddio yma i gychwyn y amnewid o safle 1 y llinyn hwn, a'r 1 olaf yw ar gyfer cyfrif nifer y digwyddiadau. Drwy ddefnyddio 1 fel y rhif cyfrif rydym yn diffinio amnewid y Ceir cyntaf yn unig. Yn olaf, rydym wedi aseinio'r llinyn testun newydd hwn i updated_str a gydag ablwch neges ( MsgBox ) byddwn yn gweld y canlyniad.

➤ Pwyswch F5 .

Ar ôl hynny, bydd blwch neges yn ymddangos gyda'r testun newydd Beiciau yn y safle cyntaf o Ceir 2>yn unig.

➤ Am ddisodli'r ddau achos cyntaf o Ceir gyda Beic defnyddiwch y cod canlynol.

4292

Yma, defnyddir 2 fel y rhif cyfrif i ddisodli'r ddau achos cyntaf o Ceir gyda Beiciau .

Ar ôl rhedeg y cod, bydd y ddau destun cyntaf yn cael eu disodli 9>Ceir gyda Beiciau .

➤ Defnyddiwch y cod canlynol i ddisodli pob un o'r achosion o'r testun Ceir .

5295

Yma, dadl olaf swyddogaeth REPLACE yw 3 sef y rhif cyfrif sy'n nodi disodli'r holl Geir gyda Beiciau yn y llinyn testun.

➤ Pwyswch F5 .

Ar ôl hynny, byddwn yn cael y blwch neges canlynol gyda'r testun newydd Beiciau yn y llinyn.

Darlleniadau Tebyg

  • Sut i Amnewid Testun gyda Dychwelyd Cerbyd yn Excel (4 Dull Llyfn)
  • Excel VBA: Sut i Ddarganfod a Amnewid Testun yn Ddogfen Word
  • Sut i Amnewid Testun ar ôl Cymeriad Penodol yn Excel (3 Dull)
  • Newid Testun aCell yn Seiliedig ar Gyflwr yn Excel (5 Dull Hawdd)

Method-03: Amnewid Testun mewn Llinyn Ar Hap gyda InputBox

Yma, byddwn yn disodli testun penodol o llinyn ar hap gyda thestun a fydd yn cael ei ddiffinio gan ddefnyddiwr gyda chymorth swyddogaeth VBA InputBox .

Camau :

➤ Dilynwch Cam-01 o Dull-1 .

➤ Teipiwch y cod canlynol.

4809

Yma, rydym wedi datgan full_txt_str , new_txt , a updated_str fel Llinyn ac yna wedi'i neilltuo full_txt_str i linyn testun ar hap- “Cant Ceir Hanner can Ceir Deg Car” . I gael y mewnbwn a ddiffinnir gan y defnyddiwr fel y testun i'w ddisodli gan y Cars yn y llinyn hap, rydym wedi defnyddio swyddogaeth InputBox ac yna wedi aseinio'r gwerth hwn i newydd_txt . Yna mae'r ffwythiant REPLACE yn cael ei ddefnyddio i ddisodli'r rhan Cars o'r llinyn hap yma gyda new_txt . Yn olaf, rydym wedi aseinio'r llinyn testun newydd hwn i updated_str a gyda blwch neges ( MsgBox ) byddwn yn gweld y canlyniad.

0> ➤ Pwyswch F5.

Ar ôl hynny, bydd Blwch Mewnbwn yn ymddangos lle gallwch chi roi unrhyw ran testun rydych chi am ei chael yn y llinyn newydd.

➤ Teipiwch Beiciau neu unrhyw destun arall rydych chi ei eisiau ac yna pwyswch OK .

Yn olaf, fe fyddwch cael y canlyniad canlynol gyda'r llinyn testun newydd yn cael testun newydd Beiciau ynsafle Ceir .

>

Darllen Mwy: Sut i Amnewid Testun yn Fformiwla Excel (7 Ffordd Hawdd)

Method-04: Amnewid Testun mewn Ystod o Llinynnau ag Excel VBA

Yma, byddwn yn amnewid y gmail rhan o yr ids e-bost gyda'r parthau yn y golofn Parth Newydd , ac i gronni'r rhifau adnabod e-bost newydd rydym wedi mewnosod colofn newydd; Id E-bost Terfynol .

Camau :

➤ Dilynwch Cam-01 o Dull-1 .

➤ Teipiwch y cod canlynol. 

5686

Yma, rydym wedi defnyddio'r ddolen FOR i wneud y gweithrediad o Rhes 4 i Rhes 13 . Gyda chymorth y datganiad IF-THEN , rydym wedi gwirio a yw rhifau adnabod e-bost Colofn D yn cynnwys “gmail” <10 neu beidio, ac er mwyn cyflawni'r maen prawf hwn bydd y rhan "gmail" o'r rhifau adnabod e-bost yn cael ei ddisodli gan barthau newydd Colofn E i greu'r rhifau adnabod newydd yn Colofn F . Fel arall bydd gennych wag yn y celloedd cyfatebol o Colofn F .

➤ Pwyswch F5 .

Yna, bydd gennych yr IDau e-bost newydd yn y golofn Id E-bost Terfynol .

Darllen Mwy: Excel VBA  i Ddarganfod ac Amnewid Testun mewn Colofn (2 Enghraifft)

Method-05: Amnewid Testun mewn Ystod o Llinynnau gyda Mewnbwn Defnyddiwr i Dod o Hyd i Destun

Gallwch chi ddisodli'r yn dilyn ids e-bost gyda'rparthau newydd a datgan beth i'w ddisodli yn yr ids blaenorol mae modd defnyddio mewnbwn defnyddiwr trwy ddilyn y dull hwn.

Camau :

➤ Dilynwch Cam-01 o Dull-1 .

➤ Teipiwch y cod canlynol. 

9095

Yma, rydym wedi diffinio partial_text fel Llinyn ac yna ei aseinio i linyn a fydd yn cael ei roi gan ddefnyddiwr drwy'r Blwch Mewnbwn .

Wedi hynny, fe wnaethom ddefnyddio'r ddolen FOR i gyflawni'r weithred o Rhes 4 i Rhes 13 , a defnyddio y datganiad IF-YNA , gwnaethom wirio a yw'r rhifau adnabod e-bost o Colofn D yn cynnwys "gmail" neu ddim. Ac ar gyfer cyflawni'r maen prawf hwn bydd y rhan "gmail" o'r rhifau adnabod e-bost yn cael ei ddisodli gan barthau newydd Colofn E i'w creu yr IDau newydd yn Colofn F . Fel arall bydd gennych wag yn y celloedd cyfatebol o Colofn F .

➤ Pwyswch F5 .

Ar ôl hynny, bydd gennych Blwch Mewnbwn lle mae'n rhaid i chi deipio'r testun rydych am ei chwilio yn yr ystod o ddulliau adnabod e-bost (yma mae gennym ni mynd i mewn gmail ) ac yna pwyswch OK .

Yn olaf, rydym yn cael ein cyfeiriadau e-bost wedi'u diweddaru yn y Rownd Derfynol Id E-bost colofn.

Darllen Mwy: Darganfod ac Amnewid Testun Mewn Ystod gydag Excel VBA (Macro a Ffurflen Defnyddiwr)

Adran Ymarfer

Ar gyfer gwneud ymarfer erbyneich hun rydym wedi darparu adran Ymarfer fel isod mewn tudalen o'r enw Arfer . Gwnewch hynny ar eich pen eich hun.

Casgliad

Yn yr erthygl hon, ceisiwyd ymdrin â'r ffyrdd o ddisodli testun mewn llinyn gan ddefnyddio Excel VBA . Gobeithio y bydd yn ddefnyddiol i chi. Os oes gennych unrhyw awgrymiadau neu gwestiynau, mae croeso i chi eu rhannu yn yr adran sylwadau.

Post blaenorol Sut i Wneud Darn o Siart Cylch yn Excel (gyda Chamau Hawdd)
Post nesaf 40+ o Gyrsiau Excel Ar-lein Am Ddim gyda Thystysgrifau

Mae Hugh West yn hyfforddwr a dadansoddwr Excel hynod brofiadol gyda dros 10 mlynedd o brofiad yn y diwydiant. Mae ganddo radd Baglor mewn Cyfrifeg a Chyllid a gradd Meistr mewn Gweinyddu Busnes. Mae gan Hugh angerdd am addysgu ac mae wedi datblygu dull addysgu unigryw sy’n hawdd ei ddilyn a’i ddeall. Mae ei wybodaeth arbenigol o Excel wedi helpu miloedd o fyfyrwyr a gweithwyr proffesiynol ledled y byd i wella eu sgiliau a rhagori yn eu gyrfaoedd. Trwy ei flog, mae Hugh yn rhannu ei wybodaeth gyda’r byd, gan gynnig tiwtorialau Excel am ddim a hyfforddiant ar-lein i helpu unigolion a busnesau i gyrraedd eu llawn botensial.