İpucu: Digər dillər Google-tərcümə olunur. Sizi ziyarət edə bilərsiniz English bu linkin versiyası.
Daxil ol
x
or
x
x
Qeydiyyatdan
x

or

Excel'de müəyyən bir adlandırılmış aralığın istifadə olunduğu yeri necə tapmaq olar?

Adlandırılmış bir sıra yaratdıqdan sonra bu adını bir çox hüceyrə və formulada istifadə edə bilərsiniz. Amma bu işəgötürən kitabında bu hüceyrələri və formulları necə öyrənə bilərik? Bu yazı asanlıqla həll etmək üçün üç çətin yol təqdim edir.

Bul və dəyişdirmək funksiyası ilə müəyyən bir adın aralığının tapıldığını tapın

VBA ilə müəyyən bir ad verilmiş yerin tapıldığını tapın

Excel üçün Kutools ilə müəyyən bir adlandırılmış yerin tapıldığını tapın



arrow mavi sağ bubble Bul və dəyişdirmək funksiyası ilə müəyyən bir adın aralığının tapıldığını tapın

Biz Excel-i asanlıqla tətbiq edə bilərik Tapın və dəyişdirin Belirli adlanan aralığı tətbiq edən bütün hüceyrələri tapmaq xüsusiyyətidir. Xahiş edirəm:

1. Basın Ctrl + F Tapmaq və dəyişdirmək informasiya qutusunu açmaq üçün eyni anda düymələri.

Qeyd: Bu tap və dəyişdirin informasiya qutusunu da tıklayaraq aça bilərsiniz ev > Tapın və seçin > Tapmaq.

2. Açılışda tap və dəyişdirin informasiya qutusunda, aşağıdakı ekran görüntüsü kimi göstərin:

adlı bir sıra 1 istifadə doc

(1) Belirli adlandırılmış aralığın adını Nə tapın Qutu;

(2) seçin İş kitabı dən Ərzində açılan siyahı;

(3) basın Hamısını tapın düyməsini basın.

Qeyd: Əgər aşağıda açılan siyahı görünməzsə, bura vurun Nizamlamalar axtarış variantlarını genişləndirmək üçün düyməsini basın.

Artıq müəyyən edilmiş adın adını ehtiva edən bütün hüceyrələr, tap və dəyişdirin informasiya qutusunun altındakı siyahıdır. Ekran görüntüsünə baxın:

adlı bir sıra 2 istifadə doc

Qeyd: Tapın və dəyişdirin metodu, bu müəyyən adlandırılmış aralıdan istifadə edərək bütün hüceyrələri tapır, həm də bu adlandırılan aralığın əhatə etdiyi bütün hüceyrələri aşkar edir.


arrow mavi sağ bubble VBA ilə müəyyən bir ad verilmiş yerin tapıldığını tapın

Bu metod Excel-də müəyyən adlandırılmış intervalını istifadə edən bütün hüceyrələri tapmaq üçün VBA makrosunu təqdim edəcəkdir. Xahiş edirəm:

1. Basın Dayandırmaq + F11 Microsoft Visual Basic for Applications penceresini açmaq üçün eyni zamanda düymələri.

2. Basın Taxmaq > Modules, və kodunu açılış modulu pəncərəsinə qoyun və yapışdırın.

VBA: müəyyən bir adın aralığının istifadə olunduğu yeri tapın

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. Basın qaçış düyməsini basın və ya basın F5 Bu VBA-nı çalıştırmaq üçün açar.

4. İndi açılan Kutools for Excel ilk açılış kutusunda, iş ünvanının adını daxil edin və basın OK düyməsinə; sonra ikinci açılış qutusuna daxil edin, ona daxil olan müəyyən adın adını daxil edin və basın OK düyməsini basın. Ekranlara baxın:

5. İndi Üçüncü Kutools for Excel informasiya qutusu çıxır və göstərilən ekran görüntüsünün altında müəyyən adlandırılmış aralığın istifadə edərək hüceyrələri siyahıya alır.

Bu tıklayarak sonra OK bu dialoq qutusunu bağlamaq üçün düyməni vurduqda, tapılan hüceyrələr müəyyən bir işdə bir seferde seçilir.

Qeyd: Bu VBA yalnız bir zamanda bir iş yerində müəyyən adlandırılmış aralığın istifadə edərək hüceyrələri axtarmaq edə bilər.


arrow mavi sağ bubbleExcel üçün Kutools ilə müəyyən bir adlandırılmış yerin tapıldığını tapın

Sizdə Excel üçün Kutools quraşdırılmışdır Range Adlarını dəyişdirin yardım proqramı, Excel-də müəyyən adlandırılmış aralığı istifadə edən bütün hüceyrələri və formulları tapmaq və siyahıda kömək edə bilər.

Excel üçün Kutools - Microsoft Excel üçün 300 Ətraflı funksiyaları və Alətlərdən daha çox birləşir

1. Basın Kutools > daha > Range Adlarını dəyişdirin Range Adları dəyişdirmək informasiya qutusunu açmaq üçün.

doc aralığın adlarını dəyişir

2. Açılışda Range Names (Range Adları Değiştir) informasiya qutusunu dəyişdirin ad nişanı seçin və basın Baza adı açılır siyahıdan və göstərilən ekran görüntüsünün altından müəyyən olan adını seçin:

adlı bir sıra 4 istifadə doc

İndi müəyyən hüceyrələri istifadə edən bütün hüceyrələr və müvafiq formüllər bir anda informasiya qutusunda yerləşdirilir.

3. Range Adları dəyişdirin informasiya qutusunu bağlayın.

Excel üçün Kutools - 300-dən çox lazımlı Excel alətləri daxildir. Tam xüsusiyyət pulsuz sınaq 60-gün, kredit kartı lazım deyil! Ele indicə onu al!


Bu videoda Kutools nişanı və Kutools Plus nişanı əlavə olunur Excel üçün Kutools. Lazım olsa, klikləyin burada məhdudiyyətsiz bir 60 günlük pulsuz sınaq üçün!



Təklif olunan Məhsuldarlıq Vasitələri

Office Tab

qızıl star1 Chrome, Firefox və yeni Internet Explorer kimi Excel və digər Office proqramlarına lazımlı sekmeleri gətirin.

Excel üçün Kutools

qızıl star1 Amazing! 5 dəqiqədə məhsuldarlığınızı artırın. Heç bir xüsusi bacarıqa ehtiyac yoxdur, hər gün iki saat saxlaya bilərsiniz!

qızıl star1 300 Excel üçün yeni funksiyalar, Excel çox asan və güclü olun:

  • Veriyi ləğv etmədən Cell / Satır / Sütunları birləşdirin.
  • Bir neçə Çarşaf və İş Kitabını birləşdirin və birləşdirin.
  • Çaprazları müqayisə edin, birdən çox aralığa kopyalayın, mətni tarixə, vahidə və valyuta çevrilməsinə çevirin.
  • Rənglər, Paging Subtotals, Advanced Sort və Super Filter tərəfindən sayılan,
  • Daha çox seçin / Insert / Sil / Mətn / Biçim / Bağlantı / Yorum / Çalışma kitabları / Çalışma Qurğuları Tools ...

Excel üçün Kutools-un ekranı

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.