İpucu: Digər dillər Google-tərcümə olunur. Sizi ziyarət edə bilərsiniz English bu linkin versiyası.
Daxil ol
x
or
x
x
Qeydiyyatdan
x

or

Excel-dən əvvəl və ya sonra bütün tarix hüceyrələrini necə filtreləmək olar?

Bu yazıda Excel işində bu gündən və ya bundan sonrakı bütün tarixi hüceyrələri necə silmək barədə danışacağam.

Süzgəc funksiyası ilə bu gündən və ya sonra bütün tarix hüceyrələrini süzün

VBA koduyla bu gündən və ya sonra bütün tarix hüceyrələrini süzün


Süzgəc funksiyası ilə bu gündən və ya sonra bütün tarix hüceyrələrini süzün


Əslində, Excel-də Filter funksiyası bu tapşırığı mümkün qədər tez həll etməyə kömək edə bilər, belə edin:

1. Filtrelemek istediğiniz tarixi sütununu seçin və sonra basın Tarix > Süzgəc, bax ekran görüntüsü:

doc filter bu gün 1-nu pozub

2. Sonra açılan oku basın və sonra seçin Tarix Filtreleri > əvvəl / Sonra sizə lazım olduğunda ekran bax:

doc filter bu gün 2-nu pozub

3. İçində Xüsusi AutoFilter informasiya qutusuna basın Tarix Seçicidoc filter bu gün 3-nu pozub düyməsini basın və sonra basın hazırda tarix seçici təqvimində düyməsini basıb baxın:

doc filter bu gün 4-nu pozub

4. Sonra basın OK dialoqu bağlamaq üçün və bu gündən və ya ondan sonra bütün tarixlər aşağıdakı ekran görüntüsü kimi filtrelenmiştir:

doc filter bu gün 5-nu pozub


VBA koduyla bu gündən və ya sonra bütün tarix hüceyrələrini süzün

Aşağıdakı VBA kodları, bir iş kitabında cari gündən əvvəl və ya sonra bütün tarixləri silmək üçün də kömək edə bilər. Aşağıdakı adımlarla edin:

1. Basıb saxlayın ALT + F11 düymələri açmaq üçün Proqramlar üçün Microsoft Visual Basic pəncərə.

2. Basın Taxmaq > Modules, və aşağıdakı kodlardan birini yapışdırın Modules Pəncərə.

VBA kodu: Bu gündən əvvəl bütün tarixi hüceyrələri süzün:

Sub FilterDateBeforeToday()
    Dim xLastRow As Long
    Dim xRg As Range
    On Error Resume Next
    Set xRg = Application.InputBox("Please select filtered column:", "KuTools for Excel", Selection.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    ActiveSheet.AutoFilterMode = False
    If xRg.Count = 1 Then Set xRg = xRg.CurrentRegion
    xRg.AutoFilter 1, "<" & CDbl(Date)
    Application.ScreenUpdating = True
End Sub

VBA kodu: Bu gündən sonra bütün tarixi hüceyrələri süzün:

Sub FilterDateBeforeToday()
    Dim xLastRow As Long
    Dim xRg As Range
    On Error Resume Next
    Set xRg = Application.InputBox("Please select filtered column:", "KuTools for Excel", Selection.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    ActiveSheet.AutoFilterMode = False
    If xRg.Count = 1 Then Set xRg = xRg.CurrentRegion
    xRg.AutoFilter 1, ">" & CDbl(Date)
    Application.ScreenUpdating = True
End Sub

3. Yuxarıdakı kodlardan birini kopyalayıp yapıştırdıktan sonra basın F5 bu kodu çalıştırmak üçün düyməsini basın və filtre kutusunu seçdiyiniz tarix sütununu xatırlatmaq üçün bir sorğu qutusu açılır, ekran görüntüsünü görə bilərsiniz:

doc filter bu gün 6-nu pozub

4. Və sonra basın OK düyməsini basın, bu gündən və ya gündən sonra bütün tarix hüceyrələri dərhal süzülür.



Təklif olunan Məhsuldarlıq Vasitələri

Office Tab

qızıl star1 Chrome, Firefox və yeni Internet Explorer kimi Excel və digər Office proqramlarına lazımlı sekmeleri gətirin.

Excel üçün Kutools

qızıl star1 Amazing! 5 dəqiqədə məhsuldarlığınızı artırın. Heç bir xüsusi bacarıqa ehtiyac yoxdur, hər gün iki saat saxlaya bilərsiniz!

qızıl star1 300 Excel üçün yeni funksiyalar, Excel çox asan və güclü olun:

  • Veriyi ləğv etmədən Cell / Satır / Sütunları birləşdirin.
  • Bir neçə Çarşaf və İş Kitabını birləşdirin və birləşdirin.
  • Çaprazları müqayisə edin, birdən çox aralığa kopyalayın, mətni tarixə, vahidə və valyuta çevrilməsinə çevirin.
  • Rənglər, Paging Subtotals, Advanced Sort və Super Filter tərəfindən sayılan,
  • Daha çox seçin / Insert / Sil / Mətn / Biçim / Bağlantı / Yorum / Çalışma kitabları / Çalışma Qurğuları Tools ...

Excel üçün Kutools-un ekranı

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Abhinav Kumar · 4 months ago
    I HAVE DATA in a following format
    12/11/2018 16:10
    12/11/2018 16:10
    12/11/2018 16:10
    12/11/2018 16:10
    12/11/2018 16:10
    12/11/2018 16:10
    12/11/2018 16:10
    12/11/2018 16:10
    12/11/2018 16:10
    12/11/2018 16:10



    and I want to filter it for TODAY - LAST 7 Days Excluding Today , That is if today is 12 Dec I want filter for 12 Dec and December[ 11,10,9,8,7,6,5] .
    How to create custom filter for this in MS Excel