Giúp mình cách lọc ngày tháng năm (1 người xem)

[nghich3]

Trong file đính kèm - Mình muốn lọc ra các số(1,2,...) ở cột a có ngày tuơng ứng ở cột B là ngày 11/12 năm 2009 .

Cám ơn nhiều !

 

[nghich3]

Bên trên là file xlsx .

File xls down ở đây .

 

[SA_DQ]

Hiện tại cột 'B' của bạn có cả biểu thị số liệu ngày kiểu chuỗi ký tự, & biểu thị dạng ngày có cả giờ, fút & giây; Để lọc được như ý bạn tôi dùng cột 'C' để chứa 1 loại định dạng ngày theo kiểu 'MM/DD/yyyy', như sau:

Option Explicit
Sub ChuyenNgay()
 Dim Clls As Range, Dat As Date
 
 For Each Clls In Range([B2], [B65500].End(xlUp))
   If IsDate(Clls.Value) Then
      Dat = Clls.Value
   Else
      Dat = CVDate(Clls.Value)
   End If
   Clls.Offset(, 1) = DateSerial(Year(Dat), Month(Dat), Day(Dat))
 Next Clls
End Sub

Sau khi chạy macro này, việc còn lại là của bạn:

(*) Có thể dùng AutoFilter;
(*) Nếu muốn dùng AutoFilter 1 cách tự động thì chúng ta sẽ tiếp.


Thân ái!

 

[hoangminhtien]

Bạn cũng có thể dùng Advanced Filter để lọc như file đính kèm!

 

[salam]

Trong file đính kèm - Mình muốn lọc ra các số(1,2,...) ở cột a có ngày tuơng ứng ở cột B là ngày 11/12 năm 2009 .

Cám ơn nhiều !

Bạn xem trong fiel nhé.

 

[Luc Van]

anh chị cho em hỏi luôn nhé!
Tại sao ngày đánh ngược thì công thức mới chạy đúng
IF($H$1="","","Ngày "&DAY(VLOOKUP($H$1,'NHAT KY NX'!$A$6:$P$24,2,0))&" Tháng "&MONTH(VLOOKUP($H$1,'NHAT KY NX'!$A$6:$P$24,2,0))&" Năm "&YEAR(VLOOKUP($H$1,'NHAT KY NX'!$A$6:$P$24,2,0)))
Và nếu ô nó định dạng ngày ngược thì ta sửa như thế nào để khói phải đánh ngược ạ?
Vd: đánh 1/20/2010 enter thì thành 20/1/2010