Sut i chwilio mewn llyfr gwaith cyfan bob amser?
Yn Excel, pan ddefnyddiwch y swyddogaeth Dod o Hyd ac Amnewid, bydd yn chwilio yn y daflen waith gyfredol yn ddiofyn, os ydych chi bob amser eisiau chwilio ym mhob dalen, mae'n rhaid i chi newid Taflen i Llyfr Gwaith O dan y Opsiwn botwm i mewn Dod o hyd ac yn ei le deialog wrth alluogi'r llyfr gwaith bob tro. Sut allech chi ei osod i chwilio o fewn y llyfr gwaith cyfan yn lle taflen weithredol yn ddiofyn?
Chwiliwch mewn llyfr gwaith cyfan gyda chod VBA bob amser
Chwiliwch bob amser mewn llyfr gwaith cyfan gyda Kutools ar gyfer Excel
Chwiliwch mewn llyfr gwaith cyfan gyda chod VBA bob amser
Mewn gwirionedd, nid oes unrhyw ffordd uniongyrchol inni newid y cwmpas chwilio i'r llyfr gwaith cyfan yn ddiofyn yn Excel, ond, gallwch gymhwyso'r cod VBA canlynol fel ateb gwaith. Gyda'r cod hwn, nid oes angen i chi newid cwmpas y chwiliad bob tro wrth ginio’r llyfr gwaith hwn.
1. Daliwch i lawr y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.
2. Cliciwch Mewnosod > Modiwlau, a gludwch y cod canlynol yn y Modiwlau Ffenestr.
Cod VBA: Chwiliwch yn y llyfr gwaith cyfan bob amser:
Sub FindReplace_WB()
'Updateby Extendoffice
Dim ws As Worksheet
Dim xFind As String
Dim xRep As String
Application.ScreenUpdating = False
On Error Resume Next
xFind = Application.InputBox("Find what", "Kutools for Excel", "", , , , , 2)
xRep = Application.InputBox("Replace with", "Kutools for Excel", "", , , , , 2)
If xFind = "" Then
MsgBox "wrong...", vbInformation, "Kutools for Excel"
Exit Sub
End If
For Each ws In ThisWorkbook.Worksheets
ws.UsedRange.Replace What:=xFind, Replacement:=xRep, LookAt:=xlWhole
Next ws
On Error GoTo 0
Application.ScreenUpdating = True
End Sub
3. Yna pwyswch F5 allwedd i redeg y cod hwn, ac yn y blychau deialog popped allan, teipiwch werthoedd y testun yn y blychau Dod o Hyd i ac Amnewid gyda blychau ar wahân, gweler y screenshot:
4. Ac yna cliciwch OK, mae'r holl werthoedd yn y llyfr gwaith cyfan rydych chi eu heisiau wedi cael eu disodli gan y gwerthoedd angenrheidiol.
5. Cadwch y llyfr gwaith fel Llyfr Gwaith Macro-alluogedig Excel fformat, a'r tro nesaf, pan fyddwch chi'n agor y llyfr gwaith hwn, gallwch chi bob amser gymhwyso'r cod hwn i chwilio yn y llyfr gwaith cyfan.
Chwiliwch bob amser mewn llyfr gwaith cyfan gyda Kutools ar gyfer Excel
Os oes gennych Kutools ar gyfer Excel, Gyda'i Panelau Navigation cyfleustodau, gallwch chi bob amser ddod o hyd i daflen waith, llyfr gwaith cyfan neu lyfrau gwaith agored lluosog yn eu lle a'u disodli yn ôl yr angen.
Kutools ar gyfer Excel : gyda mwy na 300 o ychwanegiadau Excel defnyddiol, am ddim i geisio heb unrhyw gyfyngiad mewn 30 diwrnod. Dadlwythwch am ddim Kutools ar gyfer Excel nawr! |
Ar ôl gosod Kutools ar gyfer Excel, gwnewch fel a ganlyn:
1. Cliciwch Kutools > Llywio, gweler y screenshot:
2. Yn y Llywio pane, cliciwch botwm i fynd i'r Opsiynau Llywio, yn y ganolfan opsiynau, nodwch y cwmpas diofyn yn ôl yr angen o dan y Dod o hyd ac yn ei le adran, yn yr achos hwn, byddaf yn dewis Llyfr gwaith gweithredol, gweler y screenshot:
3. Yna cliciwch OK botwm, cau ac ailagor y llyfr gwaith i gael yr effaith gosod, ac yn awr, ewch i'r Llywio cwarel, a chlicio botwm i actifadu'r Dod o hyd ac yn ei le swyddogaeth. Yn y Dod o hyd ac yn ei le cwarel, gwnewch y gweithrediadau canlynol:
(1.) O dan y Yn adran, gallwch weld bod y cwmpas diofyn wedi'i newid i'r Llyfr gwaith gweithredol;
(2.) O dan y Disodli tab, nodwch y testun rydych chi am ddod o hyd iddo a'i ddisodli ar wahân yn y Dewch o hyd i beth ac Amnewid gyda blwch testun;
(3.) Yna cliciwch y Amnewid All botwm i ddisodli'r testun yn y llyfr gwaith gweithredol sydd ei angen arnoch chi.
4. O hyn ymlaen, pan fyddwch chi'n agor unrhyw lyfr gwaith ac yn ei gymhwyso Dod o hyd ac yn ei le cyfleustodau Kutools, cwmpas y chwiliad yw'r llyfr gwaith gweithredol yn ddiofyn.
Gall mwy na 300 o swyddogaethau wneud eich swydd yn effeithlon, gallwch chi lawrlwytho Kutools ar gyfer Excel am ddim llwybr.
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!