Tìm kiếm dữ liệu trong mảng (3 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

ringofcloud

Thành viên mới
Tham gia
6/11/14
Bài viết
31
Được thích
5
Mình muốn tìm kiếm dữ liệu trong mảng nhưng loay hoay mãi mà không làm được, tìm kiếm khắp mọi nơi nhưng vẫn chưa được.
Vậy qua đây mình nhờ mọi người trong GPE ai biết thì giúp mình với. Cảm ơn mọi người đã quan tâm
 

File đính kèm

Mình muốn tìm kiếm dữ liệu trong mảng nhưng loay hoay mãi mà không làm được, tìm kiếm khắp mọi nơi nhưng vẫn chưa được.
Vậy qua đây mình nhờ mọi người trong GPE ai biết thì giúp mình với. Cảm ơn mọi người đã quan tâm
Bạn sử dụng hàm này xem sao: {=SUMPRODUCT(--($A$2:$D$8=H4),$A$13:$D$19)}
Nhớ kết thúc bằng ctrl+shift+enter
 

File đính kèm

Ok mình làm được rồi, Thank bạn nhiều. Chúc buổi tối vui vẽ nha.
 
Mình muốn tìm kiếm dữ liệu trong mảng nhưng loay hoay mãi mà không làm được, tìm kiếm khắp mọi nơi nhưng vẫn chưa được.
Vậy qua đây mình nhờ mọi người trong GPE ai biết thì giúp mình với. Cảm ơn mọi người đã quan tâm
1 cách
+ Code Sheet:
PHP:
Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, [H4:H5]) Is Nothing Then
       Call abc
    End If
End Sub

+ Code Module:
PHP:
Sub abc()
    Dim i%, j%
    For i = 2 To 8
        For j = 1 To 4
            If Cells(4, 8).Value = Cells(i, j).Value Then
                Cells(4, 9).Value = Cells(i, j).Offset(11).Value
            ElseIf Cells(5, 8).Value = Cells(i, j).Value Then
                Cells(5, 9).Value = Cells(i, j).Offset(11).Value
            End If
        Next
    Next
End Sub
 

File đính kèm

Lần chỉnh sửa cuối:
1 cách
+ Code Sheet:
PHP:
Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, [H4:H5]) Is Nothing Then
       Call abc
    End If
End Sub

+ Code Module:
PHP:
Sub abc()
Dim i%, j%
For i = 2 To 8
For j = 1 To 4
If Cells(4, 8).Value = Cells(i, j).Value Then
Cells(4, 9).Value = Cells(i, j).Offset(11).Value
ElseIf Cells(5, 8).Value = Cells(i, j).Value Then
Cells(5, 9).Value = Cells(i, j).Offset(11).Value
End If
Next
Next
End Sub
Mình làm được rồi, thank bạn đã bỏ công nha.
 
Web KT

Bài viết mới nhất

Back
Top Bottom