3

そのため、Excel スプレッドシートに 2 つの列があります。これらの列の 1 つだけに値を含めることができます。それらをセルA1と呼びましょうB1。

次の 2 つの方法のいずれかを容易にできると思います。

  1. セルA1が変更されると空白になりますB1

    私はこれを行うことができますが、空白になるB1と、同じイベントが発生し、両方のセルがクリアされます。

  2. セルの 1 つに値が含まれている場合、最初のセルをクリアするまで、他のセルは何らかの形で編集のためにロックされます。

どんなヒントでも大歓迎です。

ありがとうチーム！

4

1 に答える 1

2

イベントを無効にして、両方のセルをクリアしないようにすることができます。すなわち

Private Sub Worksheet_Change(ByVal Target As Range)
Dim rng1 As Range
Set rng1 = Intersect(Target, Range("A1,C1"))
If rng1 Is Nothing Then Exit Sub
Application.EnableEvents = False
If rng1.Address(0, 0) = "A1" Then
[c1].ClearContents
Else
[a1].ClearContents
End If
Application.EnableEvents = True
End Sub
于 2013-07-04T04:58:56.347 に答える