컴퓨터 엑셀 워드 포토숍 구글어스 WINDOWS JAVASCRIPT JAVA C++

 
Previous Post Excel/엑셀 VBA] 12시간제 시간 표현(AM-PM) 오전 오후 출력; 12-hour...울트라에디트] 특정 단어 개수 세기, 파일 속 단어 수 구하기/계산 방법; UltraEdi...로마 숫자 폰트, 로마자 숫자 전각 문자; Roman Numeral Full-Width C...Excel/엑셀 VBA] 현재 날짜/시간 타임 스탬프 찍기; Time Stamp 24 / ...Favicon (파비콘;사이트 아이콘) 넣는 법, Site Icon HTML Tag(태그)...Excel/엑셀 VBA] 이번 주는, 올해 몇 번째 주? 구하기/출력; get WEEK O...Excel/엑셀 VBA] 날짜/시간 (년월일 시분초) 구하기; Date Time Leadi...배치 파일 안에서, EXE 파일 실행 법; Batch File에서 실행파일 호출HTML 태그] 다운로드 링크 만드는 법, 파일에 링크하는 방법; File Download...Excel/엑셀 VBA] 2진수 10진수 변환 함수; 이진수 십진수; Dec To Bin ...

Excel/엑셀 VBA] 1, 2, 3, 4분기 구하기 (사분기); Quarter of the Year

Sunday, January 28, 2007

1년을, 3개월씩, 4부분으로 나눈 것이 "분기(사분기;Quarter)"입니다.

영문 약자로는
Q1 = 1분기 ( 1,  2,  3월달) = 일사분기
Q2 = 2분기 ( 4,  5,  6월달) = 이사분기
Q3 = 3분기 ( 7,  8,  9월달) = 삼사분기
Q4 = 4분기 (10, 11, 12월달) = 사사분기

로 표현합니다.

(엑셀 비베가 아닌, 엑셀 내장 함수들을 이용하여 분기를 구하는 법은 여기에 있습니다: ▶▶ Excel 엑셀] 이번 달은 몇 분기, 몇 사분기 구하기 함수/수식; Quarter of the Year)


이번 달이, 몇 분기(몇 사분기)인지 구하기 예제


(엑셀에서 Alt+F11키를 눌러, 비베 에디터를 실행하고, 비베 에디터 메뉴의, "삽입 > 모듈"을 선택한 후, 다음 코드를 붙여 넣습니다.)
비베 에디터에서 F5 키를 누르거나, 엑셀에서 Alt+F8 키를 누르면 VBA 매크로가 실행됩니다.
Sub Get_Quarter_Year_Example()

  Dim s


  s = Format(Date, "q")
  MsgBox s & "분기"




' 이번 달이 1월달일 경우
' 출력 결과: 1분기

' 이번 달이 2월달일 경우
' 출력 결과: 1분기

' 이번 달이 3월달일 경우
' 출력 결과: 1분기




' 이번 달이 4월달일 경우
' 출력 결과: 2분기

' 이번 달이 5월달일 경우
' 출력 결과: 2분기

' 이번 달이 6월달일 경우
' 출력 결과: 2분기




' 이번 달이 7월달일 경우
' 출력 결과: 3분기

' 이번 달이 8월달일 경우
' 출력 결과: 3분기

' 이번 달이 9월달일 경우
' 출력 결과: 3분기




' 이번 달이 10월달일 경우
' 출력 결과: 4분기

' 이번 달이 11월달일 경우
' 출력 결과: 4분기

' 이번 달이 12월달일 경우
' 출력 결과: 4분기


End Sub



▶▶ Excel/엑셀 VBA] 날짜/시간 (년월일 시분초) 구하기; Date Time Leading Zero

0 Comments:

Post a Comment

<< Home RSS 2.0 feed

구글 Google 에서 제공하는 무료 블로그 서비스인 블로거 Blogger 의 인터넷 주소는 www.blogger.com 입니다. Blogger 에 블로그를 만들면, blogspot.com 이라는 주소에 블로그가 생성됩니다.
블로그를 직접 방문하지 않고도 최신 게시물을 구독하려면 RSS 2.0 feed 주소를 리더기에 등록하시면 됩니다.
Categories
Previous Posts
Monthly Archives
Top