을 참조하여 : Excel - 수식에서 직접 데이터를 입력하거나 셀 값을 갖는 방법
관련 사항에 대해 문의하고 싶습니다. 기존 공식 값을 새 입력 값과 비교하려는 경우 VBA 수식을 어떻게 편집합니까? 그리고 공식화된 입력 값과 새로운 입력 값 모두의 최대값을 표시합니다.
귀하의 친절한 도움에 진심으로 감사드립니다. 대단히 감사합니다.
답변1
원래 요청에서: A2와 A3 모두 숫자 값을 갖는 경우 A4는 해당 합계로 채워집니다. 숫자가 아니거나 null이면 A4에 오류가 표시됩니다. A4를 덮어쓰면 A2 또는 A3이 다시 변경될 때까지 해당 값이 영구적으로 유지됩니다. 새로운 요구 사항을 추가하려면 A2와 A3가 A4에 대해 적절한 합계를 생성하고 누군가 A4를 새 숫자 값으로 덮어쓴 경우 A2+A3과 A4 사이의 최대값을 사용하려고 합니다. 나는 이것이 셀 A5에 표시되어야 한다고 가정합니다.
원래 답변에 추가 :
Private Sub Worksheet_Change(ByVal Target As Excel.Range) If Not Intersect(Target, Range("A2:A3")) Is Nothing Then If WorksheetFunction.Count(Range("A2:A3")) = 2 Then Range("A4").Formula = "=A2+A3" End If ElseIf Not (Intersect(Target, Range("A4"))) Is Nothing Then 'Check for numbers in a2, a3, and a4 If IsNumeric(Range("A2").Value) And IsNumeric(Range("A3").Value) And IsNumeric(Range("A4").Value) Then 'If a2+a3 is greater than a4 If Range("A2").Value + Range("A3").Value > Range("A4").Value Then 'set the sum of a2 and a3 to cell a5 Range("A5").Value = Range("A2").Value + Range("A3").Value Else 'set the value of cell a4 to cell a5 Range("A5").Value = Range("A4").Value End If End If End If End Sub