Giúp đỡ thay đổi định dạng ngày giờ một lần (1 người xem)

[phamvienthong]

Em chào mọi người ạ!

Em dùng hệ điều hành Windows Xp, và phần mềm Excel 2010.

Trong file excel của em, định dạng không đúng theo yêu cầu của em

Em muốn định dạng ở các cột Ngày, Giờ vào, Giờ ra phải theo định dạng là dd/mm/yyyy, hh:mm:ss

Nghĩa là em muốn hỏi cách làm sao để em chỉ cần thay đổi một lần, mà dữ liệu ngày và tháng ở tất cả các sheet và các file khác đều thay đổi theo y như vậy, mà không cần phải mất công vào từ cột ở từng sheet và từng file để định dạng lại.

 

[phulien1902]

Em chào mọi người ạ!

Em dùng hệ điều hành Windows Xp, và phần mềm Excel 2010.

Trong file excel của em, định dạng không đúng theo yêu cầu của em

Em muốn định dạng ở các cột Ngày, Giờ vào, Giờ ra phải theo định dạng là dd/mm/yyyy, hh:mm:ss

Nghĩa là em muốn hỏi cách làm sao để em chỉ cần thay đổi một lần, mà dữ liệu ngày và tháng ở tất cả các sheet và các file khác đều thay đổi theo y như vậy, mà không cần phải mất công vào từ cột ở từng sheet và từng file để định dạng lại.

Ví dụ cho định dạng ngày tháng năm trong cột A ở tất cả các Sheets

Sub abc()
    Dim ws As Worksheet
   For Each ws In ThisWorkbook.Sheets
        ws.Columns("A:A").NumberFormat = "dd/mm/yyyy;@"
        ws.Columns("B:C").NumberFormat = "hh:mm:ss"
    Next ws
End Sub

 

[phamvienthong]

Ví dụ cho định dạng ngày tháng năm trong cột A ở tất cả các Sheets

Sub abc()
    Dim ws As Worksheet
    For Each ws In ActiveWorkbook.Worksheets
        ws.Columns("A:A").NumberFormat = "dd/mm/yyyy;@"
    Next ws
End Sub

Em chưa hiểu rõ lắm cách thực hiện như thế nào ạ!

Có thể hướng dẫn cụ thể cách làm giúp em không ạ?

 

[VetMini]

Ví dụ cho định dạng ngày tháng năm trong cột A ở tất cả các Sheets

Sub abc()
    Dim ws As Worksheet
   For Each ws In ThisWorkbook.Sheets
        ws.Columns("A:A").NumberFormat = "dd/mm/yyyy;@"
        ws.Columns("B:C").NumberFormat = "hh:mm:ss"
    Next ws
End Sub

Bạn ấy muón "tất cả các files"

Nghĩa là em muốn hỏi cách làm sao để em chỉ cần thay đổi một lần, mà dữ liệu ngày và tháng ở tất cả các sheet và các file khác đều thay đổi theo y như vậy, mà không cần phải mất công vào từ cột ở từng sheet và từng file để định dạng lại.

 

[phamvienthong]

Bạn ấy muón "tất cả các files"

Trước mắt là em muốn làm tất cả các sheet! Vậy phải làm thế nào ạ?

 

[VetMini]

Bạn copy đoạn code trên, thảy vào 1 mô đun trên workbook của VBA và chạy nó.
Làm cách nào để mò ra cửa sổ VBA hì bạn chịu khó tìm ở trên đây. Có nhiều bài chỉ rồi.

 

[phamvienthong]

Bạn copy đoạn code trên, thảy vào 1 mô đun trên workbook của VBA và chạy nó.
Làm cách nào để mò ra cửa sổ VBA hì bạn chịu khó tìm ở trên đây. Có nhiều bài chỉ rồi.

Dạ, em cảm ơn ạ!

 

[prophetqn]

Bạn vào Control Panel -> Clock, Language, and Region -> Change date, time or number formats -> Additional Settings -> Vào Time formats/Short time và Date formats/Short date để chỉnh lại định dạng. Từ đó về sau, vào Excel chọn Format là Time hay Short Date, phần mềm sẽ tự động chỉnh định dạng theo đúng ý bạn.

 

[phamvienthong]

Bạn vào Control Panel -> Clock, Language, and Region -> Change date, time or number formats -> Additional Settings -> Vào Time formats/Short time và Date formats/Short date để chỉnh lại định dạng. Từ đó về sau, vào Excel chọn Format là Time hay Short Date, phần mềm sẽ tự động chỉnh định dạng theo đúng ý bạn.

mình cảm ơn