VBA- Excelのワークブックを比較するマクロ

Question

Excel用のVBAはかなり新しくなっています。私は2つの別のワークブックを比較するマクロを作成し、それらの違いを表示したいと思います。詳細については、比較する必要があるのは、両方のワークブックの列Aだけです。アドバイスをいただければ幸いです。

Answer 1

これは、あなたが望むことをするでしょう！

Public Sub CompareSheets() 
Dim ws1 As Worksheet, ws2 As Worksheet 
Dim cell As Range, rng As Range 
Set ws1 = Workbooks.Open("C:\your_path_here\Book1.xlsx").Sheets(1) 
Set ws2 = Workbooks.Open("C:\your_path_here\Book2.xlsx").Sheets(1) 
Set rng = ws1.Range("A1:A20") 
For Each cell In rng 
    Celladdress = cell.Address 
    If cell <> ws2.Range(Celladdress) Then 
     cell.Interior.Color = vbYellow 
     ws2.Range(Celladdress).Interior.Color = vbYellow 
    End If 
Next cell 
End Sub