2つのセル間で双方向接続を行うことは可能ですか

Excelシートのユーザーが2つのセルのいずれかにデータを入力し、両方のセルを更新できるようにするにはどうすればよいですか？

• シート1にセルA4があります。
• シート2にセルB7があります。

ユーザーがシート1のセルA4に100％と入力すると、セルA4とB7の両方が100％と表示されます。ユーザーがシート2のセルB7に80％と入力すると、セルA4とB7の両方が80％と表示されます。

Excel 2013を使用していますが、2016年にアクセスできます。

双方向のデータ入力のために、セル間またはセル範囲間、ワークシート間、またはワークブック間でさえ動的リンクが必要な場合、VBAが唯一のソリューションです。

両方のシートに次のVBAコードを記述する必要があります。

シート1：

Private Sub Worksheet_change(ByVal Target As Range)

If Not Intersect(Target, Range("A4")) Is Nothing Then
   If Target = Range("A4") Then
      Sheets("Sheet2").Range("B7").Value = Target.Value
   End If
End If

End Sub

シート2：

Private Sub Worksheet_change(ByVal Target As Range)

If Not Intersect(Target, Range("B7")) Is Nothing Then
  If Target = Range("B7") Then
    If Sheets("Sheet1").Range("A4").Value <> Target.Value Then
      Sheets("Sheet1").Range("A4").Value = Target.Value
    End If
  End If
End If

End Sub

注意：両方のセルの値が類似していない場合、シート2のコードはシート1を更新します。これが必要ない場合は、Ifステートメント行を削除するだけです。

お役に立てれば。VBAコードをテストして投稿しました。