Chuyển dữ liệu cột thành hàng ngang (1 người xem)

[yoomi]

Gửi các bạn

Nhờ các bạn chuyển dữ liệu cột dữ liệu cột thành dữ liệu hàng ngang như file đính kèm

 

[viettho]

up lại file nhé bạn

 

[vanthinh3101]

Gửi các bạn

Nhờ các bạn chuyển dữ liệu cột dữ liệu cột thành dữ liệu hàng ngang như file đính kèm

Bạn thử công thức:

G5=OFFSET('Du lieu'!$E$6,MATCH(TIMESHIFT!$D5,'Du lieu'!$A$7:$A$9,0),IF(G$4="VÀO",MATCH(--LOOKUP("zzz",TIMESHIFT!$G$1:G$1),'Du lieu'!$C$7:$C$9,0),MATCH(--LOOKUP("zzz",TIMESHIFT!$G$1:G$1),'Du lieu'!$C$7:$C$9,0)+1))

Enter, Fill xuống, Fill sang phải
Bạn nhớ sửa lại vùng dữ liệu tham chiếu cho phù hợp với dữ liệu gốc nhé!

 

[vanthinh3101]

Gửi các bạn

Nhờ các bạn chuyển dữ liệu cột dữ liệu cột thành dữ liệu hàng ngang như file đính kèm

Công thức ở bài #3 bị sai, mình sửa lại bạn nhé!

G5=OFFSET('Du lieu'!$F$6,MATCH(TIMESHIFT!$D5&"|"&--LOOKUP("zzz",TIMESHIFT!$G$1:G$1),'Du lieu'!$A$7:$A$9&"|"&'Du lieu'!$C$7:$C$9,0),IF(G$4="VÀO",0,1))

Ấn Ctrl+Shift+Enter, sau đó Fill xuống, Fill sang phải bạn nhé!

 

[yoomi]

Công thức ở bài #3 bị sai, mình sửa lại bạn nhé!

G5=OFFSET('Du lieu'!$F$6,MATCH(TIMESHIFT!$D5&"|"&--LOOKUP("zzz",TIMESHIFT!$G$1:G$1),'Du lieu'!$A$7:$A$9&"|"&'Du lieu'!$C$7:$C$9,0),IF(G$4="VÀO",0,1))

Ấn Ctrl+Shift+Enter, sau đó Fill xuống, Fill sang phải bạn nhé!

Bạn oi, mình làm mãi nhưng ko dc, Bạn làm giúp vào file và up lên giúp mình được không ạ
Cảm ơn bạn nhiều

 

[vanthinh3101]

Bạn oi, mình làm mãi nhưng ko dc, Bạn làm giúp vào file và up lên giúp mình được không ạ
Cảm ơn bạn nhiều

Bạn xem file nhé!

 

[yoomi]

Bạn xem file nhé!

Bạn oi, giúp mình thêm ý nữa là nếu không có dữ liệu , hoặc dữ liệu là off thì sẽ là 0 bạn ạ

 

[vanthinh3101]

Bạn oi, giúp mình thêm ý nữa là nếu không có dữ liệu , hoặc dữ liệu là off thì sẽ là 0 bạn ạ

Dùng IFERROR là được bạn.

G5=IFERROR(OFFSET('Du lieu'!$F$6,MATCH(TIMESHIFT!$D5&"|"&--LOOKUP("zzz",TIMESHIFT!$G$1:G$1),'Du lieu'!$A$7:$A$9&"|"&'Du lieu'!$C$7:$C$9,0),IF(G$4="VÀO",0,1)),0)

Vẫn là Ctrl+Shift+Enter nhé!

 

[Ba Tê]

Gửi các bạn

Nhờ các bạn chuyển dữ liệu cột dữ liệu cột thành dữ liệu hàng ngang như file đính kèm

Nếu dữ liệu của bạn có hàng trăm người trong 1 tháng thì thử dùng VBA xem sao.

 

[yoomi]

Nếu dữ liệu của bạn có hàng trăm người trong 1 tháng thì thử dùng VBA xem sao.

Dữ liệu bên em lên đến 2000 nhân viên, bạn có thể add sẵn công thức giùm mình được không
File đính kèm mình nhấn nút sao không ra được dữ liệu nhỉ

 

[yoomi]

Dùng IFERROR là được bạn.

G5=IFERROR(OFFSET('Du lieu'!$F$6,MATCH(TIMESHIFT!$D5&"|"&--LOOKUP("zzz",TIMESHIFT!$G$1:G$1),'Du lieu'!$A$7:$A$9&"|"&'Du lieu'!$C$7:$C$9,0),IF(G$4="VÀO",0,1)),0)

Vẫn là Ctrl+Shift+Enter nhé!

Mình làm được rồi
Bạn giúp mình thêm bài mới trong file này nhé

Lấy dữ liệu liên tiếp của sheet Chi tiet - cho sang sheet Tong - lấy hết dữ liệu cột 1, liên tieeos sẽ lấy dữ liệu cột 2,... và tương tự lấy hết dữ liệu những cột có dữ liệu cho xuống 01 dòng.

 

[vanthinh3101]

Mình làm được rồi
Bạn giúp mình thêm bài mới trong file này nhé

Lấy dữ liệu liên tiếp của sheet Chi tiet - cho sang sheet Tong - lấy hết dữ liệu cột 1, liên tieeos sẽ lấy dữ liệu cột 2,... và tương tự lấy hết dữ liệu những cột có dữ liệu cho xuống 01 dòng.

Công thức mình chưa nghĩ ra.
Bạn xài tạm code vậy.

Sub GPE()
    Dim sArr(), dArr()
    Dim I As Long, J As Long, K As Long
    sArr = Sheet1.Range("C3", Sheet1.Range("C3").End(xlDown)).Resize(, 7).Value
    ReDim dArr(1 To UBound(sArr, 1) * UBound(sArr, 2), 1 To 1)
    For J = 1 To UBound(sArr, 2)
        For I = 1 To UBound(sArr, 1)
            K = K + 1
            dArr(K, 1) = sArr(I, J)
        Next I
    Next J
    Sheet2.Range("D1").Resize(K) = dArr
End Sub