Làm thế nào để đếm số lượng đỉnh trong một cột dữ liệu trong Excel?
Giả sử, hai cột dữ liệu nằm trong trang tính của bạn như ảnh chụp màn hình bên trái được hiển thị, làm thế nào để đếm số đỉnh trong cột B? Trên thực tế, bạn có thể đánh giá một giá trị ô (chẳng hạn như B3) là đỉnh nếu nó đồng thời lớn hơn B2 và B4. Ngược lại, nếu không đáp ứng được hai tiêu chí này thì chưa phải là đỉnh. Bài viết này nói về việc liệt kê và đếm tất cả các đỉnh trong một cột dữ liệu trong Excel.
Đếm số lượng đỉnh trong một cột dữ liệu trong Excel
Công thức sau đây có thể giúp bạn đếm trực tiếp một số đỉnh trong cột dữ liệu trong Excel.
1. Chọn một ô trống để đặt kết quả, nhập công thức =SUMPRODUCT(--(B3:B17>B2:B16),--(B3:B17>B4:B18)) vào Thanh công thức, sau đó nhấn đăng ký hạng mục thi Chìa khóa. Xem ảnh chụp màn hình:
Chú thích: Trong công thức, B3: B17 là phạm vi từ ô thứ ba (bao gồm ô tiêu đề) đến ô cuối cùng thứ hai trong danh sách, B2: B16 là phạm vi từ ô thứ hai (bao gồm ô tiêu đề) đến ô đối đầu một trong các danh sách, và cuối cùng là B4: B18 là phạm vi phạm vi từ ô thứ tư (bao gồm cả ô tiêu đề) đến ô cuối cùng của danh sách. Vui lòng thay đổi chúng khi bạn cần.
Đánh dấu tất cả các đỉnh trong biểu đồ phân tán
Ngoài ra, bạn có thể dễ dàng tìm ra các đỉnh của một cột bằng cách tạo biểu đồ phân tán và đánh dấu tất cả các đỉnh ion trên biểu đồ. Hãy làm như sau.
1. Chọn ô - C3 liền kề với ô B3 (giá trị ô thứ hai trong danh sách của bạn không bao gồm tiêu đề), nhập công thức = IF (AND (B3> B2, B3> B4), "Đỉnh", "") vào Thanh công thức và nhấn đăng ký hạng mục thi Chìa khóa. Sau đó kéo Fill Handle xuống để đánh dấu tất cả các đỉnh như hình minh họa bên dưới.
2. Chọn cột x và y và nhấp vào Chèn > Chèn Scatter (X, Y) hoặc Bubble Chart > Phân tán với Đường thẳng và Điểm đánh dấu để chèn biểu đồ phân tán vào trang tính. Xem ảnh chụp màn hình:
3. Nhấn nút Khác + F11 phím để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.
4. bên trong Microsoft Visual Basic cho các ứng dụng cửa sổ, vui lòng nhấp vào Chèn > Mô-đun. Sau đó sao chép và dán mã VBA bên dưới vào cửa sổ Mã.
Mã VBA: Đánh dấu tất cả các đỉnh trong biểu đồ phân tán
Sub CustomLabels()
Dim xCount As Long, I As Long
Dim xRg As Range, xCell As Range
Dim xChar As ChartObject
Dim xCharPoint As Point
On Error Resume Next
Set xRg = Range("C1")
Set xChar = ActiveSheet.ChartObjects("Chart 1")
If xChar Is Nothing Then Exit Sub
xChar.Activate
xCount = ActiveChart.SeriesCollection(1).Points.Count
For I = 1 To xCount
Set xCell = xRg(1).Offset(I, 0)
If xCell.Value <> "" Then
Set xCharPoint = ActiveChart.SeriesCollection(1).Points(I)
xCharPoint.ApplyDataLabels
xCharPoint.DataLabel.Text = xCell.Value
xCharPoint.DataLabel.Left = xCharPoint.DataLabel.Left - 15
xCharPoint.DataLabel.Top = xCharPoint.DataLabel.Top - 7
End If
Next
End Sub
Chú thích: Trong mã, Biểu đồ 1 là tên của biểu đồ phân tán đã tạo và “C1” là ô đầu tiên của cột trợ giúp chứa các kết quả công thức bạn đã áp dụng ở bước 1. Vui lòng thay đổi chúng dựa trên nhu cầu của bạn.
5. Nhấn nút F5 phím để chạy mã. Sau đó, tất cả các đỉnh được đánh dấu trên biểu đồ phân tán như ảnh chụp màn hình dưới đây:
Công cụ năng suất văn phòng tốt nhất
Nâng cao kỹ năng Excel của bạn với Kutools for Excel và trải nghiệm hiệu quả hơn bao giờ hết. Kutools for Excel cung cấp hơn 300 tính năng nâng cao để tăng năng suất và tiết kiệm thời gian. Bấm vào đây để có được tính năng bạn cần nhất...
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!