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

Làm cách nào để tìm một phạm vi được đặt tên nhất định được sử dụng trong Excel?

Sau khi tạo một dải ô đã đặt tên, bạn có thể sử dụng dải ô được đặt tên này trong nhiều ô và công thức. Nhưng làm thế nào để tìm ra các ô và công thức này trong sổ làm việc hiện tại? Bài viết này giới thiệu ba cách khó để giải quyết nó một cách dễ dàng.

Tìm nơi một dải ô đã đặt tên nhất định được sử dụng với tính năng Tìm và Thay thế

Tìm nơi sử dụng một dải ô được đặt tên nhất định với VBA

Tìm nơi một phạm vi được đặt tên nhất định được sử dụng với Kutools cho Excel

Tab Office Cho phép Chỉnh sửa và Duyệt theo Tab trong Office, và Giúp Công việc của Bạn Dễ dàng hơn Nhiều ...
Kutools cho Excel giải quyết hầu hết các vấn đề của bạn và tăng 80% năng suất của bạn
  • Tái sử dụng mọi thứ: Thêm các công thức, biểu đồ và bất kỳ thứ gì khác được sử dụng nhiều nhất hoặc phức tạp vào mục yêu thích của bạn và nhanh chóng sử dụng lại chúng trong tương lai.
  • Hơn 20 tính năng văn bản: Trích xuất số từ chuỗi văn bản; Trích xuất hoặc loại bỏ một phần nội dung; Chuyển đổi số và tiền tệ sang từ tiếng Anh.
  • Công cụ hợp nhất: Nhiều Workbook và Sheets thành một; Hợp nhất nhiều ô / hàng / cột mà không làm mất dữ liệu; Hợp nhất các hàng và tổng trùng lặp.
  • Công cụ tách: Chia Dữ liệu thành Nhiều Trang tính Dựa trên Giá trị; Một sổ làm việc cho nhiều tệp Excel, PDF hoặc CSV; Một cột đến nhiều cột.
  • Dán bỏ qua Hàng ẩn / được lọc; Đếm và tổng theo Màu nền; Gửi hàng loạt email được cá nhân hóa cho nhiều người nhận.
  • Bộ lọc siêu: Tạo lược đồ lọc nâng cao và áp dụng cho bất kỳ trang tính nào; Sắp xếp theo tuần, ngày, tần suất và hơn thế nữa; Lọc bằng cách in đậm, công thức, chú thích ...
  • Hơn 300 tính năng mạnh mẽ; Hoạt động với Office 2007-2021 và 365; Hỗ trợ tất cả các ngôn ngữ; Dễ dàng triển khai trong doanh nghiệp hoặc tổ chức của bạn.

mũi tên màu xanh bong bóng bên phải Tìm nơi một dải ô đã đặt tên nhất định được sử dụng với tính năng Tìm và Thay thế

Chúng ta có thể dễ dàng áp dụng Excel's Tìm và Thay thế tính năng để tìm ra tất cả các ô áp dụng phạm vi được đặt tên nhất định. Vui lòng làm như sau:

1. Nhấn nút Ctrl + F đồng thời để mở hộp thoại Tìm và Thay thế.

Chú thích: Bạn cũng có thể mở hộp thoại Tìm và Thay thế này bằng cách nhấp vào Trang chủ > Tìm & Chọn > Tìm kiếm.

2. Trong hộp thoại Tìm và Thay thế đang mở, vui lòng thực hiện như ảnh chụp màn hình sau:

doc trong đó phạm vi được đặt tên được sử dụng 1

 

(1) Nhập tên của phạm vi được đặt tên nhất định vào Tìm cái hộp;

(2) Chọn Bảng tính từ Trong thời hạn danh sách thả xuống;

(3) Nhấp vào Tìm tất cả .

Chú thích: Nếu danh sách thả xuống Trong vòng không hiển thị, vui lòng nhấp vào Các lựa chọn để mở rộng các tùy chọn tìm kiếm.

Bây giờ bạn sẽ thấy tất cả các ô có chứa tên của dải ô đã đặt tên được liệt kê ở cuối hộp thoại Tìm và Thay thế. Xem ảnh chụp màn hình:

doc trong đó phạm vi được đặt tên được sử dụng 2

Chú thích: Phương pháp Tìm và Thay thế không chỉ tìm ra tất cả các ô sử dụng dải ô được đặt tên nhất định này mà còn tìm ra tất cả các ô nằm trong dải ô được đặt tên này.


mũi tên màu xanh bong bóng bên phải Tìm nơi sử dụng một dải ô được đặt tên nhất định với VBA

Phương pháp này sẽ giới thiệu một macro VBA để tìm ra tất cả các ô sử dụng phạm vi được đặt tên nhất định trong Excel. Vui lòng làm như sau:

1. Nhấn nút Khác + F11 đồng thời để mở cửa sổ Microsoft Visual Basic for Applications.

2. Nhấp vào Chèn > Mô-đunvà sao chép và dán mã sau vào cửa sổ Mô-đun đang mở.

VBA: Tìm nơi sử dụng một dải ô được đặt tên nhất định

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. Nhấp vào chạy nút hoặc bấm F5 Chìa khóa để chạy VBA này.

4. Bây giờ trong hộp thoại Kutools cho Excel mở đầu tiên, vui lòng nhập tên bảng tính vào đó và nhấp vào OK cái nút; và sau đó trong hộp thoại mở thứ hai, vui lòng nhập tên của phạm vi được đặt tên nhất định vào đó và nhấp vào OK cái nút. Xem ảnh chụp màn hình:

5. Bây giờ hộp thoại Kutools cho Excel thứ ba xuất hiện và liệt kê các ô bằng cách sử dụng phạm vi được đặt tên nhất định như hình minh họa bên dưới.

Sau khi nhấp vào OK để đóng hộp thoại này, các ô tìm thấy này được chọn trong trang tính được chỉ định cùng một lúc.

Chú thích: VBA này chỉ có thể tìm kiếm các ô sử dụng phạm vi được đặt tên nhất định trong một trang tính tại một thời điểm.


mũi tên màu xanh bong bóng bên phảiTìm nơi một phạm vi được đặt tên nhất định được sử dụng với Kutools cho Excel

Trong bạn đã cài đặt Kutools cho Excel, Thay thế tên dải ô tiện ích có thể giúp bạn tìm và liệt kê tất cả các ô và công thức sử dụng phạm vi được đặt tên nhất định trong Excel.

Kutools cho Excel - Bao gồm hơn 300 công cụ tiện dụng cho Excel. Bản dùng thử miễn phí đầy đủ tính năng 30-ngày, không cần thẻ tín dụng! Dùng thử miễn phí ngay!

1. Nhấp vào Kutools > Hơn > Thay thế tên dải ô để mở hộp thoại Thay thế Tên Dải ô.

doc thay thế tên phạm vi

2. Trong hộp thoại Thay thế Tên Phạm vi đang mở, hãy đi tới Họ tên và nhấp vào Tên cơ sở danh sách thả xuống và chọn phạm vi được đặt tên nhất định từ nó như hình ảnh chụp màn hình bên dưới:

doc trong đó phạm vi được đặt tên được sử dụng 4

Bây giờ tất cả các ô và công thức tương ứng sử dụng phạm vi được đặt tên nhất định sẽ được liệt kê trong hộp thoại cùng một lúc.

3. Đóng hộp thoại Replace Range Names.

Kutools cho Excel - Bao gồm hơn 300 công cụ tiện dụng cho Excel. Bản dùng thử miễn phí đầy đủ tính năng 30-ngày, không cần thẻ tín dụng! Get It Now


Kutools cho Excel bao gồm hơn 300 công cụ tiện dụng cho Excel, miễn phí dùng thử không giới hạn trong 30 ngày. Tải xuống và dùng thử miễn phí ngay bây giờ!

Các công cụ năng suất văn phòng tốt nhất

Kutools cho Excel giải quyết hầu hết các vấn đề của bạn và tăng 80% năng suất của bạn

  • Tái sử dụng: Chèn nhanh công thức phức tạp, biểu đồ và bất cứ thứ gì bạn đã sử dụng trước đây; Mã hóa ô với mật khẩu; Tạo danh sách gửi thư và gửi email ...
  • Thanh siêu công thức (dễ dàng chỉnh sửa nhiều dòng văn bản và công thức); Bố cục đọc (dễ dàng đọc và chỉnh sửa số lượng ô lớn); Dán vào Dải ô đã Lọchữu ích. Cảm ơn !
  • Hợp nhất các ô / hàng / cột mà không làm mất dữ liệu; Nội dung phân chia ô; Kết hợp các hàng / cột trùng lặp... Ngăn chặn các ô trùng lặp; So sánh các dãyhữu ích. Cảm ơn !
  • Chọn trùng lặp hoặc duy nhất Hàng; Chọn hàng trống (tất cả các ô đều trống); Tìm siêu và Tìm mờ trong Nhiều Sổ làm việc; Chọn ngẫu nhiên ...
  • Bản sao chính xác Nhiều ô mà không thay đổi tham chiếu công thức; Tự động tạo tài liệu tham khảo sang Nhiều Trang tính; Chèn Bullets, Hộp kiểm và hơn thế nữa ...
  • Trích xuất văn bản, Thêm Văn bản, Xóa theo Vị trí, Xóa không gian; Tạo và In Tổng số phân trang; Chuyển đổi giữa nội dung ô và nhận xéthữu ích. Cảm ơn !
  • Siêu lọc (lưu và áp dụng các lược đồ lọc cho các trang tính khác); Sắp xếp nâng cao theo tháng / tuần / ngày, tần suất và hơn thế nữa; Bộ lọc đặc biệt bằng cách in đậm, in nghiêng ...
  • Kết hợp Workbook và WorkSheets; Hợp nhất các bảng dựa trên các cột chính; Chia dữ liệu thành nhiều trang tính; Chuyển đổi hàng loạt xls, xlsx và PDFhữu ích. Cảm ơn !
  • Hơn 300 tính năng mạnh mẽ. Hỗ trợ Office / Excel 2007-2021 và 365. Hỗ trợ tất cả các ngôn ngữ. Dễ dàng triển khai trong doanh nghiệp hoặc tổ chức của bạn. Đầy đủ tính năng Dùng thử miễn phí 30 ngày. Bảo đảm hoàn lại tiền trong 60 ngày.
tab kte 201905

Tab Office mang lại giao diện Tab cho Office và giúp công việc của bạn trở nên dễ dàng hơn nhiều

  • Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
  • Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
  • Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!
officetab dưới cùng
Nhận xét (1)
Chưa có xếp hạng. Hãy là người đầu tiên xếp hạng!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Trong mã VBA của bạn, hàng 19 có văn bản ĐỎ trước khi tôi cố gắng chạy nó ... Tôi biết sẽ có vấn đề. Khi tôi chạy mã mà dòng (# 19) đưa ra thông báo lỗi: Lỗi biên dịch: lỗi cú pháp
Không có bình luận nào được đăng ở đây
Để lại ý kiến ​​của bạn
Đăng với tư cách khách
×
Đánh giá bài viết này:
0   Nhân vật
Các vị trí được đề xuất

Kết nối với chúng tôi

Bản quyền © 2009 - www.extendoffice.com. | Đã đăng ký Bản quyền. cung cấp bởi ExtendOffice. | BẢN ĐỒ CHI NHÁNH
Microsoft và logo Office là các nhãn hiệu hoặc nhãn hiệu đã đăng ký của Microsoft Corporation tại Hoa Kỳ và / hoặc các quốc gia khác.
Được bảo vệ bởi Sectigo SSL