1
    Sub compareRange()
        If Worksheets("Sheet1").Range("A14:C14") = Worksheets("Sheet1").Range("A15:C15") Then
            MsgBox "Two Ranges are the same"
        End If
        'MsgBox "Two Ranges are the same"
    End Sub

A14:C14(1,2,3) と A15:C15(1,2,3) の値が同じであるため、型の不一致エラーが発生します。このような2つの範囲を比較するにはどうすればよいですか?

4

2 に答える 2

0

あなたはこれを行うことはできません。これは、範囲がどのように機能するかではありません。ある種の for ループを使用して、範囲内の各セルを反復処理する必要があります。セルの数が等しくないケースを見つけるために、チェックを追加することをお勧めします (その場合、明らかに範囲が異なります)。

于 2013-07-25T20:43:14.463 に答える