티스토리 툴바


 

엑셀 함수에도 if 가 있지만, 엑셀매크로,엑셀VBA에도 if 를 사용합니다.

사용법은 약간 다르지만, 기본 내용은 같습니다.

엑셀 매크로,엑셀 VBA에서 if 를 잘 사용한다면, 다른 동료보다 엑셀문서작업을 더빨리,하지만 더 정확하게 끝낼 수 있습니다. 상사에게 사랑받습니다. 

 

 

if    비교 = > <  등    then 

        비교하여 참일때  실행할 행동1

비교하여 참일때 실행할 행동2

비교하여 참일때 실행할 행동3

end if

 

 

알기 쉽게 이야기 하면

 

만약  비교 한 다음 맞으면

            이렇게, 저렇게 해라

 

이렇습니다.

 

비교는

  =  같다

  > 크다

  < 작다

  >= 같거나 크다

  <= 같거나 작다 

이정도만 하시면 됩니다.

 

예제로 숫자가 50보다 크면 숫자가큼 이라는 문구가 나타나게 해보겠습니다.

 

 

먼자 B3 셀 (CELLS 3,2)  에 100이라는 숫자가 있습니다.

그럼 C3 셀에 (CELLS 3,3) 에 50보다 숫자가 크기때문에 숫자가 큼이라눈 문구가 나타나게 해보겠습니다.




 

if cells(3,2) > 50  then 

     cells(3,3)="숫자가큼)

end if

 

이렇게 하시면 됩니다.

 

 

 

그리고 매크로 aaa 의 실행단추를 만들어 실행하면 됩니다.

 

 

그리고 비교값이 거짓 일때가 있습니다. 만약 숫자가 30이면 다르게 행동하기 위해서는 else 가 필요합니다.

 

 

 

if    비교 = > <  등    then 

        비교하여 참일때  실행할 행동1

비교하여 참일때 실행할 행동2

비교하여 참일때 실행할 행동3

 

else

 

거짓일때는 이렇게 해라

 

end if

 

 

 

이렇게 소스를 바꾸면

 

셀(3,2) 숫자가 50보다크면 셀(3,3)에 숫자가큼 이라고 쓰고, 그렇지 않으면 셀(3,3)에 숫자가 작음 이라고 써라

if cells(3,2)>50 then cells(3,3)="숫자가큼)"  else  cells(3,3)="숫자가 작음"   end if

 

이렇게 됩니다.

숫자를 30이라고 입력하고 실행하면..

 

 

비교한다음의 행동을 여러개 할 수도 있습니다.

 

 

 

이렇게 비교 후 행동을 여러개 하실수 있습니다.

 

 

 

if 비교 then 

     행동 1

행동2

행동3

.

.

.

 

      else

 

행동1

행동2

.

.

end if

 

 

엑셀매크로,VBA의 if ~ else 기초였습니다. 

엑셀함수로 할 수 없는 부분을 엑셀 매크로를 이용하여 빨리 엑셀문서작업 동료보다 빨리 끝내시고, 일찍 퇴근하세요.

다음에 엑셀매크로,엑셀VBA의 if ~ else 를 실제 엑셀작업할때 어떻게 쓸지 알아보도록 하겠습니다.

저작자 표시

Related Posts Plugin for WordPress, Blogger...
Posted by Zez

트랙백 주소 : http://zez2002.tistory.com/trackback/36 관련글 쓰기

댓글을 달아 주세요

  1. 프리마켓24 2013/01/22 10:01  댓글주소  수정/삭제  댓글쓰기

    잘 알아 갈께요 ㅎㅎ
    멋진 오늘이 되셔요!!

  2. +요롱이+ 2013/01/22 10:07  댓글주소  수정/삭제  댓글쓰기

    덕분에 배우고 갑니다^^
    아무쪼록 행복한 하루 되시기 바랍니다..!!

  3. 씩씩맘 2013/01/22 10:39  댓글주소  수정/삭제  댓글쓰기

    좋은 정보 잘 보고 갑니다.
    즐거운 하루 보내세요.

  4. NNK의 성공 2013/01/22 10:59  댓글주소  수정/삭제  댓글쓰기

    잘 알아 갑니다 ~ ^^
    좋은 하루가 되세요~

  5. S매니저 2013/01/22 11:14  댓글주소  수정/삭제  댓글쓰기

    좋은 정보 감사합니다!
    너무 잘 보고 갑니다!

  6. 블로그엔조이 2013/01/22 11:54  댓글주소  수정/삭제  댓글쓰기

    유용하게 쓸수 있는 엑셀매크로 잘 배우고 가요.~ ^^
    유용한정보 감사합니다. ~ 즐거운 하루 되세요^^

  7. 어듀이트 2013/01/22 13:21  댓글주소  수정/삭제  댓글쓰기

    덕분에 매크로에 대해서 잘 배우고 갑니다~
    편안한 하루 되시길 바래요~

  8. ☆정보가힘이다☆ 2013/01/22 13:32  댓글주소  수정/삭제  댓글쓰기

    매크로 기능 잘만 쓰면 단순작업 무지 없앨 수 있는데 잘 몰라서 못썼었거든요
    정리 잘 된 글 보니까 쓸 수 있을것 같네요 잘 보고 갑니다

  9. 금융연합 2013/01/22 15:20  댓글주소  수정/삭제  댓글쓰기

    매크로에 대해 잘보고 갑니다.

  10. FIAP 편집국장 2013/01/22 15:43  댓글주소  수정/삭제  댓글쓰기

    엑셀 매크로는 처음 배울때는 어렵게 느껴지지만, 막상 알고나면 무지하게 편리한 툴인 것 같습니다..ㅎㅎ
    좋은 정보 감사합니다. 즐거운 하루 보내세요!^^

  11. 슈퍼리치 2013/01/22 18:27  댓글주소  수정/삭제  댓글쓰기

    좋은정보 감사합니다. 잘보고가요^^
    행복한 저녁되세요~

  12. 예뻐지려는 본능 2013/01/22 20:05  댓글주소  수정/삭제  댓글쓰기

    유익한 글 잘 읽고 갑니다~
    즐거운 저녁시간 되세요~

  13. 딕션 2013/01/23 07:34  댓글주소  수정/삭제  댓글쓰기

    엑셀은 너무 어려워요~
    기본적인 몇 개만 기록해 사용하고 있다는 ㅎ
    좋은 글 잘 읽고 배우고 갑니다.^^

  14. 양군님 2013/01/23 07:51  댓글주소  수정/삭제  댓글쓰기

    좋은 글 잘보고갑니다~~좋은하루되세요^^

  15. Hare's 2013/01/23 08:41  댓글주소  수정/삭제  댓글쓰기

    요런거 하나하나 잘 기억해두면,
    업무 때 활용하기 좋을 것 같네요 ~

  16. 金井山 2013/01/23 09:03  댓글주소  수정/삭제  댓글쓰기

    잘 보고 갑니다. ㅎㅎ
    즐거운 수욜 멋진 시간 되세요

  17. 1 2013/03/28 19:11  댓글주소  수정/삭제  댓글쓰기

    엑셀 매크로 제작, 의뢰인 거래사이트 "오투잡"

    오투잡은 현재 하루 접속자 4000명이 접속하는 재능거래 사이트 입니다.
    오픈한지 얼마되지 않았지만 부업분야 전체 점유율 2위, 국가지원을 받고있습니다.

    오투잡에서 [컴퓨터/프로그래밍] 카테고리의 판매자를 대모집 중입니다.
    카테고리 활성화가 시작 되니, 많은 판매 등록 바랍니다.
    오투잡은 네이버에서 "오투잡" 으로 검색 하세요.

  18. 1 2013/03/28 19:11  댓글주소  수정/삭제  댓글쓰기

    엑셀 매크로 제작, 의뢰인 거래사이트 "오투잡"

    오투잡은 현재 하루 접속자 4000명이 접속하는 재능거래 사이트 입니다.
    오픈한지 얼마되지 않았지만 부업분야 전체 점유율 2위, 국가지원을 받고있습니다.

    오투잡에서 [컴퓨터/프로그래밍] 카테고리의 판매자를 대모집 중입니다.
    카테고리 활성화가 시작 되니, 많은 판매 등록 바랍니다.
    오투잡은 네이버에서 "오투잡" 으로 검색 하세요.

  19. 마왕고 2013/04/21 09:40  댓글주소  수정/삭제  댓글쓰기

    정말 많이 되고 있씁니다.
    정말 감사합니다.

  20. 평안 2013/05/02 21:06  댓글주소  수정/삭제  댓글쓰기

    고맙습니다 잘 사용하고 배울게요

  21. 단소야 2014/04/07 08:17  댓글주소  수정/삭제  댓글쓰기

    멋진 설명입니다. 정말 잘 배우고 갑니다.

  22. 김동현 2014/04/07 16:36  댓글주소  수정/삭제  댓글쓰기

    질문입니다....ㅎㅎ 완전 초보라 ...

    매크로를 해 봤는데 에러가 나와서요...

    Sub 노무비()
    Dim i As Integer

    For i = 0 To 1000

    If Cells(22, 30) < 0.8001 Then

    Cells(22, 31) = 0.8001 + (0.0001 * i)

    Next i

    End Sub

    뭐가 이상인지 알려주시면 정말 감사하겠습니다

    • Zez 2014/04/07 17:21  댓글주소  수정/삭제

      Sub 노무비()
      Dim i As Integer

      For i = 0 To 1000

      If Cells(22, 30) < 0.8001 Then Cells(22, 31) = 0.8001 + (0.0001 * i)

      Next i

      End Sub

      이렇게 then 옆에 바로 붙여보세요,, 그러면 에러가 안나더군요..

      아니면
      Sub 노무비()
      Dim i As Integer

      For i = 0 To 1000

      If Cells(22, 30) < 0.8001 Then

      Cells(22, 31) = 0.8001 + (0.0001 * i)

      End If

      Next i

      End Sub
      이렇게 end if로 if 문을 닫아주시는 것이 좋습니다. 이렇게 해도 에러 안납니다.

      지금 에러가 나는 이유는 if 문이 아직 안끝났는데 next가 나와서 그런 것입니다. 왠만하면 if 다음에 end if 로 닫아주시는 것이 좋습니다.