İ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ə müəyyən bir dəyərdən / daha az dəyərləri tapmaq və əvəz etmək üçün necə?

Bəlkə, iş səhifənizdə birdən çox məlumat var, indi müəyyən bir ədəddən çox və ya daha az dəyəri olan bütün hüceyrələri tapmaq və bir dəfə onlara lazım olan başqa bir dəyərlə əvəz etmək istəyirəm. Normal tap və dəyişdirmək funksiyası bu problemi həll etmək üçün tətbiq edilmir, bu işlə məşğul olmaq üçün başqa yaxşı təklifləriniz varmı?

VBA kodu ilə müəyyən bir dəyərdən daha az / az dəyərləri tapın və dəyişdirin

Excel üçün Kutools ilə xüsusi dəyərdən / azdan / daha az dəyərləri tapın və dəyişdirin


Xüsusi hüceyrələri tapın və seçin və başqa bir dəyərlə əvəz edin:

Excel üçün Kutools'S Xüsusi Hüceyrələri seçin xüsusiyyət, xüsusi hüceyrələri tapmaqda və seçməyinizə kömək edə bilər və sonra digər dəyərlərlə əvəz edə bilərsiniz və ya seçdiyiniz hüceyrələr üçün bəzi formatlaşdırma edə bilərsiniz. İndi Excel üçün Pulsuz Kutools Download.

doc, 8-8-dən daha çox əvəz edir

Excel üçün Kutools: 200 gündə heç bir məhdudiyyət olmadan 60-dən çox lazımlı Excel eklentisi ilə pulsuzdur. İndi indir və pulsuz sınaq!



Məsələn, 500-dən daha çox olan bütün dəyərləri tapa bilərsiniz və onları 0 ilə əvəz etmirəm.

doc 1-dən daha çox əvəz edir

Aşağıdakı VBA kodu birində müəyyən bir dəyərdən daha az və ya aşağı olan dəyərləri əvəz etməyə kömək edə bilər, xahiş edirəm:

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

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

VBA kodu: Belirli bir dəyərdən daha çox və ya daha az dəyərləri tapın və dəyişdirin

Sub FindReplace()
'Update 20150423
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    If Rng.Value > 500 Then
        Rng.Value = 0
    End If
Next
End Sub

3. Sonra basın F5 bu kodu çalıştırmak üçün düyməsini basın və sorğu qutusundan dəyişdirmək istədiyiniz aralıq məlumatı seçin, ekran görünüşünə baxın:

doc 2-dən daha çox əvəz edir

4. Və sonra basın OKvə 500-dən daha yüksək olan bütün dəyərləri 0 ilə əvəz edə bilərsiniz.

doc 3-dən daha çox əvəz edir

Qeyd: Yuxarıda göstərilən kodda, aşağıdakı dəyişənləri istənilən dəyişə bilərsiniz.

  • Rng.Value varsa > 500 Sonra
  • Reng.Value = 0

  • Kodla tanış deyilsinizsə, mən rahat bir vasitə haqqında danışa bilərəm - Excel üçün KutoolsOnun ilə Xüsusi Hüceyrələri seçin funksiyaya ehtiyac duyduğunuz hüceyrələri tez bir zamanda seçə bilərsiniz və sonra onları bir dəfə əvəz edə bilərsiniz.

    Excel üçün Kutools : 300-dən daha çox 60-dən istifadə etməklə, Excel-in əlavələri, XNUMX gündə heç bir məhdudiyyət yox idi.

    Quraşdırıldıqdan sonra Excel üçün Kutools, aşağıdakı adımları et:

    1. Tapmaq və dəyişdirmək istədiyiniz məlumat aralığını seçin.

    2. Basın Kutools > seçmək > Xüsusi Hüceyrələri seçin, bax ekran görüntüsü:

    doc 4 4-dən daha çox yerini dəyişir

    3. İçində Xüsusi Hüceyrələri seçin informasiya qutusuna basın Cell altında seçim Seçim növüvə seçin Daha çox dən Xüsusi tip açılır və mətn qutusunda istifadə etmək istədiyiniz dəyəri daxil edin Daha çox, bax ekran görüntüsü:

    doc 5-dən daha çox əvəz edir

    4. Sonra basın OK düyməsini basın, 500-dən daha çox olan bütün hüceyrələr dərhal seçilib, sonra dəyişdirmək üçün lazım olan dəyəri daxil edin və basın Ctrl + Enter düymələri birlikdə, bütün seçilmiş dəyərlər eyni zamanda əvəz edilmişdir. Ekranlara baxın:

    doc 6-dən daha çox əvəz edir  2 doc 7-dən daha çox əvəz edir

    Qeyd: İçində Xüsusi Hüceyrələri seçin informasiya qutusu kimi digər meyarlardan istifadə edə bilərsiniz Az, bərabər, Var, Və s.

    Excel haqqında Kutools Specific Cells özelliğini seçin haqqında daha ətraflı məlumat üçün buraya basın.

    Excel İndi Download və pulsuz sınaq Kutools!


    Excel üçün Kutools: 200 gündə heç bir məhdudiyyət olmadan 60-dən çox lazımlı Excel eklentisi ilə pulsuzdur. İndi indir və pulsuz sınaq!


    Related articles:

    Excel-də tam uyğunluğu necə tapmaq və dəyişdirmək olar?

    Excel-də müvafiq şəkillərlə mətnləri necə əvəz etmək olar?

    Excel-də rəngləri necə tapmaq və dəyişdirmək olar?



    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.