công thức sắp xếp ngày tháng tự động

[ychiviet]

Xin giúp đở!
Hiện mình đang cần công thức (không dùng công cụ sort hay filter) dùng để sắp xếp ngày tháng năm theo thứ tự, trong sheet có nhiều ngày trùng nhau. ACE nào có các xin chỉ giúp cámơn!

 

[befaint]

ACE

"A Cờ E" là " Anh Cắn Em" hả bạn?

Mở file lên thấy chữ canh giữa hoa mắt quá @@

sort

Chọn cả bảng rồi sort siêu ngon lành mà sao không dùng?

 

[ychiviet]

hhihi, cám ơn ạ!
1/ACE ==> Anh , Chị , Em ạ
2/ Mình cần công thức vì mình có file khác link vào nửa ạ

 

[befaint]

Anh , Chị , Em ạ

Mình thấy trong này toàn các "ông" sáu mươi, bảy mươi tuổi. Hổng biết các 'ổng' có chịu nhận làm 'ẻm' không?

link vào nửa

Sao lại lấy một "nửa" thôi à, sao không lấy hết? Khó nhỉ @@

 

[ychiviet]

dạ, nếu có cách chỉ giúp ạ, cảm ơn nhiều

 

[ndu96081631]

Xin giúp đở!
Hiện mình đang cần công thức (không dùng công cụ sort hay filter) dùng để sắp xếp ngày tháng năm theo thứ tự, trong sheet có nhiều ngày trùng nhau. ACE nào có các xin chỉ giúp cámơn!

Lý do tại sao bạn không muốn dùng công cụ sort?

 

[SA_DQ]

Mình có công thức bá đạo này, thử xài xem sao:
Trong Excel mình gán cái tên 'Alf' cho chuỗi gồm 36 kí tự như sau: '0123. . . . 9ABC. . . XYZ'
Tiếp theo bạn làm như hình:

Ngày	Tên	Mã ngày
1/13/2020​	Tí	J1D	=MID(Alf,YEAR(C2)-2000,1) & MID(Alf,1+MONTH(C2),1)& MID(Alf,1+DAY(C2),1)
2/14/2020​	Sữu	J2E
3/17/2020​	Dần	J3H
4/18/2020​	Mão	J4I
5/20/2020​	Thìn	J5K
6/21/2020​	Tỵ	J6L
7/23/2020​	Ngọ	J7N
8/24/2020​	Thân	J8O
9/25/2020​	Dậu	J9P
10/27/2020​	Tuất	JAR
11/28/2020​	Hợi	JBS
12/30/2020​	Hà	JCU
1/31/2021​	Hồng	K1V
3/4/2021​	Hương	K34
4/5/2021​	Phương	K45

Sau đó bạn toàn quyền xếp theo cột 'Mã ngày'

 

[phulien1902]

Xin giúp đở!
Hiện mình đang cần công thức (không dùng công cụ sort hay filter) dùng để sắp xếp ngày tháng năm theo thứ tự, trong sheet có nhiều ngày trùng nhau. ACE nào có các xin chỉ giúp cámơn!

1 cách bạn tham khảo:

    Dim lr As Long, i As Long
    lr = Cells(Rows.Count, 2).End(3).Row
    For i = lr To 2 Step -1
        If Application.WorksheetFunction.Sum(Range("C" & i & ":K" & i)) = 0 Then
            Rows(i).Delete
        End If
    Next i
    Range("B1:K" & lr).Sort key1:=Range("B1:B" & lr), order1:=xlAscending, Header:=xlYes

 

[Nhattanktnn]

Xin giúp đở!
Hiện mình đang cần công thức (không dùng công cụ sort hay filter) dùng để sắp xếp ngày tháng năm theo thứ tự, trong sheet có nhiều ngày trùng nhau. ACE nào có các xin chỉ giúp cámơn!

Cho một lý do chính đáng về việc không sử dụng sort đi bạn? Trong khi bản chất tất cả đều sắp xếp

 

[HieuCD]

Xin giúp đở!
Hiện mình đang cần công thức (không dùng công cụ sort hay filter) dùng để sắp xếp ngày tháng năm theo thứ tự, trong sheet có nhiều ngày trùng nhau. ACE nào có các xin chỉ giúp cámơn!

Kết quả công thức gán vào đâu?