Lỗi định dạng ngày tháng tạo bởi code Now ? (1 người xem)

[MinhKhai]

Em có file đính kèm, trong đó có 2 vấn đề rất mong được chỉ dẫn
1. Trong file có code để tạo thời gian
Không hiểu sao dù code Format(Now, "dd/mm/yyyy hh:mm") mà ngày tháng nó tạo ra cứ bị lộn giữa tháng và ngày. Ở đây không phải lộn phần hiển thị mà lộn hẳn giá trị luôn.
Khi em nhập giá trị tại cột B và K thì cột D và Q hiện ra ngày tháng sai lệch hẳn.

2. Tại cột Y, em có nút lệnh In PXK. Em muốn khi bấm nút này, giá trị tại cột A (cùng dòng) được dán vào ô H5 của sheet PXK và cho lệnh in. In xong thì ghi giá thời gian in tại ô có nút khi nhấn.

Rất mong được giúp đỡ. Trân trọng cảm ơn

 

[MinhKhai]

Bạn chỉ cần format ngoài cells thôi. Còn trong code chỉ cần Now là đủ, format trong code làm gì.

Rất cảm ơn anh. Một chỉ dẫn đơn giản mà hiệu quả. Thế mà em cứ loay hoay Google mà không hiểu nguyên nhân
Anh có thể giúp nốt phần 2 được không ạ ?

 

[MinhKhai]

Private Sub CommandButton1_Click()
With Sheets("PXK")
    .[H1].Value = ActiveCell.Offset(, -24).Value
    .PrintOut
End With
    ActiveCell.Value = "Printed on " & Format(Now, "dd/mm/yy h:mm:ss AM/PM")
End Sub

Rất cảm ơn anh. Code chạy tốt ạ