TimeSerial Function

숫자 κ°’μœΌλ‘œ μ „λ‹¬λ˜λŠ” μ§€μ •ν•œ μ‹œκ°„, λΆ„ 및 초 맀개 λ³€μˆ˜μ— λŒ€ν•΄ 연속 μ‹œκ°„ 값을 κ³„μ‚°ν•©λ‹ˆλ‹€. 이 값을 μ‚¬μš©ν•˜μ—¬ μ‹œκ°„ μ°¨λ₯Ό 계산할 수 μžˆμŠ΅λ‹ˆλ‹€.

ꡬ문:

TimeSerial (hour, minute, second)

λ°˜ν™˜ κ°’:

λ‚ μ§œ

맀개 λ³€μˆ˜:

hour: 연속 μ‹œκ°„ 값을 ν™•μΈν•˜λŠ” 데 μ‚¬μš©λ˜λŠ” μ‹œκ°„μ„ λ‚˜νƒ€λ‚΄λŠ” μž„μ˜μ˜ μ •μˆ˜ μ‹μž…λ‹ˆλ‹€. μœ νš¨ν•œ κ°’: 0-23.

minute: 연속 μ‹œκ°„ 값을 ν™•μΈν•˜λŠ” 데 μ‚¬μš©λ˜λŠ” 뢄을 λ‚˜νƒ€λ‚΄λŠ” μž„μ˜μ˜ μ •μˆ˜ μ‹μž…λ‹ˆλ‹€. 일반적으둜 0μ—μ„œ 59 μ‚¬μ΄μ˜ 값을 μ‚¬μš©ν•˜μ§€λ§Œ λΆ„ μˆ˜κ°€ μ‹œκ°„ 값에 영ν–₯을 μ£ΌλŠ” 경우 이 λ²”μœ„λ₯Ό λ²—μ–΄λ‚˜λŠ” 값을 μ‚¬μš©ν•  수 μžˆμŠ΅λ‹ˆλ‹€.

second: 연속 μ‹œκ°„ 값을 ν™•μΈν•˜λŠ” 데 μ‚¬μš©λ˜λŠ” 초λ₯Ό λ‚˜νƒ€λ‚΄λŠ” μž„μ˜μ˜ μ •μˆ˜ μ‹μž…λ‹ˆλ‹€. 일반적으둜 0μ—μ„œ 59 μ‚¬μ΄μ˜ 값을 μ‚¬μš©ν•˜μ§€λ§Œ 초 μˆ˜κ°€ λΆ„ 값에 영ν–₯을 μ£ΌλŠ” 경우 이 λ²”μœ„λ₯Ό λ²—μ–΄λ‚˜λŠ” 값을 μ‚¬μš©ν•  수 μžˆμŠ΅λ‹ˆλ‹€.

예:

12, -5, 45λŠ” 11, 55, 45에 ν•΄λ‹Ήν•©λ‹ˆλ‹€.

12, 61, 45λŠ” 13, 2, 45에 ν•΄λ‹Ήν•©λ‹ˆλ‹€.

12, 20, -2λŠ” 12, 19, 58에 ν•΄λ‹Ήν•©λ‹ˆλ‹€.

12, 20, 63은 12, 21, 4에 ν•΄λ‹Ήν•©λ‹ˆλ‹€.

TimeSerial ν•¨μˆ˜λ₯Ό μ‚¬μš©ν•˜μ—¬ μž„μ˜μ˜ μ‹œκ°„μ„ μ‹œκ°„ μ°¨λ₯Ό κ³„μ‚°ν•˜λŠ” 데 μ‚¬μš©ν•  수 μžˆλŠ” 단일 κ°’μœΌλ‘œ λ³€ν™˜ν•  수 μžˆμŠ΅λ‹ˆλ‹€.

TimeSerial ν•¨μˆ˜λŠ” VarType 7의 Variant ν˜•μ‹(Date)을 κ΅¬ν•©λ‹ˆλ‹€. 이 값은 λ‚΄λΆ€μ μœΌλ‘œ 0μ—μ„œ 0.9999999999 μ‚¬μ΄μ˜ 배정밀도 숫자둜 μ €μž₯λ©λ‹ˆλ‹€. κ³ μ • λ‚ μ§œλ₯Ό κΈ°μ€€μœΌλ‘œ 연속 λ‚ μ§œ 값이 λ‚ μ§œλ‘œ κ³„μ‚°λ˜λŠ” DateSerial λ˜λŠ” DateValue ν•¨μˆ˜μ™€ 달리 TimeSerial ν•¨μˆ˜λ₯Ό μ‚¬μš©ν•˜μ—¬ κ΅¬ν•œ 값은 κ³„μ‚°ν•˜λŠ” λ°μ—λŠ” μ‚¬μš©ν•  수 μžˆμ§€λ§Œ 이 값을 평가할 μˆ˜λŠ” μ—†μŠ΅λ‹ˆλ‹€.

TimeValue ν•¨μˆ˜μ—λŠ” λ¬Έμžμ—΄μ„ μ‹œκ°„μ„ ν¬ν•¨ν•˜λŠ” 맀개 λ³€μˆ˜λ‘œ 전달할 수 μžˆμŠ΅λ‹ˆλ‹€. κ·ΈλŸ¬λ‚˜ TimeSerial ν•¨μˆ˜μ˜ κ²½μš°μ—λŠ” μ‹œκ°„, λΆ„, 초 λ“±μ˜ κ°œλ³„ 맀개 λ³€μˆ˜λ₯Ό λ³„λ„μ˜ 숫자 μ‹μœΌλ‘œ 전달할 수 μžˆμŠ΅λ‹ˆλ‹€.

Error codes:

5 잘λͺ»λœ ν”„λ‘œμ‹œμ € ν˜ΈμΆœμž…λ‹ˆλ‹€.

예:

Sub ExampleTimeSerial

Dim dDate As Double, sDate As String

    dDate = TimeSerial(8,30,15)

    sDate = TimeSerial(8,30,15)

    MsgBox dDate,64,"Time as a number"

    MsgBox sDate,64,"Formatted time"

End Sub