Rút trích dữ liệu (5 người xem)

[Hồn Quê]

Trong file đính kèm em muốn lấy dữ liệu của sheet 1 đưa sang sheet 2 với điều kiện: nếu dữ liệu ở cột H của sheet 1 <>0 thì sẽ lấy nguyên dòng đó đưa sang sheet 2. Bình thường em làm thủ công là filter cột H>0 rồi copy, paste sang, giờ em muốn sử dụng công thức để rút trích dữ liệu từ sheet 1 sang sheet 2 với kết quả như file đính kèm. Nhờ mọi người giúp em công thức với (để em áp dụng cho những trường hợp tương tự), em cảm ơn nhiều ạ.

 

[PacificPR]

Trong file đính kèm em muốn lấy dữ liệu của sheet 1 đưa sang sheet 2 với điều kiện: nếu dữ liệu ở cột H của sheet 1 <>0 thì sẽ lấy nguyên dòng đó đưa sang sheet 2. Bình thường em làm thủ công là filter cột H>0 rồi copy, paste sang, giờ em muốn sử dụng công thức để rút trích dữ liệu từ sheet 1 sang sheet 2 với kết quả như file đính kèm. Nhờ mọi người giúp em công thức với (để em áp dụng cho những trường hợp tương tự), em cảm ơn nhiều ạ.

Không thể nào làm được theo File yêu cầu (Tại dòng mã VT THWW-0004 bằng 625)

MÃ VT	ĐVT	Tồn kho	Tồn kho tối thiểu	BT9146	BT9072	Zeeco	Tổng nhu cầu
THQH-0052	kg	370	0	0	0	43,36	43
THQH-0031	Kg	45	0	0	0	9,756	10
THWW-0004	Kg	15	0	0	500	124,95	625
THWW-0005	Kg	1350	0	0	0	60,223	60
THWW-0018	kg	0	0	0	150	41,992	192
THQH-0006	Kg	145	0	0	0	2,9702	3

 

[Hồn Quê]

Không thể nào làm được theo File yêu cầu (Tại dòng mã VT THWW-0004 bằng 625)

MÃ VT	ĐVT	Tồn kho	Tồn kho tối thiểu	BT9146	BT9072	Zeeco	Tổng nhu cầu
THQH-0052	kg	370	0	0	0	43,36	43
THQH-0031	Kg	45	0	0	0	9,756	10
THWW-0004	Kg	15	0	0	500	124,95	625
THWW-0005	Kg	1350	0	0	0	60,223	60
THWW-0018	kg	0	0	0	150	41,992	192
THQH-0006	Kg	145	0	0	0	2,9702	3

Là sao anh em chưa hiểu ý anh nói dòng mã THWW-0004 bằng 625 thì có ảnh hưởng gì không ạ?

 

[PacificPR]

Là sao anh em chưa hiểu ý anh nói dòng mã THWW-0004 bằng 625 thì có ảnh hưởng gì không ạ?

Chết. Mình nhầm

 

[Hồn Quê]

Bằng 125 thì được. Bằng 625 thì thua rồi

Ý là lớn quá đó hả anh, kiểu này thì tiêu rồi bên em có nhiều mã >1000 mà, hic...

 

[huuquy1196]

Đây bạn nhé. !

Option Explicit

Sub vDT()

Dim i, j As Integer
Dim SArr, Result

SArr = Sheet1.Range("A5:H" & Sheet1.Cells(Sheet1.Rows.Count, "A").End(xlUp).Row).Value

ReDim Result(1 To UBound(SArr, 1), 1 To UBound(SArr, 2))
For i = 1 To UBound(SArr, 1)
    If SArr(i, 8) <> 0 Then
        j = j + 1
        Result(j, 1) = SArr(i, 1)
        Result(j, 2) = SArr(i, 2)
        Result(j, 3) = SArr(i, 3)
        Result(j, 4) = SArr(i, 4)
        Result(j, 5) = SArr(i, 5)
        Result(j, 6) = SArr(i, 6)
        Result(j, 7) = SArr(i, 7)
        Result(j, 8) = SArr(i, 8)
    End If
Next
Sheet2.Range("A4").Resize(UBound(Result, 1), UBound(Result, 2)).Value = Result
End Sub

 

[Hồn Quê]

Đây bạn nhé. !

Option Explicit

Sub vDT()

Dim i, j As Integer
Dim SArr, Result

SArr = Sheet1.Range("A5:H" & Sheet1.Cells(Sheet1.Rows.Count, "A").End(xlUp).Row).Value

ReDim Result(1 To UBound(SArr, 1), 1 To UBound(SArr, 2))
For i = 1 To UBound(SArr, 1)
    If SArr(i, 8) <> 0 Then
        j = j + 1
        Result(j, 1) = SArr(i, 1)
        Result(j, 2) = SArr(i, 2)
        Result(j, 3) = SArr(i, 3)
        Result(j, 4) = SArr(i, 4)
        Result(j, 5) = SArr(i, 5)
        Result(j, 6) = SArr(i, 6)
        Result(j, 7) = SArr(i, 7)
        Result(j, 8) = SArr(i, 8)
    End If
Next
Sheet2.Range("A4").Resize(UBound(Result, 1), UBound(Result, 2)).Value = Result
End Sub

Cảm ơn bạn rất nhiều nhưng cái này có thể dùng hàm được không bạn? giúp mình công thức với

 

[Ba Tê]

Ý là lớn quá đó hả anh, kiểu này thì tiêu rồi bên em có nhiều mã >1000 mà, hic...

Bạn xem file, với trình độ sử dụng hàm Excel "yếu trong mình" như tôi thì dùng 1 cột phụ cho nhẹ nhàng.

 

[HieuCD]

Trong file đính kèm em muốn lấy dữ liệu của sheet 1 đưa sang sheet 2 với điều kiện: nếu dữ liệu ở cột H của sheet 1 <>0 thì sẽ lấy nguyên dòng đó đưa sang sheet 2. Bình thường em làm thủ công là filter cột H>0 rồi copy, paste sang, giờ em muốn sử dụng công thức để rút trích dữ liệu từ sheet 1 sang sheet 2 với kết quả như file đính kèm. Nhờ mọi người giúp em công thức với (để em áp dụng cho những trường hợp tương tự), em cảm ơn nhiều ạ.

Dùng cột phụ

 

[Hồn Quê]

Bạn xem file, với trình độ sử dụng hàm Excel "yếu trong mình" như tôi thì dùng 1 cột phụ cho nhẹ nhàng.

Cột phụ càng tốt bác ạ miễn sao ra kết quả đúng là ok rồi, cảm ơn bác rất nhiều.

 

[Hồn Quê]

Thân gởi anh/em diễn đàn
Tiếp theo chủ đề trên em muốn đưa dữ liệu ở cột A của sheet 1 chuyển sang cột A của sheet 2 với điều kiện trùng thì lấy 1. Nhờ mọi người giúp em công thức, em cảm ơn.

 

[n0thing1988]

Thân gởi anh/em diễn đàn
Tiếp theo chủ đề trên em muốn đưa dữ liệu ở cột A của sheet 1 chuyển sang cột A của sheet 2 với điều kiện trùng thì lấy 1. Nhờ mọi người giúp em công thức, em cảm ơn.

Lại dùng cột phụ tiếp thôi bạn à.

 

[HieuCD]

Thân gởi anh/em diễn đàn
Tiếp theo chủ đề trên em muốn đưa dữ liệu ở cột A của sheet 1 chuyển sang cột A của sheet 2 với điều kiện trùng thì lấy 1. Nhờ mọi người giúp em công thức, em cảm ơn.

Dùng cột phụ cho nhẹ file