Sut i greu cod macro i gyflawni darganfod a disodli testun yn Excel?
Fel rheol, rydym yn defnyddio'r swyddogaeth Dod o Hyd ac Amnewid i mewn i chwilio a disodli gwerthoedd yn Excel. A dweud y gwir, gallwch ddod o hyd i destun yn Excel a'i ddisodli'n uniongyrchol â chod macro. Yn yr erthygl hon, byddwch yn dysgu sut i greu cod macro i gyflawni darganfod a disodli testun yn Excel.
Creu cod macro i gyflawni darganfod a disodli testun yn Excel
Creu cod macro i gyflawni darganfod a disodli testun yn Excel
Gwnewch fel a ganlyn i greu cod macro i gyflawni darganfod a disodli testun yn Excel.
1. Gwasgwch y Alt + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.
2. Yn y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, cliciwch Mewnosod > Modiwlau. Yna copïwch isod god VBA i mewn i'r ffenestr cod.
Cod VBA: Creu cod macro i gyflawni darganfod a disodli testun yn Excel
Sub FindandReplaceText()
'Update by Extendoffice 2018/5/24
Dim xFind As String
Dim xRep As String
Dim xRg As Range
On Error Resume Next
Set xRg =Cells
xFind = Application.InputBox("word to search:", "Kutools for Excel", , , , , 2)
xRep = Application.InputBox("word to replace:", "Kutools for Excel", , , , , 2)
If xFind = "False" Or xRep = "False" Then Exit Sub
xRg.Replace xFind, xRep, xlPart, xlByRows, False, False, False, False
End Sub
3. Gwasgwch y F5 allwedd i redeg y cod.
4. Yn y cyntaf Kutools ar gyfer Excel blwch deialog, nodwch y testun neu'r gwerth y byddwch chi'n ei chwilio ac yna cliciwch ar y OK botwm. Gweler y screenshot:
5. Yn yr ail Kutools ar gyfer Excel blwch deialog, nodwch y testun neu'r gwerth y byddwch chi'n ei ddisodli a chliciwch ar y OK botwm.
Yna caiff eich testun dymunol ei ddisodli ar unwaith.
Nodyn: Mae'r cod hwn yn cael ei gymhwyso i'r daflen waith weithredol.
Erthyglau cysylltiedig:
- Sut i ddarganfod a disodli pob cell wag gyda rhif neu destun penodol yn Excel?
- Sut i ddisodli atalnodau â llinellau newydd (Alt + Enter) mewn celloedd yn Excel?
- Sut i ddod o hyd i enwau tabiau dalen yn Excel a'u disodli?
- Sut i ddod o hyd i werth mewn cell gyda rhestr wedi'i gwahanu gan goma yn Excel?
- Sut i ddod o hyd i groesffordd dwy restr golofn yn Excel?
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!