Mình có file bảng kê thu mua 01/TNDN đính kèm nhưng hiện tại nó chỉ có trích lọc theo quý, h mình muốn trích có thêm 2 sheet điều kiện trích lọc theo tháng và theo số ccdc của từng cá nhân để tiện in ra ký dấu, nhờ các cao nhân chỉnh sửa bổ sung thêm giúp mình với ak.
Mình có file bảng kê thu mua 01/TNDN đính kèm nhưng hiện tại nó chỉ có trích lọc theo quý, h mình muốn trích có thêm 2 sheet điều kiện trích lọc theo tháng và theo số ccdc của từng cá nhân để tiện in ra ký dấu, nhờ các cao nhân chỉnh sửa bổ sung thêm giúp mình với ak.
Thank bạn rất nhiều, mình đã test code chạy ok, nếu phần ngày tháng và ký bên dưới nó chạy theo mỗi lần mình chọn khung thời gian nữa để tiện cho việc in nữa thì hoàn hảo.
Thank bạn rất nhiều, mình đã test code chạy ok, nếu phần ngày tháng và ký bên dưới nó chạy theo mỗi lần mình chọn khung thời gian nữa để tiện cho việc in nữa thì hoàn hảo.
- Thêm công thức diễn giải tên kỳ chọn của sheet ToKhai:
+ A3 =$K$1&IF(LEFT($J$1,1)="N","","/"&YEAR($K$2))
- Tại Sub dinhdang() Bỏ dòng '.Range("F" & dc + 3).Value = ngayTD(Sheet1.Range("B9").Value, NgayCT(thang, Sheet1.Range("B8").Value, True)) Thay bằng:
Mã:
...
Dim ngayLap As Date
Dim uniNam As String
ngayLap = Sheet5.Range("K3").Value
uniNam = "n" & ChrW(259) & "m"
Sheet5.Range("F" & dc + 3).Value = Sheet1.Range("B9").Value & ", " & Format(ngayLap, """ngày"" dd ""tháng"" mm ") & uniNam & " " & Year(ngayLap)
...
- Thêm công thức diễn giải tên kỳ chọn của sheet ToKhai:
+ A3 =$K$1&IF(LEFT($J$1,1)="N","","/"&YEAR($K$2))
- Tại Sub dinhdang() Bỏ dòng '.Range("F" & dc + 3).Value = ngayTD(Sheet1.Range("B9").Value, NgayCT(thang, Sheet1.Range("B8").Value, True)) Thay bằng:
Mã:
...
Dim ngayLap As Date
Dim uniNam As String
ngayLap = Sheet5.Range("K3").Value
uniNam = "n" & ChrW(259) & "m"
Sheet5.Range("F" & dc + 3).Value = Sheet1.Range("B9").Value & ", " & Format(ngayLap, """ngày"" dd ""tháng"" mm ") & uniNam & " " & Year(ngayLap)
...
Mình test Code chạy vậy là quá ok rồi bạn, còn cái cuối nếu viết thêm được cái trình in toàn bộ các mã khách trong khung find chạy theo bảng kê nữa thì tiện!!
Mình test Code chạy vậy là quá ok rồi bạn, còn cái cuối nếu viết thêm được cái trình in toàn bộ các mã khách trong khung find chạy theo bảng kê nữa thì tiện!!
