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

 
Previous Post 초를 시분초 형식으로 변환 함수; Sec to HH:MM:SS; 매스매티카 Mathemat...CMD 전체화면 전환; 도스창 명령프롬프트 풀스크린 핫키 Full Screen Hot-Ke...엑셀 년월일에 요일 추가 표현하는 법, 날짜 형식 사용자 지정; Excel yy-mm-dd...엑셀 요일 넣기 함수 수식; Excel에서 특정 날짜 요일 출력하는 방법; Week니콘 줌렌즈 종류, 니코르 줌 목록; Nikon Zoom Lens ListRSS란? RSS피드란 무엇인가요? 사이트 피드(Feed)의 뜻, 의미일본 니콘, 니콘 재팬 공식 홈페이지 주소; Nikon 이미징 사이트 Japan URL엑셀에서 루트 쓰는 법; 엑셀 제곱근 기호 문자; Excel Root루트 기호 특수문자 입력 방법, 제곱근 기호 문자; Square Root SignJava 자바, Unreachable Statement 의미, 뜻

엑셀, 초를 시분초로 나타내기; Excel VBA 함수로 Sec to HHMMSS

Tuesday, October 23, 2007

엑셀에서 타이머 등의 경과 시간을 초로 입력하고, 그 초를 시분초로 나누어 표현하는 함수를 만들었습니다. 엑셀에 이런 기능을 하는 내장함수를 찾아보았는데 없더군요. 제가 못 찾은 것일 수도 있고...

이것은 절대 시간이 아니라 그냥 단순한 정수로 된 초를 시분초로 바꾸는 것입니다. "스톱워치"와 비슷한 것입니다.

우선 아래의 엑셀VBA함수를 엑셀 비베 에디터에 입력해야 합니다. 복사하여 붙여 넣어도 됩니다.

셀에 입력된 초(Sec)를, 시 분 초로 표현 비베 함수


(엑셀에서 Alt+F11키를 눌러, 비베 에디터를 실행하고, 비베 에디터 메뉴의, "삽입 > 모듈"을 선택한 후, 다음 코드를 붙여 넣습니다.)
Function secToHHMMSS(Secs As Long) As String
  Dim H, M, S

  H = Int(Secs / 3600)
  M = Int(Secs / 60) Mod 60
  S = Int(Secs Mod 60)

  secToHHMMSS = Format(H, "00") & ":" & Format(M, "00") & ":" & Format(S, "00")

End Function


그런 후 이제 엑셀 시트의 셀에서 아무 숫자나 정수로 입력합니다.

예를 들어 A1셀에 59 라는 정수 숫자를 입력하고 다른 셀에

=secToHHMMSS(A1)

이렇게 입력하면 00:00:59 라고 출력됩니다.

A1셀에 322 라고 입력하면 아까 함수를 입력한 셀의 값이 00:05:22 이렇게 변할 것입니다. 322초가 00:05:22 즉 5분22초로 변환된 것입니다.

A1셀에 78431 이라고 입력하면 21:47:11 이렇게 21시간 47분 11초로 나타날 것입니다.


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