İ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

Tez Excel-də cari tarixlə hücuma keçmək üçün necə?

Burada tarixlərin siyahısı olan bir hesabat, tez bir zamanda bu problemi həll etmək üçün cari tarixə malik olan hüceyrəyə atlanmaq istəyirsiniz?

VBA ilə cari tarixə keçin

Tapmaq və dəyişdirməklə cari tarixə keçin


arrow mavi sağ bubble VBA ilə cari tarixə keçin


Burada tez bir zamanda cari tarixə keçmək üçün kömək edə biləcək bir VBA kodudur.

1. Istifadə etmək istədiyiniz iş kitabçasını aktivləşdirin və basın Alt + F11 düymələri açmaq üçün Proqramlar üçün Microsoft Visual Basic pəncərə.

2. klik Taxmaq > Moduleskodu aşağıdan yapışdırıb Modules.

VBA: Cari tarixə keçin

Private Sub Workbook_Open()
'UpdatebyExtendoffice20161221
    Dim daterng As Range
    Dim DateCell As Range
    Dim WorkSht As Worksheet
    Dim dateStr As String
    Application.ScreenUpdating = False
    For Each WorkSht In Worksheets
        WorkSht.Select
        'Set daterng = Range("A:A")
        Set daterng = WorkSht.UsedRange
        'daterng.Select
        For Each DateCell In daterng
            DateCell.Activate
            ActiveCell.Select
            On Error Resume Next
            dateStr = DateCell.Value
            If dateStr = Date Then
                DateCell.Select
                Exit Sub
            End If
        Next
    Next WorkSht
    Application.ScreenUpdating = True
    'Worksheets(1).Select
End Sub

1 tarixindən doc keçid

3. Basın F5 düyməsini basdıqdan sonra, kursorda tapdığınız yerdə imleci cari tarixlə hücuma keçir.
2 tarixindən doc keçid


arrow mavi sağ bubble Tapmaq və dəyişdirməklə cari tarixə keçin

VBA koduyla tanış deyilsinizsə, siz də tətbiq edə bilərsiniz Tapın və dəyişdirin cari tarixə keçmək üçün kommunal.

1. Tarixi siyahı olan hesabatı aktivləşdirin və boş bir hüceyrəni seçin, bu formulu yazın = TODAY ()mətbuat Daxil edin Açar, indi bu günü alırsınız.
3 tarixindən doc keçid

2. Basın Ctrl + C bu günün surətini kopyalamaq və tarixlərin siyahısını seçmək üçün gedin və sonra basın Ctrl + F təmin etmək Tapın və dəyişdirin dialoq Nə tapın mətn qutusu, mətbuat Ctrl + V bu günün tarixini yapışdırmaq üçün. Ekran görüntüsünə baxın:
4 tarixindən doc keçid

3. klik Hamısını tapın. İndi kursor bu gün seçilmiş siyahıda hüceyrəyə atlayır.
5 tarixindən doc keçid

Ip ucu: Əgər Excel üçün Kutools, onu tətbiq edə bilərsiniz Xüsusi Hüceyrələri seçin 60 gündə məhdudlaşdırmadan bu funksiyanı tez bir zamanda həll etmək üçün, yükləyin və indi pulsuz bir sınaq versiyasını edin.
6 tarixindən doc keçid



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.
    Peter · 5 months ago
    This doesn't work with the VBA code, it just brings up a window called "Go To". Were we meant to edit the VBA code in some way?