Định dạng chuỗi text dạng đ/mm/yy (1 người xem)

[tnfsmith]

Xin cho hỏi mình có file dữ liệu có các cột định dạng text như sau
60814 và 160814. Mình muốn chuyển hết các cell trong cột đó về định dạng text 06/08/14 và 16/08/14 hoặc
06/08/2014 và 16/08/2014

Xin cám ơn

 

[VMH0307]

Xin cho hỏi mình có file dữ liệu có các cột định dạng text như sau
60814 và 160814. Mình muốn chuyển hết các cell trong cột đó về định dạng text 06/08/14 và 16/08/14 hoặc
06/08/2014 và 16/08/2014

Xin cám ơn

có thể định dạng
##"/"##"/"## hoặc
##"/"##"/20"##
nên nhớ bản chất nó vẫn là số của bạn, máy không hiểu là định dạng ngày tháng năm đâu nhé

 

[Ba Tê]

Xin cho hỏi mình có file dữ liệu có các cột định dạng text như sau
60814 và 160814. Mình muốn chuyển hết các cell trong cột đó về định dạng text 06/08/14 và 16/08/14 hoặc
06/08/2014 và 16/08/2014

Xin cám ơn

Từ định dạng Text sao muốn chuyển thành Text mà không thành Date luôn để dễ tính toán?
Chọn 1 vùng trong 1 cột nào đó chạy code này thử xem.
[GPECODE=vb]Public Sub GPE()
Dim Rng As Range, sArr(), dArr(), I As Long, Tem As String
Set Rng = Selection
If Rng.Rows.Count > 1 Then
sArr = Rng.Value
ReDim dArr(1 To UBound(sArr, 1), 1 To 1)
On Error Resume Next
For I = 1 To UBound(sArr, 1)
Tem = sArr(I, 1)
dArr(I, 1) = DateSerial(2000 + Right(Tem, 2), Left(Right(Tem, 4), 2), Left(Tem, Len(Tem) - 4))
Next I
Rng.NumberFormat = "dd/mm/yyyy"
Rng.Value = dArr
Set Rng = Nothing
End If
End Sub[/GPECODE]
Nếu chỉ chọn 1 ô thì code không chạy, 1 ô thì sửa bằng tay đi.

 

[duysangvgs]

làm ngay trong cell thế này được ko bác

=LEFT(A2;LEN(A2)-4)&"/"&MID(A2;(LEN(A2)-4)+1;2)&"/"&RIGHT(A2;2)

 

[Ba Tê]

làm ngay trong cell thế này được ko bác

=LEFT(A2;LEN(A2)-4)&"/"&MID(A2;(LEN(A2)-4)+1;2)&"/"&RIGHT(A2;2)

A1=60814 làm sao chuyển A1=06/08/2014 ?
Chỉ trừ khi làm trên cột phụ, rồi copy trở lại A1, .... và một số công đoạn khác nữa.

Xin cho hỏi mình có file dữ liệu có các cột định dạng text như sau
60814 và 160814. Mình muốn chuyển hết các cell trong cột đó về định dạng text 06/08/14 và 16/08/14 hoặc
06/08/2014 và 16/08/2014

 

[duysangvgs]

em ko viết VB nên chơi quả này trong cell ạ
đây là file đính kèm ạ

 

[duysangvgs]

e làm cột phụ mà bác, hic
nếu muốn dạng text thì dừng lại ở công thức trên
hoặc cách của bác VMH0307
còn nếu muốn dạng dd/mm/yyyy thì
sau đó dùng thêm hàm datevalue
rồi vào format định dạng chuẩn cho ngày, tháng, năm
hi
xưa nay toàn chơi chủ công vậy bác ạ
đúng là phải thêm 1 số công đoạn khác nữa, nhưng đây là cách của người ko biết VB như em ạ

 

[SA_DQ]

Mình có 1 théc méc nho nhỏ:

Chuỗi 30814 thì là 03/08/2014 hay 30/08/2014(?)