Chuyển đổi định dạng? (1 người xem)

[Miền Cát Trắng]

Phiền các bạn giúp tôi chuyển đổi định dạng từ cột F sang cột H trong file đính kèm với.
Xin cảm ơn!

 

[nghiaphuc]

Phiền các bạn giúp tôi chuyển đổi định dạng từ cột F sang cột H trong file đính kèm với.
Xin cảm ơn!

Bạn dùng code này:
[GPECODE=vb]Sub Convert()
Dim Cll As Range
For Each Cll In Sheet1.[F:F].SpecialCells(2, 1)
With Cll.Offset(, 2)
.NumberFormat = "@"
.Value = Cll.Text
End With
Next
End Sub[/GPECODE]

 

[Miền Cát Trắng]

Cảm ơn anh kết quả đúng rồi ạ. Xin hỏi anh thêm trường hợp này nếu không dùng vba thì còn cách nào khác không ạ?

 

[Ba Tê]

Cảm ơn anh kết quả đúng rồi ạ. Xin hỏi anh thêm trường hợp này nếu không dùng vba thì còn cách nào khác không ạ?

Thì dùng hàm cùi bắp này thử:
=HOUR(F7) & ":" & TEXT(MINUTE(F7);"00")

 

[nghiaphuc]

Thì dùng hàm cùi bắp này thử:
=HOUR(F7) & ":" & TEXT(MINUTE(F7);"00")

Tại sao không phải là thế này bác Ba Tê nhỉ: =TEXT(F7,"H:mm")

 

[Ba Tê]

Tại sao không phải là thế này bác Ba Tê nhỉ: =TEXT(F7,"H:mm")

Híc! Đã nói là cùi bắp mà.
Hình như lúc này đụng vào hàm Excel mình bị "tẩu hoả nhập quỷ" hay sao ấy.