Nhập dữ liệu ngày tháng trong excel?

Liên hệ QC

Nguyenductoan1978

Thành viên mới
Tham gia
26/11/13
Bài viết
12
Được thích
2
Các bác cho em hỏi làm sao nhập vào 1 ô dạng ddmmyyyy sau khi enter nó chuyển thành dạng dd/mm/yyyy
 
Các bác cho em hỏi làm sao nhập vào 1 ô dạng ddmmyyyy sau khi enter nó chuyển thành dạng dd/mm/yyyy
Mình có cách này hơi cùi bắp tý:
Sử dụng Data-Text column.
B1: Chọn vùng dữ liệu
B2: Data-text column
b3: hộp thoại hiện lên-->NEXT-->NEXT-->Date(DMY)--->Finish.
 
Các bác cho em hỏi làm sao nhập vào 1 ô dạng ddmmyyyy sau khi enter nó chuyển thành dạng dd/mm/yyyy
bạn chèn code này vào sheet bạn nhập liệu nha.
PHP:
Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo Loi
If IsNumeric(Target) Then
    If Len(Target) = 6 Then
        Target = DateValue("20" & Right(Target, 2) & "/" & Mid(Target, 3, 2) & "/" & Left(Target, 2))
        Target.NumberFormat = "dd/mm/yy"
    ElseIf Len(Target) = 8 Then
        Target = DateValue(Right(Target, 4) & "/" & Mid(Target, 3, 2) & "/" & Left(Target, 2))
        Target.NumberFormat = "dd/mm/yyyy"
    End If
End If

Loi:
    Exit Sub
End Sub
Bạn thử gõ một chuỗi số xem nó ra ngày tháng không?
 
Mình có cách này hơi cùi bắp tý:
Sử dụng Data-Text column.
B1: Chọn vùng dữ liệu
B2: Data-text column
b3: hộp thoại hiện lên-->NEXT-->NEXT-->Date(DMY)--->Finish.
Mình muốn cố định cột đó cơ. Cái này sau khi xóa đi nhập lại nó lại không được.
 
mình chưa hiểu đoạn này, bạn dùng code bài #3 thử nha.
 
mình muốn dùng hàm trên
bạn chèn code này vào sheet bạn nhập liệu nha.
PHP:
Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo Loi
If IsNumeric(Target) Then
    If Len(Target) = 6 Then
        Target = DateValue("20" & Right(Target, 2) & "/" & Mid(Target, 3, 2) & "/" & Left(Target, 2))
        Target.NumberFormat = "dd/mm/yy"
    ElseIf Len(Target) = 8 Then
        Target = DateValue(Right(Target, 4) & "/" & Mid(Target, 3, 2) & "/" & Left(Target, 2))
        Target.NumberFormat = "dd/mm/yyyy"
    End If
End If

Loi:
    Exit Sub
End Sub
Bạn thử gõ một chuỗi số xem nó ra ngày tháng không?
mình muốn sử dụng code trên cho toàn bộ workbook sau này thì làm thế nào hả bạn
 
Web KT
Back
Top Bottom