Giúp lọc dữ liệu từ 2 bảng

[ngmcuongbl]

Em có 2 bảng dữ liệu, 2 bảng này có cấu trúc như nhau gồm nhiều cột nhưng chỉ quan tâm 2 cột mahang và dongia. Bảng 1 có số liệu mahang A1 đơn giá 100, A2=200, A3=300, A4=400....bảng Cùng mã hàng nhưng đơn giá khác nhau, bảng 1 là hàng bán lẻ, bảng 2 là hàng bán sỉ. Em muốn so sánh 2 bảng này dựa vào cột mã hàng với điều kiện mã hàng với đơn giá bán sỉ nếu nhỏ hơn mã hàng đơn giá bán lẻ thì bỏ qua còn ngược lại thì lấy số liệu đó đưa ra 1 bảng mới. Anh/chị xem giúp em nhé

 

[viehoai]

Em có 2 bảng dữ liệu, 2 bảng này có cấu trúc như nhau gồm nhiều cột nhưng chỉ quan tâm 2 cột mahang và dongia. Bảng 1 có số liệu mahang A1 đơn giá 100, A2=200, A3=300, A4=400....bảng Cùng mã hàng nhưng đơn giá khác nhau, bảng 1 là hàng bán lẻ, bảng 2 là hàng bán sỉ. Em muốn so sánh 2 bảng này dựa vào cột mã hàng với điều kiện mã hàng với đơn giá bán sỉ nếu nhỏ hơn mã hàng đơn giá bán lẻ thì bỏ qua còn ngược lại thì lấy số liệu đó đưa ra 1 bảng mới. Anh/chị xem giúp em nhé

Tốt nhất bạn đưa file lên đi

 

[ngmcuongbl]

Em đưa file lên xem giúp nhé. Ví dụ bảng bán lẻ mã hàng A082B có giá bán 1,390,909
Nhưng bảng bán sỉ giá bán là 1,458,874
Em cần lọc hết những trường hợp như vậy và đưa giá trị bán lẻ nhỏ hơn ra bảng so sánh và cho biết dòng nhỏ hơn đó nhỏ hơn giá trị của dòng nào bên bảng bán sỉ. Thanks

 

[Ba Tê]

Em đưa file lên xem giúp nhé. Ví dụ bảng bán lẻ mã hàng A082B có giá bán 1,390,909
Nhưng bảng bán sỉ giá bán là 1,458,874
Em cần lọc hết những trường hợp như vậy và đưa giá trị bán lẻ nhỏ hơn ra bảng so sánh và cho biết dòng nhỏ hơn đó nhỏ hơn giá trị của dòng nào bên bảng bán sỉ. Thanks

Hiểu thế này chưa biết có đúng không, có gì thì trao đổi thêm nhé.

 

[ngmcuongbl]

Bạn giải thích giúp mình công thức này nhé: IF(OFFSET('bán sỉ'!$F$1,Dong-1,3)>I3,Dong,"")

 

[thehungqnu]

So sánh VB

Mình làm VBE bạn xem có đúng yêu cầu chưa, thông tin lại.
code:
Sub sosanh()
Dim i As Integer
Dim j As Integer
Dim a As Integer
i = 2
a = 1
Do While Sheets(2).Cells(i, 6).Value <> ""
j = 2
While Sheets(1).Cells(j, 6).Value <> ""
If Sheets(2).Cells(i, 6).Value = Sheets(1).Cells(j, 6).Value And Sheets(2).Cells(i, 9).Value < Sheets(1).Cells(j, 9).Value Then
a = a + 1
With Sheets(3)
.Cells(a, 1).Value = Sheets(2).Cells(i, 1).Value
.Cells(a, 2).Value = Sheets(2).Cells(i, 2).Value
.Cells(a, 3).Value = Sheets(2).Cells(i, 3).Value
.Cells(a, 4).Value = Sheets(2).Cells(i, 4).Value
.Cells(a, 5).Value = Sheets(2).Cells(i, 5).Value
.Cells(a, 6).Value = Sheets(2).Cells(i, 6).Value
.Cells(a, 7).Value = Sheets(2).Cells(i, 7).Value
.Cells(a, 8).Value = Sheets(2).Cells(i, 8).Value
.Cells(a, 9).Value = Sheets(2).Cells(i, 9).Value
.Cells(a, 10).Value = "dong: " & j & " Ban si"
End With
End If
j = j + 1
Wend
i = i + 1
Loop
Sheets(3).Select
End Sub