나눔터  
  HOME > 나눔터 > 묻고답하기 > 엑셀
엑셀
엑셀에 대한 질문과 답변을 올려주세요. 단, 취지에 맞지 않는 글은 운영자가 삭제합니다.
 "000 님, 도와주세요", "부탁 드립니다.", "급합니다!" 등과 같이 막연한 제목을 달지 말아주세요.
[필독] 빠르고 정확한 답변을 얻는 16가지 Tip !
[필독] 저작권법 개정에 따른 이용안내
작성자:  

 dew (dewdrop)

추천:  2
파일:     조회:  1029
제목:   [RE]수입지출한번더...
     
  * 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.

 - 엑셀 버전(2010,2016,2019):

* 아래줄에 질문을 작성하세요 >>
수입지출 한번 더 봐주세요! 이제 해결은 다 되었는데 현재는 1~12월달로 되어있는데 시작이 1월이 아니라 12월부터 시작해서 11월달로 끝나는데 어떻게해야하는지 한번 더 봐주세요! 결산이 11월달라 마감하고 12월달부터 시작하거든요...
==============[박훈이님 글에 대한 답변입니다]==============

내용 참고하세요... 

Sub UpDate(Sh As Worksheet)
    ..............
    ..............
    ..............

    If iMonth = 1 Then
        rBalance.Cells(1, 1).FormulaR1C1 = "=IF(OR(RC[-4]<>"""", RC[-1]<>""""),RC[-4]-RC[-1], """")"
    Else
        rBalance.Cells(1, 1).FormulaR1C1 = "=IF(OR(RC[-4]<>"""", RC[-1]<>""""), '" & iMonth - 1 & "월'!R[500]C+RC[-4]-RC[-1], """")"
    End If

    이 부분을 아래와 같이 수정하세요...

    If iMonth = 12 Then
        rBalance.Cells(1, 1).FormulaR1C1 = "=IF(OR(RC[-4]<>"""", RC[-1]<>""""),RC[-4]-RC[-1], """")"
    Else
        rBalance.Cells(1, 1).FormulaR1C1 = "=IF(OR(RC[-4]<>"""", RC[-1]<>""""), '" & IIf(iMonth = 1, 12, iMonth - 1) & "월'!R[500]C+RC[-4]-RC[-1], """")"
    End If

    ..............
    ..............
    ..............

End Sub
 
[불량 게시물 신고]  
박훈이해결감사합니다.02-14 (10:27)
삭제 ■신고
        
  

작성일 : 2019-02-14(08:58)
최종수정일 : 2019-02-14(08:58)
 


 ◎ 관련글

  제 목   작성자   날짜
수입지출한번더... 박훈이 2019-02-13
[RE]수입지출한번더... dew 2019-02-14