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

or

Bagaimana untuk menjalankan makro berdasarkan nilai sel dalam Excel?

Supaya, saya mempunyai beberapa kod makro di dalam buku kerja saya, dan sekarang, saya mahu menjalankan kod-kod ini berdasarkan nilai sel. Artikel ini, saya akan membincangkan beberapa situasi yang mungkin anda alami dalam kerja harian anda semasa menggunakan Excel.

Jalankan atau mencetuskan makro jika nilai sel lebih besar atau kurang daripada nilai khusus dengan kod VBA

Jalankan atau mencetuskan makro jika nilai sel bersamaan dengan teks tertentu dengan kod VBA


anak panah gelembung kanan biru Jalankan atau mencetuskan makro jika nilai sel lebih besar atau kurang daripada nilai khusus dengan kod VBA


Sebagai contoh, jika nilai dalam sel A1 adalah antara 10 dan 50, jalankan macro1, dan jika nilai lebih besar daripada 50, jalankan macro2. Untuk menyelesaikan tugas ini dalam Excel, sila gunakan kod VBA berikut.

1. Klik kanan tab helaian yang anda mahu untuk melaksanakan makro berdasarkan nilai sel, dan kemudian pilih Lihat Kod dari menu konteks, dan dibuka Microsoft Visual Basic untuk aplikasi tetingkap, salin dan tampal kod berikut ke dalam Modul kosong:

Kod VBA: Jalankan makro jika nilai sel lebih besar atau kurang daripada:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
    If Target.Cells.Count > 1 Then Exit Sub
    If IsNumeric(Target) And Target.Address = "$A$1" Then
        Select Case Target.Value
        Case 10 To 50: Macro1
        Case Is > 50: Macro2
        End Select
    End If
End Sub

doc menjalankan makro berdasarkan nilai sel 1

Nota: Dalam kod di atas:

A1 adalah sel yang mengandungi nilai khusus yang anda mahu jalankan makro berdasarkan;

Kes 10 Kepada 50: Macro1: ini bermakna jika nilai antara 10 dan 50, jalankan Macro1;

Kes> 50: Macro2: ini bermakna jika nilai lebih besar daripada 50, jalankan Macro2.

Sila tukar nama makro dan kriteria untuk keperluan anda, dan anda juga boleh menambah lebih banyak kriteria berikut kes skrip.

2. Kemudian simpan dan tutup tetingkap kod ini, sekarang, apabila nilai yang anda masukkan adalah antara 10 dan 50 dalam sel A1, Macro1 akan dicetuskan, jika nilai yang dimasukkan lebih besar dari 50, Macro2 dilaksanakan.


anak panah gelembung kanan biru Jalankan atau mencetuskan makro jika nilai sel bersamaan dengan teks tertentu dengan kod VBA

Jika anda ingin mencetuskan makro berdasarkan teks tertentu dalam sel, misalnya, untuk menjalankan makro1 jika teks "Padam" dimasukkan, dan jalankan macro2 jika teks "Sisipkan" ditaip. Kod berikut boleh memberi anda nikmat.

1. Klik kanan helaian yang anda mahu untuk melaksanakan makro berdasarkan nilai sel, dan kemudian pilih Lihat Kod dari menu konteks, dan dibuka Microsoft Visual Basic untuk aplikasi tetingkap, salin dan tampal kod berikut ke dalam Modul kosong:

Kod VBA: Jalankan makro jika nilai sel lebih besar atau kurang daripada:

Sub worksheet_change(ByVal target As Range)
Set target = Range("A1")
If target.Value = "Delete" Then
 Call Macro1
End If
If target.Value = "Insert" Then
Call Macro2
End If
End Sub 

doc menjalankan makro berdasarkan nilai sel 2

Nota: Dalam kod di atas, "Padam"Dan"Memasukkan"Adalah teks sel yang anda mahu jalankan makro berdasarkan, dan Macro1 dan Macro2 adalah makro yang anda hendak laksanakan berdasarkan teks. Sila tukar mereka dengan keperluan anda.

2. Kemudian simpan kod ini dan tutup tetingkap, sekarang, apabila anda memasukkan teks "Padam" dalam sel A1, macro1 dicetuskan, jika teks "Masukkan" dimasukkan, makro2 akan dilaksanakan.


Related articles:

Bagaimana untuk menjalankan makro apabila nilai sel berubah dalam Excel?

Bagaimana untuk menjalankan makro secara automatik sebelum mencetak di Excel?

Bagaimana untuk menjalankan makro berdasarkan nilai yang dipilih dari senarai drop down dalam Excel?

Bagaimana untuk menjalankan makro dengan mengklik hiperpautan dalam Excel?

Bagaimana untuk menjalankan makro apabila kunci dipilih dari buku kerja?


Cadangan Alat Produktiviti untuk Excel

kte tab 201905

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.
  • To post as a guest, your comment is unpublished.
    Mani Chandran · 1 years ago
    I am working with result analysis. In this case, the data in the excel will be like this Name, Sub name , Crade. Now,i want to find the all pass or successful candidate numbers from the result. How can i get it. Because, i am having 6 different subject and their results in single excel sheet. If student failed in one subject he is not be a successful student. How do remove their name in all the subjects.
  • To post as a guest, your comment is unpublished.
    Siva · 1 years ago
    Requirement:
    Based on the selection
    There will be a dropdown list for following three properties of the same dimension as below.
    And there will be three derived cells which will be derived from the cells (G46,G47 and G48)

    Scenario:
    If I select a value from cost center drop down list , cost center derived cell(K46) should be populated with value selected from cost center drop down list(H46) and the other two derived cells (K47 and k48) should become blank.

    Similarly if I select value from Budget manager drop down list, Budget manager derived cell should be populated with value selected from Budget manager drop down list(H47) and the other two derived cells (K45 and k48) should become blank.
  • To post as a guest, your comment is unpublished.
    Richard · 1 years ago
    Hi, how about if you want to run a macro based on two cells? One cell being text based and the other cell having numerical values? Then you would want to call a macro if the two cells show exactly what you want, like "YES" for the first cell and 1 for the second cell, if not a pop box would show saying "Not Found".