코드를 제대로 입력한 거 같은데 모든 셀에 1사분면 밖에 입력이 되지 않아서요.
코드랑 결과값 첨부했습니다.
그림에 보시면 Select Case fn비고 라고 입력된 부분이 있는데요.
이부분을 아래 코드와 같이 Select Case 입항일자 로 수정하셔야 합니다.
Public Function fn비고(입항일자 As Date)
Select Case 입항일자
Case Is < #4/1/2011#
fn비고 = "1사분기"
Case Is < #7/1/2011#
fn비고 = "2사분기"
Case Is < #10/1/2011#
fn비고 = "3사분기"
Case Else
fn비고 = "4사분기"
End Select
End Function
-
관리자2020-06-11 11:35:42
그림에 보시면 Select Case fn비고 라고 입력된 부분이 있는데요.
이부분을 아래 코드와 같이 Select Case 입항일자 로 수정하셔야 합니다.
Public Function fn비고(입항일자 As Date)
Select Case 입항일자
Case Is < #4/1/2011#
fn비고 = "1사분기"
Case Is < #7/1/2011#
fn비고 = "2사분기"
Case Is < #10/1/2011#
fn비고 = "3사분기"
Case Else
fn비고 = "4사분기"
End Select
End Function
좋은 하루 되세요.