de-vraag
Lebih
Question

membandingkan 2 sel di excel dengan menggunakan vba

Saya ingin membandingkan 2 sel; nilai dan melihat apakah mereka cocok atau tidak. Saya tahu bagaimana melakukannya di excel tapi saya tidak tahu bagaimana cara memasukkannya ke dalam kode vba.

Masukan &; keluaran:

  1. Nilai sel A1 sudah ada di excel.
  2. Masukkan nilai secara manual di cell B1.
  3. Klik sub klik tombol_klik untuk melihat apakah nilai pada 2 cell tersebut sama atau tidak.
  4. Tampilkan "Yes" atau "No" pada cell C1

Rumus Excel:

=IF(A1=B1,"yes","no")
Pemrograman
vba
excel
excel-vba
Pertanyaan ini memiliki :value jawaban dalam bahasa Inggris, untuk membacanya masuk ke akun Anda.

Cobalah ini:

Sub CompareCells()
    If [a1] = [b1] Then
        [c1] = "yes"
    Else
        [c1] = "no"
    End If
End Sub

Tetapkan kode ini ke tombol.

4 
If (Range("A1").Value = Range("B1").Value) Then
    Range("C1").Value = "Yes"
Else
    Range("C1").Value = "No"
End If
Chrismas007
Chrismas007
Jawaban edit 21 Januari 2015 в 7:09
2

Berikut ini adalah Sub perubahan (kode HARUS masuk ke modul sheet). Ini hanya akan aktif jika Anda mengubah sel di kolom B.

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target is Nothing Then Exit Sub
    If Target.Cells.Count > 1 Then Exit Sub
    If Target.Column <> 2 Then Exit Sub
    If Cells(Target.Row, 1).Value = Cells(Target.Row, 2).Value Then
        Cells(Target.Row, 3).Value = "Yes"
    Else
        Cells(Target.Row, 3).Value = "No"
    End If
End Sub

Sebagai catatan, ini tidak menggunakan tombol, tetapi ini menyelesaikan tujuan Anda untuk menghitung jika kedua sel sama setiap kali Anda memasukkan data secara manual ke dalam sel di Kolom B.

0