ai giúp viết hàm chuyển đổi dữ liệu kiểu ngày tháng sang kiểu xâu

Liên hệ QC

conan198

Thành viên mới
Tham gia
17/5/10
Bài viết
17
Được thích
0
-0-/. Mình muốn chuyển đổi dữ liệu kiểu ngày tháng sang kiểu xâu như sau:
12/05/2010 thành kiểu xâu: 12/5/10
Xin các pác giúp đỡ
 
Bạn thử với hàm sau & chỉnh sửa, nếu cần

PHP:
Option Explicit
Function DateToString(Dat As Date) As String
 Const GN As String = "/"
 
 DateToString = Right("0" & CStr(Day(Dat)), 2) & GN
 DateToString = DateToString & Right("0" & CStr(Month(Dat)), 2) & GN
 DateToString = DateToString & CStr(Year(Dat) Mod 100) & "."
End Function
 
Upvote 0
PHP:
Option Explicit
Function DateToString(Dat As Date) As String
 Const GN As String = "/"
 
 DateToString = Right("0" & CStr(Day(Dat)), 2) & GN
 DateToString = DateToString & Right("0" & CStr(Month(Dat)), 2) & GN
 DateToString = DateToString & CStr(Year(Dat) Mod 100) & "."
End Function
VBA có hàm Format, chẳng hiểu sao sư phụ lại không dùng mà cực khổ với mấy cái LEFT với RIGHT (lại còn MOD nữa...)
PHP:
Function DateToString(Dat As Date) As String
  DateToString = Format(Dat, "d/m/yy")
End Function
Ẹc.. Ẹc... Bắt giò sư phụ chơi cái coi
 
Upvote 0
Đã bắt thì fải bắt đủ các gò chứ:

Ẹc.. Ẹc... Bắt giò sư phụ chơi cái coi

Rứa nè:
PHP:
Function DateToString(Dat As Date) As String
  DateToString = Format(Dat, "Dd/Mm/yy") & "."
End Function

Khà , khà, chúc vui vẻ nhân ngày nghỉ hàng tuần!

(SPAM cái, xin các MOD/SMODs thứ lỗi & xóa giúp!)​
 
Upvote 0
Bạn dùng thử cách này, không phải dùng công thức nào cả. Chuột phải/Format/Custom/Trong mục Type bạn gõ:d/m/yy rồi bấm OK là được. Có thể đổi các kiểu dữ liệu ngược xuôi của ngày, tháng, năm ;năm, tháng, ngày hoặc loại bỏ dấu phân cách....
Đây cũng là cách mình hay dùng.
 
Upvote 0
Bạn dùng thử cách này, không phải dùng công thức nào cả. Chuột phải/Format/Custom/Trong mục Type bạn gõ:d/m/yy rồi bấm OK là được. Có thể đổi các kiểu dữ liệu ngược xuôi của ngày, tháng, năm ;năm, tháng, ngày hoặc loại bỏ dấu phân cách....
Đây cũng là cách mình hay dùng.
Thực ra hai cách này là khác nhau đó bạn. Khi bạn nhìn trên màn hình, có thể giống nhau đấy, nhưng một cái là kiểu số, cái kia là kiểu xâu nên về bản chất, chúng rất khác nhau.
Mình muốn chuyển đổi dữ liệu kiểu ngày tháng sang kiểu xâu như sau
Bạn thử gõ ô A1 là 30/09/2010, ô A2=Text(A1,"d/M/yy"), B1=A1&"ABC" và copy công thức của B1 cho B2. Cuối cùng, so sánh B1 và B2, bạn sẽ nhận ra sự khác biệt này.
 
Upvote 0
Web KT

Bài viết mới nhất

Back
Top Bottom