Petua: Bahasa lain diterjemahkan Google. Anda boleh melawat English versi pautan ini.
Log masuk
x
or
x
x
Daftar Sekarang
x

or

Bagaimana untuk mencari dan menggantikan nilai yang lebih besar daripada / kurang daripada nilai tertentu dalam Excel?

Mungkin, terdapat banyak data dalam lembaran kerja anda, sekarang, anda ingin mencari semua sel yang mengandungi nilai yang lebih besar daripada atau kurang daripada nombor tertentu, dan kemudian menggantinya dengan nilai lain yang anda perlukan sekaligus. Ciri Cari dan Ganti biasa tidak digunakan untuk menyelesaikan masalah ini, adakah anda mempunyai cadangan yang baik untuk menangani tugas ini?

Cari dan ganti nilai yang lebih besar daripada / kurang daripada nilai khusus dengan kod VBA

Cari dan ganti nilai yang lebih besar daripada / kurang daripada nilai khusus dengan Kutools untuk Excel


Cari dan pilih sel tertentu dan kemudian gantikannya dengan nilai lain:

Kutools untuk Excel'S Pilih Sel Khusus Ciri ini dapat membantu anda mencari dan memilih sel-sel tertentu, dan kemudian anda boleh menggantikannya dengan nilai lain atau melakukan pemformatan untuk sel-sel terpilih yang anda perlukan. Muat turun Percuma Kutools untuk Excel Sekarang.

doc menggantikan lebih besar daripada 8-8

Kutools untuk Excel: dengan lebih daripada 200 berguna Excel tambahan, bebas untuk mencuba tanpa had pada hari 60. Muat turun dan percubaan percuma Sekarang!



Sebagai contoh, saya akan mendapati semua nilai yang lebih besar daripada 500, dan menggantikannya dengan 0.

doc menggantikan lebih besar daripada 1

Kod VBA berikut boleh membantu anda untuk menggantikan nilai-nilai yang lebih besar atau kurang daripada nilai tertentu pada satu, sila lakukan seperti berikut:

1. Tahan ALT + F11 kunci, dan ia membuka Microsoft Visual Basic untuk Aplikasi tingkap.

2. Klik Memasukkan > Modul, dan tampal kod berikut dalam Modul Tetingkap.

Kod VBA: Cari dan ganti nilai yang lebih besar atau kurang daripada nilai tertentu

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. Kemudian tekan F5 kekunci untuk menjalankan kod ini, dan pilih data jarak yang anda ingin ganti dari kotak prompt, lihat tangkapan skrin:

doc menggantikan lebih besar daripada 2

4. Kemudian klik OK, dan anda dapat melihat semua nilai yang lebih besar daripada 500 telah digantikan dengan 0.

doc menggantikan lebih besar daripada 3

Nota: Dalam kod di atas, anda boleh mengubah pembolehubah berikut kepada yang anda inginkan.

  • Jika Rng.Value > 500 Kemudian
  • Rng.Value = 0

  • Jika anda tidak biasa dengan kod, saya boleh bercakap mengenai alat berguna- Kutools untuk Excel, Dengan itu Pilih Sel Khusus ciri, anda boleh dengan cepat memilih sel-sel yang anda perlukan, dan kemudian menggantikannya sekaligus.

    Kutools untuk Excel : dengan lebih daripada 300 berguna tambahan Excel, bebas untuk mencuba tanpa had pada hari 60.

    Selepas memasang Kutools untuk Excel, lakukan langkah berikut:

    1. Pilih julat data yang anda mahu cari dan ganti.

    2. Klik Kutools > pilih > Pilih Sel Khusus, lihat tangkapan skrin:

    doc menggantikan lebih besar daripada 4 4

    3. Di dalam Pilih Sel Khusus kotak dialog, klik Cell pilihan di bawah Jenis pemilihan, dan pilih Lebih besar daripada daripada Jenis khusus drop down, dan masukkan nilai yang anda ingin gunakan dalam kotak teks selain Lebih besar daripada, lihat tangkapan skrin:

    doc menggantikan lebih besar daripada 5

    4. Kemudian klik OK butang, semua sel yang lebih besar daripada 500 telah dipilih dengan segera, kemudian masukkan nilai yang anda perlukan untuk menggantikan dengan, dan tekan Ctrl + Enter kunci bersama, semua nilai yang dipilih telah diganti pada masa yang sama. Lihat tangkapan skrin:

    doc menggantikan lebih besar daripada 6  2 doc menggantikan lebih besar daripada 7

    Nota: Di dalam Pilih Sel Khusus kotak dialog, anda boleh menggunakan kriteria lain, seperti Kurang daripada, bersamaan, Mengandungi, Dan sebagainya.

    Klik untuk mengetahui lebih lanjut mengenai ciri ini Pilih ciri-ciri Sel Khusus untuk Kutools untuk Excel.

    Muat turun dan percubaan percuma Kutools untuk Excel Sekarang!


    Kutools untuk Excel: dengan lebih daripada 200 berguna Excel tambahan, bebas untuk mencuba tanpa had pada hari 60. Muat turun dan percubaan percuma Sekarang!


    Related articles:

    Bagaimana untuk mencari dan menggantikan padanan tepat dalam Excel?

    Bagaimana untuk menggantikan teks dengan gambar yang sepadan dalam Excel?

    Bagaimana untuk mencari dan menggantikan warna di Excel?



    Cadangan Alat Produktiviti untuk Excel

    Kutools untuk Excel Membantu Anda Selalu Menyelesaikan Kerja di Hadapan Masa, dan Berdiri Daripada Orang

    • Lebih daripada ciri-ciri canggih 300 yang canggih, yang direka untuk senario kerja 1500, meningkatkan produktiviti oleh 70%, memberi anda lebih banyak masa untuk menjaga keluarga dan menikmati kehidupan.
    • Tidak perlu lagi menghafal formula dan kod VBA, berikan rehat dari otak anda sekarang.
    • Menjadi pakar Excel dalam minit 3, Operasi yang rumit dan berulang boleh dilakukan dalam beberapa saat,
    • Mengurangkan beribu-ribu operasi papan kekunci & tetikus setiap hari, mengucapkan selamat tinggal kepada penyakit pekerjaan sekarang.
    • 110,000 orang yang sangat berkesan dan pilihan syarikat 300 + yang terkenal di dunia.
    • Ciri-ciri penuh 60-hari adalah percubaan percuma. Jaminan wang balik 60 hari. Tahun 2 peningkatan dan sokongan percuma.

    Membawa Browsing Tab dan Editing ke Microsoft Office, Jauh Lebih Berkuasa Daripada Tab Penyemak Imbas

    • Tab Pejabat direka untuk Aplikasi Pejabat Word, Excel, PowerPoint dan Lain-lain: Penerbit, Akses, Visio dan Projek.
    • Buka dan buat beberapa dokumen dalam tab baharu pada tetingkap yang sama, dan bukannya dalam tetingkap baru.
    • Meningkatkan produktiviti anda oleh 50%, dan mengurangkan beratus-ratus klik tetikus untuk anda setiap hari!
    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.