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

Sut i ddod o hyd i ble mae ystod benodol a enwir yn cael ei defnyddio yn Excel?

Ar ôl creu ystod a enwir, gallwch ddefnyddio'r ystod hon a enwir mewn llawer o gelloedd a fformwlâu. Ond sut i ddarganfod y celloedd a'r fformwlâu hyn yn y llyfr gwaith cyfredol? Mae'r erthygl hon yn cyflwyno tair ffordd anodd i'w datrys yn hawdd.

Darganfyddwch lle mae amrediad penodol a enwir yn cael ei ddefnyddio gyda nodwedd Dod o Hyd ac Amnewid

Darganfyddwch lle mae ystod benodol a enwir yn cael ei defnyddio gyda VBA

Darganfyddwch lle mae ystod benodol a enwir yn cael ei defnyddio gyda Kutools ar gyfer Excel

Tab Swyddfa Galluogi Golygu a Pori Tabbed yn y Swyddfa, a Gwneud Eich Gwaith yn Haws Orau ...
Mae Kutools for Excel yn Datrys y rhan fwyaf o'ch Problemau, ac yn Cynyddu Eich Cynhyrchedd 80%
  • Ailddefnyddio Unrhyw beth: Ychwanegwch y fformwlâu, siartiau ac unrhyw beth arall a ddefnyddir fwyaf cymhleth i'ch ffefrynnau, a'u hailddefnyddio'n gyflym yn y dyfodol.
  • Mwy nag 20 o nodweddion testun: Rhif Detholiad o Llinyn Testun; Tynnu neu Dynnu Rhan o Testunau; Trosi Rhifau ac Arian Cyfred yn Eiriau Saesneg.
  • Uno Offer: Llyfrau Gwaith a Thaflenni Lluosog yn Un; Uno Celloedd Lluosog / Rhesi / Colofnau Heb Golli Data; Uno Rhesi a Swm Dyblyg.
  • Hollti Offer: Rhannwch Ddata yn Daflenni Lluosog Yn Seiliedig ar Werth; Un Llyfr Gwaith i Ffeiliau Lluosog Excel, PDF neu CSV; Un Golofn i Golofnau Lluosog.
  • Gludo Sgipio Rhesi Cudd / Hidlo; Cyfrif A Swm yn ôl Lliw Cefndir; Anfon E-byst wedi'u Personoli at Dderbynwyr Lluosog mewn Swmp.
  • Hidlo Gwych: Creu cynlluniau hidlo datblygedig a'u cymhwyso i unrhyw daflenni; Trefnu yn yn ôl wythnos, dydd, amlder a mwy; Hidlo gan feiddgar, fformwlâu, sylw ...
  • Mwy na 300 o nodweddion pwerus; Yn gweithio gyda'r Swyddfa 2007-2019 a 365; Yn cefnogi pob iaith; Defnydd hawdd yn eich menter neu sefydliad.


swigen dde glas saeth Darganfyddwch lle mae amrediad penodol a enwir yn cael ei ddefnyddio gyda nodwedd Dod o Hyd ac Amnewid

Gallwn gymhwyso Excel yn hawdd Dod o hyd ac yn ei le nodwedd i ddarganfod pob cell sy'n defnyddio'r ystod benodol a enwir. Gwnewch fel a ganlyn:

1. Gwasgwch y Ctrl + F allweddi ar yr un pryd i agor y blwch deialog Dod o Hyd ac Amnewid.

Nodyn: Gallwch hefyd agor y blwch deialog Canfod ac Amnewid hwn trwy glicio ar y Hafan > Dod o Hyd i a Dewis > Dod o hyd i.

2. Yn y blwch deialog Canfod ac Amnewid agoriadol, gwnewch fel a ganlyn y llun a ddangosir:

doc lle defnyddir yr ystod a enwir 1

 

(1) Teipiwch enw amrediad penodol a enwir yn y Dewch o hyd i beth blwch;

(2) Dewiswch Llyfr Gwaith oddi wrth y O fewn rhestr ostwng;

(3) Cliciwch y Dewch o Hyd i Bawb botwm.

Nodyn: Os yw'r rhestr o fewn gwymplen yn anweledig, cliciwch y Dewisiadau botwm i ehangu'r opsiynau chwilio.

Nawr fe welwch fod yr holl gelloedd sy'n cynnwys enw'r amrediad penodol a enwir yn rhestru ar waelod y blwch deialog Dod o Hyd ac Amnewid. Gweler y screenshot:

doc lle defnyddir yr ystod a enwir 2

Nodyn: Mae'r dull Darganfod ac Amnewid nid yn unig yn darganfod pob cell sy'n defnyddio'r ystod benodol hon a enwir, ond hefyd yn darganfod pob cell sy'n gorchuddio â'r ystod hon a enwir.


swigen dde glas saeth Darganfyddwch lle mae ystod benodol a enwir yn cael ei defnyddio gyda VBA

Bydd y dull hwn yn cyflwyno macro VBA i ddarganfod yr holl gelloedd sy'n defnyddio'r ystod benodol a enwir yn Excel. Gwnewch fel a ganlyn:

1. Gwasgwch y Alt + F11 allweddi ar yr un pryd i agor ffenestr Microsoft Visual Basic for Applications.

2. Cliciwch ar y Mewnosod > Modiwlau, a chopïo a gludo'r cod canlynol i mewn i ffenestr agoriadol y Modiwl.

VBA: Darganfyddwch ble mae ystod benodol a enwir yn cael ei defnyddio

Sub Find_namedrange_place()
Dim xRg As Range
Dim xCell As Range
Dim xSht As Worksheet
Dim xFoundAt As String
Dim xAddress As String
Dim xShName As String
Dim xSearchName As String
On Error Resume Next
xShName = Application.InputBox("Please type a sheet name you will find cells in:", "Kutools for Excel", Application.ActiveSheet.Name)
Set xSht = Application.Worksheets(xShName)
Set xRg = xSht.Cells.SpecialCells(xlCellTypeFormulas)
On Error GoTo 0
If Not xRg Is Nothing Then
xSearchName = Application.InputBox("Please type the name of named range:", "Kutools for Excel")
Set xCell = xRg.Find(What:=xSearchName, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False)
        If Not xCell Is Nothing Then
xAddress = xCell.Address
If IsPresent(xCell.Formula, xSearchName) Then
xFoundAt = xCell.Address
End If
            Do
Set xCell = xRg.FindNext(xCell)
If Not xCell Is Nothing Then
If xCell.Address = xAddress Then Exit Do
If IsPresent(xCell.Formula, xSearchName) Then
If xFoundAt = "" Then
xFoundAt = xCell.Address
Else
xFoundAt = xFoundAt & ", " & xCell.Address
End If
End If
Else
Exit Do
End If
Loop
End If
If xFoundAt = "" Then
MsgBox "The Named Range was not found", , "Kutools for Excel"
Else
MsgBox "The Named Range has been found these locations: " & xFoundAt, , "Kutools for Excel"
End If
On Error Resume Next
xSht.Range(xFoundAt).Select
End If
End Sub
Private Function IsPresent(sFormula As String, sName As String) As Boolean
Dim xPos1 As Long
Dim xPos2 As Long
Dim xLen As Long
Dim I As Long
xLen = Len(sFormula)
xPos2 = 1
Do
xPos1 = InStr(xPos2, sFormula, sName) - 1
If xPos1 < 1 Then Exit Do
IsPresent = IsVaildChar(sFormula, xPos1)
xPos2 = xPos1 + Len(sName) + 1
If IsPresent Then
If xPos2 <= xLen Then
IsPresent = IsVaildChar(sFormula, xPos2)
End If
End If
Loop
End Function
Private Function IsVaildChar(sFormula As String, Pos As Long) As Boolean
Dim I As Long
IsVaildChar = True
For I = 65 To 90
If UCase(Mid(sFormula, Pos, 1)) = Chr(I) Then
IsVaildChar = False
Exit For
End If
Next I
If IsVaildChar = True Then
If UCase(Mid(sFormula, Pos, 1)) = Chr(34) Then
IsVaildChar = False
End If
End If
If IsVaildChar = True Then
If UCase(Mid(sFormula, Pos, 1)) = Chr(95) Then
IsVaildChar = False
End If
End If
End Function
3. Cliciwch ar y Run botwm neu wasg F5 Allwedd i redeg y VBA hwn.

4. Nawr yn y blwch deialog agoriadol cyntaf Kutools for Excel, teipiwch enw'r daflen waith ynddo a chliciwch ar y OK botwm; ac yna yn yr ail flwch deialog agoriadol teipiwch enw amrediad penodol a enwir ynddo, a chliciwch ar y OK botwm. Gweler sgrinluniau:

5. Nawr mae'r trydydd blwch deialog Kutools for Excel yn dod allan ac yn rhestru celloedd gan ddefnyddio'r ystod benodol a enwir fel isod y llun a ddangosir.

Ar ôl clicio ar y OK botwm i gau'r blwch deialog hwn, dewisir y celloedd a ddarganfuwyd yn y daflen waith benodol ar unwaith.

Nodyn: Dim ond mewn un daflen waith ar y tro y gall y VBA hwn edrych am gelloedd sy'n defnyddio'r ystod benodol a enwir.


swigen dde glas saethDarganfyddwch lle mae ystod benodol a enwir yn cael ei defnyddio gyda Kutools ar gyfer Excel

Ynoch chi mae Kutools for Excel wedi'i osod, mae ei Amnewid Enwau Ystod gall cyfleustodau eich helpu i ddod o hyd i a rhestru'r holl gelloedd a fformwlâu sy'n defnyddio'r ystod benodol a enwir yn Excel.

Kutools ar gyfer Excel - Yn cynnwys mwy na 300 o offer defnyddiol ar gyfer Excel. Treial nodwedd lawn am ddim 30 diwrnod, nid oes angen cerdyn credyd! Treial Am Ddim Nawr!

1. Cliciwch ar y Kutools > Mwy > Amnewid Enwau Ystod i agor y blwch deialog Amnewid Enwau Ystod.

doc yn disodli enwau amrediad

2. Yn y blwch deialog agoriadol Amnewid Enwau Ystod, ewch i Enw tab, a chliciwch ar y Enw Sylfaen rhestr ostwng a dewis yr ystod benodol a enwir ohoni fel isod y llun a ddangosir:

doc lle defnyddir yr ystod a enwir 4

Nawr mae'r holl gelloedd a'r fformwlâu cyfatebol sy'n defnyddio'r ystod benodol a enwir yn rhestru yn y blwch deialog ar unwaith.

3. Caewch y blwch deialog Amnewid Enwau Ystod.

Kutools ar gyfer Excel - Yn cynnwys mwy na 300 o offer defnyddiol ar gyfer Excel. Treial nodwedd lawn am ddim 30 diwrnod, nid oes angen cerdyn credyd! Get It Now


Kutools ar gyfer Excel yn cynnwys mwy na 300 o offer defnyddiol ar gyfer Excel, am ddim i roi cynnig arnynt heb gyfyngiad mewn 30 diwrnod. Dadlwythwch a Threial Am Ddim Nawr!

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 (1)
Dim sgôr eto. Byddwch y cyntaf i sgorio!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Yn eich cod VBA, mae rhes 19 mewn testun COCH cyn i mi hyd yn oed geisio ei redeg ... Rwy'n gwybod y bydd problem. Unwaith y byddaf yn rhedeg y cod mae'r llinell honno (#19) yn rhoi neges gwall: Gwall llunio: gwall cystrawen
Nid oes unrhyw sylwadau wedi'u postio yma eto
Gadewch eich sylwadau
Postio fel Gwestai
×
Graddiwch y swydd hon:
0   Cymeriadau
Lleoliadau a Awgrymir