로또 제 913 회 당첨번호
      +  
추첨날짜 : 2020-05-30
1등금액 : 21,420,089,632원

회원로그인

설문조사

필요한 플러그인은?

module | 날짜를 입력받아서 실제 나이를 빼거나, 날짜를 입력받아서 요일 뽑아내기

페이지 정보

재아 쪽지보내기 메일보내기 홈페이지 자기소개 아이디로 검색 전체게시물 0 4,165

주소 정보

본문

사용자 정의 함수

날짜를 입력받아서 나이를 뽑아내는 사용자 정의 함수 만들기


---------------------------------------------------------------------------------------
Function age(생년월일 As Date) As Integer

  age = Year(Date) - Year(생년월일) + 1

End Function
---------------------------------------------------------------------------------------

생년월일 입력을 받아서 올해 연도에서 출생년도를 빼서 + 1을 해서 age에 다시 담음

=age(셀날짜)
로 사용 가능


요일 뽑아내는 첫번째 방법
---------------------------------------------------------------------------------------
Function yoil(날짜 As Date) As String

    요일 = Weekday(날짜, 1)
    yoil = Choose(요일, "일", "월", "화", "수", "목", "금", "토")

End Function
---------------------------------------------------------------------------------------

※ weekday 함수를 통하여 날짜를 입력받아서 해당 날짜의 요일의 숫자를 뽑아낸다

여기서 weekday 의 옵션 기본값을 설정 할수 있는데 여기서 기본값으로 1을 입력하게 된다.
여기서 1은 일요일을 뜻하는게 아니라 다음 옵션을 기본 값으로 한다

일요일이 1부터 시작한다는 뜻이 된다.

그럼으로
1 일요일
2 월요일
3 화요일
4 수요일
5 목요일
6 금요일
7 토요일

된다

그래서 요일 이라는 부분에  입력받은 셀의 날짜에 해당하는 요일숫자 가 들어가게 된다.

여기서 요일 = 숫자 만 들어갔지 그 숫자의 값을 다시 choose 를 통하여 이제 요일로 변경 해야 한다.


여기서 만약에 과일로 예를 들면...

        yoil = Choose(요일, "1", "2", "3", "4", "5", "6", "7")
        yoil = Choose(요일, "사과", "포도", 수박", "매주", "목", "금", "토")
        yoil = Choose(요일, "일", "월", "화", "수", "목", "금", "토")


1이면 사과가 yoil 에 담기게 되는거고
2이면 포도가 yoil 에 담기게 되는거다

다시 정리하면 값이 3이면 수박 즉 "화" 라는 값이 yoil 에 들어가게 된다.

=yoil(셀)

출력하면


이렇게만 나오게 되는데
혹시 뒤에 요일을 붙이고 싶다면 아래처럼 하면 된다.

=yoil(셀)&"요일"




요일 뽑아내는 두번째 방법
---------------------------------------------------------------------------------------
Function yoil2(날짜 As Date) As String

    yoil2 = WorksheetFunction.text(날짜, "aaaa")

End Function

---------------------------------------------------------------------------------------
위 부분의 WorksheetFunction 부분이 바로 워크시트 함수를 vba 에서 쓸수 있게 해주는 부분입니다.

즉 vba에서도 워크시트 함수를 통하여 워크시트 함수인 text 를 바로 사용할수 있게 해주는 부분이 가장 큰 부분 입니다.



위의 "aaaa" 부분이면  요일이 붙어서 출력됨 즉, "목요일" 이렇게 3단어로 나옴

위의 "aaa" 부분이면  요일 없이 출력됨 즉, "목" 이렇게 1단어로 나옴
추천 0
엑셀강좌 Total 51 건 1 Page
번호 분류 제목 날짜 조회
module 날짜를 입력받아서 실제 나이를 빼거나, 날짜를 입력받아서 요일 뽑아내기
20-03-10 4,170
20-03-10 4,170
50 module 엑셀 사용자 정의 함수 불러다 쓰는 방법
50 20-03-06 3,530
20-03-06 3,530
49 module module 엑셀 사용자 정의 함수 만들어서 생년월일을 통하여 나이 뽑기
49 20-03-06 3,555
20-03-06 3,555
48 module for 문 사용하기 1부터 100까지 넣어보기
48 20-03-05 3,440
20-03-05 3,440
47 ALL if 문 판단문 구성하기
47 20-03-05 3,335
20-03-05 3,335
46 module module 문자열 변수 넣어보기 메세지창 띄우기
46 20-03-05 3,200
20-03-05 3,200
45 module module 엑셀의 배열변수 넣어보기 로또
45 20-03-05 3,305
20-03-05 3,305
44 module 매크로의 상수값 선언하여 변수로 곱하여 넣기
44 20-03-04 3,330
20-03-04 3,330
43 module 엑셀매크로 변수의 초기값
43 20-03-04 3,290
20-03-04 3,290
42 module 엑셀 매크로 프로시저 기초 msgbox, value, numberformat, with
42 20-03-04 3,365
20-03-04 3,365
41 module 엑셀 매크로 직접 실행 부분 기초 range
41 20-03-04 3,250
20-03-04 3,250
40 ALL 엑셀 함수 정리 된 파일입니다.
40 17-05-12 31,890
17-05-12 31,890
39 ALL 취업하면 꼭 필요한 유용한 엑셀 단축키
39 15-12-18 50,555
15-12-18 50,555
38 2013 붙여넣기 할때의 옵션을 선택할수 있는 방법은 ctrl + alt + v 입니다.
38 15-01-14 54,110
15-01-14 54,110
37 2013 엑셀 셀에 작은 초록색 삼각형 오류 없애는 법 댓글 1
37 14-05-23 158,870
14-05-23 158,870
36 2013 수식을 통하여 0값을 빈값으로 표시 하는 방법
36 14-05-02 77,025
14-05-02 77,025
35 2013 엑셀 셀칸에 0값일때 조건부 서식을 통하여 0 숨기기
35 14-05-02 152,315
14-05-02 152,315
34 2013 엑셀 셀칸에 0값이나 - 가 있을때 보이지 않게 하는 방법
34 14-05-02 83,130
14-05-02 83,130
33 2013 엑셀 셀칸에 0값이 있을때 보이지 않게 하는 방법
33 14-05-02 75,545
14-05-02 75,545
32 2013 일련번호나 순번을 입력하는 방법
32 14-04-28 71,885
14-04-28 71,885
31 2013 WEEKDAY 를 조건서식 만들어보기
31 14-04-25 64,335
14-04-25 64,335
30 2013 엑셀의 셀 내용을 지우지 않고 숨기는 방법
30 14-04-25 118,700
14-04-25 118,700
29 2013 CHOOSE와 ISEVEN 및 MID 함수를 이용하여 남녀 성별을 구분 해보자
29 14-04-25 90,940
14-04-25 90,940
28 2013 생년월일 입력받고 현재 나이 (만 나이) 를 구해보자~
28 14-04-25 109,670
14-04-25 109,670
27 2013 특정 날짜의 요일을 구하는 방법 댓글 2
27 14-04-25 169,080
14-04-25 169,080
26 2013 자주 사용하는 단어를 미리 정해놓고 사용하는 치환 방법
26 14-04-25 67,575
14-04-25 67,575
25 2013 VLOOKUP 이 함수에 대해서 알아보자!
25 14-04-24 68,670
14-04-24 68,670
24 2013 각 셀의 글자를 가운데로 맞추는 손 쉬운 방법
24 14-04-21 68,500
14-04-21 68,500
23 2013 IF문을 이용한 수량과 단가 계산 하기
23 14-04-21 63,740
14-04-21 63,740
22 2013 셀 너비 조정 없이 내용에 맞추는 방법
22 14-04-21 81,965
14-04-21 81,965
게시물 검색

접속자집계

오늘
381
어제
1,390
최대
10,517
전체
3,751,988
개인정보처리방침 서비스이용약관 현재접속자 상담및제휴 Copyright © 재아넷 All rights reserved.
상단으로
모바일 버전으로 보기