2012-02-11 2 views
1

매우 쉬운 답변이있을 것입니다. (그리고 나는 "올바른"질문을하는 것이 좋을지 모르거나 Google이 줄 것이라고 생각합니다. 나 대답).셀에 값을 입력하고 수식의 표시 값 결과가

나는 다음과 같은 공식을 가지고 :

=DATE(YEAR(V1), MONTH(V1)+V2-1,8) 
나는이에 입력 한 숫자를 제외하고, 셀 (예를 들어, 14)에 번호를 입력하고 공식 운영을 할 수 있도록하고 싶습니다

셀은 공식에서 8을 대체해야합니다. 그래서, 다시, 14 들어가는 실행하게 수식과 같다 : I 셀 A3에 값 '14'을 입력

  1. :

    =DATE(YEAR(V1), MONTH(V1)+V2-1, 14) 
    

    그래서 요약하자면, 작업 흐름이있다.

  2. 위의 공식은 실행
  3. 3/14/2012 같은 것이

내가 VBA 않고이 작업을 수행 할 수 있습니다 (/ V2의 셀 값 내 V1에 따라) A3의 표시 값은? (나는 .NET 프로그래밍 프로그래머이므로 VBA는 내게 외국 적이 아니다. Excel이 코드없이이 기본 기능을 수행 할 수 있어야한다고 생각한다.)

답변

1

아니요 - A3의 값을 수식을 통해 A3 내의 새 값으로 전송하기 때문에.

아래 코드는 A1을 업데이트합니다 : A5 이러한 세포 중 하나가 바로 시트 탭

  • 보기를 클릭하면

    1. 을 요청 결과 (한 번에 변경하는 모든 5 모든 경우)를 변경하는 경우 코드
    2. 복사와 완벽하게

      Private Sub Worksheet_Change(ByVal Target As Range) 
      Dim rng1 As Range 
      Dim rng2 As Range 
      Set rng1 = Intersect(Range("a1:A5"), Target) 
      If rng1 Is Nothing Then Exit Sub 
      Application.EnableEvents = False 
      For Each rng2 In rng1 
          rng2.Value = Format(Evaluate("DATE(YEAR(V1), MONTH(V1)+V2-1," & CLng(rng2.Value) & ")"), "mm/dd/yyyy") 
      Next rng2 
      Application.EnableEvents = True 
      End Sub 
      
  • +0

    작품 아래의 코드를 붙여 넣습니다. Brett에게 감사드립니다. –

    관련 문제