Sub SaveData()
Dim i As Long
With Sheets("DATA")
i = .[B65536].End(xlUp).Row + 1
.Range("A" & i) = i - 3
.Range("B" & i & ":" & "K" & i) = _
WorksheetFunction.Transpose([B5:B14])
.Range("L" & i) = Now
End With
End Sub
Sub DelData()
[B5:B12].ClearContents
End Sub
---kienngan đã viết:cách lấy dữ liệu từ phiếu nhập kho vào sheet sổ tổng hợp nhập xuất tồn kho.
Các bạn có thể vui lòng hướng dẫn giúp mình không? cảm ơn các bạn
---Có thể giúp nếu bạn gửi file lên.
---
---
Cho anh gởi File tham gia được không ptlong04x1 ơi ?