EXELのマクロに関して質問します。

質問

EXELのマクロに関して質問します。
シートAの任意のセルに文字列を入力後、シートBの同位置のセルと比較し、
同じ内容かどうかを判断する方法を教えてください。

回答No.3

hana-hana3 · ベストアンサー

シート１のモジュールに下記のように記入してください。

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Value = Sheets("シート２").Range(Target.Address).Value Then
MsgBox "一致"
Else
MsgBox "不一致"
End If
End Sub

お礼

出来ました。ありがとうございました。
>>Sheets("シート２").Range(Target.Address).Value
この↑の式がわからず袋小路になってました。

回答No.2

A88No8

＃１です。
>EXELのマクロに関して質問します。
　あ、失礼しました。忘れて下さいm(__;m

回答No.1

A88No8

こんにちは
>同じ内容かどうかを判断する方法を教えてください。
　例えばシートAの任意のセルがA1だったとして、シートAのA1の隣に下記の式を入れると同じ時に真理値「TRUE」が返されます。
=A1=シートB!A1

　真理値「FALSE」を返したいときはイコール(=)を比較記号を並べた論理演算子(<>)に変更すればOkです。
=A1<>シートB!A1

　応用としては、これを条件付き書式に利用すると入力した欄の値の書式を変えることが出来ます。