"회의 수", "시작 시간"및 "종료 시간"(아래 이미지 참조)을 입력 한 후 워크 시트에서 회의간에 동일한 시간 공간을 생성하는 방법을 알고 싶습니다. 사용자 양식에 정보를 입력하면 "생성"버튼은 표시된 "시작 시간"과 "종료 시간"사이의 모든 회의를 나열합니다.
예를 들어 회의가 5 개이고 시작 시간이 12:00이고 종료 시간이 17:00 인 경우입니다. 생성 버튼은 1 시간 간격으로 5 회의 회의를 모두 표시합니다. 1 회의 회의는 12pm, 1 회의 회의는 1pm 등 ...
현재 코드
현재 시작 시간과 종료 시간 사이의 시간 차이를 계산하고 각 회의에 사용할 수있는 시간을 계산하고 있습니다. 5 개의 회의를 모두 같은 간격으로 표시하는 방법을 모르겠습니다.
Private Sub generate_btn_Click()
totalHour = DateDiff("n", startTime, endTime) / 60
timePer = num_observation / totalHour
End Sub
여기서 핵심은 TimeValue
적절한 시간으로 문자열을 구문 분석하는 데 사용 하면 모든 계산이 쉬워집니다.
Sub CalculateHours(numberOfMeetings As String, startTime As String, endTime As String)
startHour = TimeValue(startTime)
endHour = TimeValue(endTime)
differenceTime = endHour - startHour
meetingDuration = differenceTime / numberOfMeetings
For i = 1 To numberOfMeetings
Cells(i, 1) = startHour + meetingDuration * (i - 1)
Next
End Sub
Sub Test()
' Here's how you call it, the parameters will come from your form
Call CalculateHours(5, "12:00", "14:00")
End Sub
출력은 다음과 같습니다.
이 기사는 인터넷에서 수집됩니다. 재 인쇄 할 때 출처를 알려주십시오.
침해가 발생한 경우 연락 주시기 바랍니다[email protected] 삭제
몇 마디 만하겠습니다