Tạo Sheet lấy số liệu từ ngày đến ngày từ 01 sheet Data (1 người xem)

[tuyvuong]

Chào cả nhà!
Mình có 01 file Excel gồm: Sheet đầu tiên chứa thông tin các khách hàng (tên Sheet là Data)
Hôm trước trên diễn đàn này có 1 bạn đã giúp mình làm Sheet "Bao cao theo ngay", chức năng sheet báo cáo này cho phép mình chọn 1 ngày bất kỳ, nó sẽ lấy số liệu bên Sheet Data có ngày bằng ngày mình chọn. Tuy nhiên báo cáo này chỉ hữu ích khi lâu lâu mình cần in 1 ngày nào đó thì rất hay, còn cuối tháng mình cần in từ ngày đến ngày thì phải gõ từng ngày một rồi in và ...rồi gõ ngày khác. Hôm nay mình post lên đây với mong muốn có bạn nào giúp mình làm thêm 01 sheet báo cáo nữa "Từ ngày ...đến ngày" với nội dung mình mong muốn như sau:
- Cho phép mình gõ Từ ngày ...đến ngày cần lấy báo cáo thay vì chỉ gõ 01 ngày như Sheet "Bao cao theo ngay"
- Trang trí và cách lấy số liệu hoàn toàn giống như Sheet "Bao cao theo ngay" hiện đang có
- Kết quả sẽ tự phân trang để mình có thể bấm in 01 lần.
Ví dụ: Mình muốn lấy báo cáo từ ngày 01/03/2013 đến 15/03/2013 thì kết quả sẽ được trang trí như kết quả của Sheet "Bao cao theo ngay" và mỗi ngày là 01 trang A4 được bố trí chung trong 01 Sheet.
Cám ơn cả nhà rất nhiều!
Tuy Vuong.

 

[tan.ngohoangquoc]

Chào cả nhà!
Mình có 01 file Excel gồm: Sheet đầu tiên chứa thông tin các khách hàng (tên Sheet là Data)
Hôm trước trên diễn đàn này có 1 bạn đã giúp mình làm Sheet "Bao cao theo ngay", chức năng sheet báo cáo này cho phép mình chọn 1 ngày bất kỳ, nó sẽ lấy số liệu bên Sheet Data có ngày bằng ngày mình chọn. Tuy nhiên báo cáo này chỉ hữu ích khi lâu lâu mình cần in 1 ngày nào đó thì rất hay, còn cuối tháng mình cần in từ ngày đến ngày thì phải gõ từng ngày một rồi in và ...rồi gõ ngày khác. Hôm nay mình post lên đây với mong muốn có bạn nào giúp mình làm thêm 01 sheet báo cáo nữa "Từ ngày ...đến ngày" với nội dung mình mong muốn như sau:
- Cho phép mình gõ Từ ngày ...đến ngày cần lấy báo cáo thay vì chỉ gõ 01 ngày như Sheet "Bao cao theo ngay"
- Trang trí và cách lấy số liệu hoàn toàn giống như Sheet "Bao cao theo ngay" hiện đang có
- Kết quả sẽ tự phân trang để mình có thể bấm in 01 lần.
Ví dụ: Mình muốn lấy báo cáo từ ngày 01/03/2013 đến 15/03/2013 thì kết quả sẽ được trang trí như kết quả của Sheet "Bao cao theo ngay" và mỗi ngày là 01 trang A4 được bố trí chung trong 01 Sheet.
Cám ơn cả nhà rất nhiều!
Tuy Vuong.

Thử nhé bạn. Mình dùng advanced filter thôi ^^

 

[tuyvuong]

Mình download về và thấy bạn hiểu sai ý mình rồi. Sheet "Từ ngày đến ngày" phải có giao diện giống như Sheet "Báo cáo theo ngày" và 01 ngày là 01 trang A4. Ví dụ mình thống kê từ ngày 01 đến ngày 05 thì nó sẽ cho kết quả trong cùng 01 Sheet và mỗi ngày là 01 trang A4 (vì dữ liệu 01 ngày không quá 08 dòng).
Bạn xem giúp mình thử nha.
Cám ơn bạn nhiều!

 

[Ba Tê]

Chào cả nhà!
Mình có 01 file Excel gồm: Sheet đầu tiên chứa thông tin các khách hàng (tên Sheet là Data)
Hôm trước trên diễn đàn này có 1 bạn đã giúp mình làm Sheet "Bao cao theo ngay", chức năng sheet báo cáo này cho phép mình chọn 1 ngày bất kỳ, nó sẽ lấy số liệu bên Sheet Data có ngày bằng ngày mình chọn. Tuy nhiên báo cáo này chỉ hữu ích khi lâu lâu mình cần in 1 ngày nào đó thì rất hay, còn cuối tháng mình cần in từ ngày đến ngày thì phải gõ từng ngày một rồi in và ...rồi gõ ngày khác. Hôm nay mình post lên đây với mong muốn có bạn nào giúp mình làm thêm 01 sheet báo cáo nữa "Từ ngày ...đến ngày" với nội dung mình mong muốn như sau:
- Cho phép mình gõ Từ ngày ...đến ngày cần lấy báo cáo thay vì chỉ gõ 01 ngày như Sheet "Bao cao theo ngay"
- Trang trí và cách lấy số liệu hoàn toàn giống như Sheet "Bao cao theo ngay" hiện đang có
- Kết quả sẽ tự phân trang để mình có thể bấm in 01 lần.
Ví dụ: Mình muốn lấy báo cáo từ ngày 01/03/2013 đến 15/03/2013 thì kết quả sẽ được trang trí như kết quả của Sheet "Bao cao theo ngay" và mỗi ngày là 01 trang A4 được bố trí chung trong 01 Sheet.
Cám ơn cả nhà rất nhiều!
Tuy Vuong.

Chẳng ai "dám" làm kiểu bạn đâu.
Đã có Code in 1 ngày rồi thì:
- Nhập ngày đầu - Ngày cuối ở 2 ô nào đó.
- Code chạy từ ngày đầu, in 1 phát, cộng thêm 1 ngày, in 1 phát ... đến ngày cuối in xong thì ngừng. Mắc gì phải lập "cả đống" ngày trên 1 sheet rồi lại "nhét" mỗi ngày vào 1 trang A4 gì đó.

 

[tuyvuong]

Chẳng ai "dám" làm kiểu bạn đâu.
Đã có Code in 1 ngày rồi thì:
- Nhập ngày đầu - Ngày cuối ở 2 ô nào đó.
- Code chạy từ ngày đầu, in 1 phát, cộng thêm 1 ngày, in 1 phát ... đến ngày cuối in xong thì ngừng. Mắc gì phải lập "cả đống" ngày trên 1 sheet rồi lại "nhét" mỗi ngày vào 1 trang A4 gì đó.

Nhờ bạn chỉnh code theo ý bạn được không? Mục đích chính của mình cũng chỉ là in 1 ngày bất kỳ hay cũng có thể in được từ ngày đến ngày. Ý tưởng của bạn đã đáp ứng được yêu cầu của mình thật rồi đó, chỉ tiếc là mình không biết chỉnh code.

 

[Ba Tê]

Nhờ bạn chỉnh code theo ý bạn được không? Mục đích chính của mình cũng chỉ là in 1 ngày bất kỳ hay cũng có thể in được từ ngày đến ngày. Ý tưởng của bạn đã đáp ứng được yêu cầu của mình thật rồi đó, chỉ tiếc là mình không biết chỉnh code.

Nếu muốn in 1 ngày thì bỏ trống ô L11, chỉ nhập ngày muốn in vào ô K11 rồi bấm nút IN.
Thử xem sao, Trong Sub này bạn bỏ dấu nháy trước dòng tôi ghi chú để in thử nhiều ngày, tôi "không dám" in thử nên chưa biết nó in ra cái gì.
Nếu nó bị "ba lơn" thì chờ các thành viên có kinh nghiệm chuyện IN viết lại.

Public Sub IN_GPE()
Dim TuNgay As Long, DenNgay As Long, I As Long
TuNgay = [K11].Value
DenNgay = IIf([L11].Value = Empty, [K11], [L11])
For I = TuNgay To DenNgay
    [C4].Value = I
    'Range("A1:I40").PrintOut   ''<------- Bỏ dấu nháy đầu dòng này'
Next I
End Sub

Chú ý là chỉ sử dụng tối đa 20 dòng. (Bạn có nói mỗi ngày tối đa chỉ 8 dòng)

 

[tuyvuong]

Hình như Ba tê chưa Attach file đã chỉnh lên.

 

[Ba Tê]

Hình như Ba tê chưa Attach file đã chỉnh lên.

Híc! Xin lỗi.
Đã đính kèm file ở bài trên.

 

[tuyvuong]

Oke con gà đen rồi Ba tê
Thanks bạn hiền nha!