Consell: altres idiomes es tradueixen en Google. Pots visitar el English versió d'aquest enllaç.
Iniciar Sessió
x
or
x
x
Registre
x

or

Com es pot trobar on s'utilitza un determinat rang amb nom a Excel?

Després de crear un rang amb nom, podeu utilitzar aquest rang amb nom en moltes cel·les i fórmules. Però, com esbrinar aquestes cèl·lules i fórmules en el llibre actual? Aquest article presenta tres maneres difícils de solucionar fàcilment.

Cerqueu on s'utilitza un cert rang amb nom amb la funció Cerca i reemplaça

Cerqueu on s'utilitza un determinat rang amb VBA

Cerqueu on s'utilitza un determinat rang amb Kutools per a Excel



fletxa blau dreta bombolla Cerqueu on s'utilitza un cert rang amb nom amb la funció Cerca i reemplaça

Podem aplicar fàcilment Excel Cerca i reemplaça funció per descobrir totes les cel·les que apliquen el rang determinat determinat. Feu el següent:

1. Premeu el botó Ctrl + F tecles simultàniament per obrir el quadre de diàleg Cerca i reemplaça.

Nota: També podeu obrir aquest quadre de diàleg Cerca i reemplaça fent clic al botó Inici > Cerca i selecció > Cercar.

2. Al quadre de diàleg Obrir i reemplaçar l'obertura, feu el següent quadre de pantalla que es mostra:

doc on el rang anomenat utilitza 1

(1) Escriviu el nom de cert rang anomenat al Trobeu què Caixa;

(2) Seleccioneu llibre de treball des Dins d' llista desplegable;

(3) Feu clic al botó Trobeu-ho tot botó.

Nota: Si la llista desplegable dins de dins és invisible, feu clic a la icona opcions botó per ampliar les opcions de cerca.

Ara veureu que totes les cel·les que contenen el nom del rang amb nom especificat s'enumeren a la part inferior del quadre de diàleg Cerca i reemplaça. Mostra la captura de pantalla:

doc on el rang anomenat utilitza 2

Nota: El mètode Find and Replace no només detecta totes les cel·les que utilitzen aquest determinat rang anomenat, sinó que també descobreix totes les cel·les que cobreixen amb aquest rang anomenat.


fletxa blau dreta bombolla Cerqueu on s'utilitza un determinat rang amb VBA

Aquest mètode introduirà una macro VBA per descobrir totes les cel·les que utilitzen el rang determinat anomenat en Excel. Feu el següent:

1. Premeu el botó Alt + F11 tecles simultànies per obrir la finestra de Microsoft Visual Basic per a aplicacions.

2. Feu clic al Insereix > Mòduls, i copieu i enganxeu el següent codi a la finestra del mòdul d'obertura.

VBA: Cerca on s'utilitza un determinat rang anomenat

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. Feu clic al Correr botó o premeu F5 Clau per executar aquest VBA.

4. Ara, al primer quadre d'obrir Kutools per Excel, escriviu el nom del full de càlcul i feu clic al botó OK botó; i després en el quadre de diàleg d'obertura segon, escriviu el nom d'un determinat rang anomenat i feu clic a la icona OK botó Veure captures de pantalla:

5. Ara surt el tercer quadre de diàleg de Kutools per a Excel i enumera cel·les amb un determinat rang anomenat com es mostra a continuació.

Després de fer clic al OK per tancar aquest quadre de diàleg, aquestes cel·les trobades es seleccionen al full de treball especificat alhora.

Nota: Aquest VBA només pot cercar cel·les que utilitzen el rang determinat determinat en un full de treball a la vegada.


fletxa blau dreta bombollaCerqueu on s'utilitza un determinat rang amb Kutools per a Excel

A Kutools for Excel teniu instal·lat, el vostre Reemplaça noms de rang La utilitat us pot ajudar a trobar i llistar totes les cel·les i fórmules que utilitzen el determinat rang anomenat en Excel.

Kutools for Excel - Combina més de 300 Advanced Functions and Tools per a Microsoft Excel

1. Feu clic al Kutools > més > Reemplaça noms de rang per obrir el quadre de diàleg Substitueix el nom de rang.

doc reemplaça els noms de rang

2. Al quadre de diàleg Obre el reemplaçament de noms de rang, aneu a Nom fitxa i feu clic a la icona Nom bàsic llista desplegable i seleccioneu el rang de nom determinat a partir de la següent imatge que es mostra a continuació:

doc on el rang anomenat utilitza 4

Ara totes les cel·les i les fórmules corresponents que utilitzen el rang determinat determinat s'enumeren al quadre de diàleg alhora.

3. Tanqueu el quadre de diàleg Substitueix el nom de rang.

Kutools for Excel - Inclou més eines 300 pràctiques d'Excel. Prova gratuïta de prova completa 60-dia, no cal una targeta de crèdit. Aconsegueix ara!


En aquest vídeo, el Kutools fitxa i el Kutools més la pestanya és afegida per Kutools for Excel. Si ho necessiteu, feu clic a aquí tenir una prova gratuïta 60-dia sense limitacions!



Eines de productivitat recomanades

Pestanya d'Office

estrella d&#39;or1 Porteu les pestanyes pràctiques a l'Excel i a un altre programari d'Office, igual que Chrome, Firefox i el nou Internet Explorer.

Kutools for Excel

estrella d&#39;or1 Increïble! Incrementeu la productivitat en 5 minuts. No necessites cap habilitat especial, estalvieu dues hores cada dia.

estrella d&#39;or1 300 Noves característiques per a Excel, Excel molt fàcil i potent:

  • Combina cel·les / files / columnes sense perdre dades.
  • Combina i consolida diverses fulles i llibres.
  • Comparar intervals, copiar diversos rangs, convertir text a data, unitat i conversió de divises.
  • Compte per colors, subtotals de paginació, classificació avançada i filtre súper,
  • Més Seleccioneu / Insereix / Suprimeix / Text / Format / Enllaç / Comentari / Llibres / Eines de full de càlcul ...

Tret de pantalla de Kutools per a Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.