시나공

시험에

나오는 것만

공부한다!

안녕하세요.

첨부하신 화면을 보면 코드 자체가 아니라 문자열을 감싸는 따옴표가 잘못 입력된 것으로 보입니다.

현재 화면:

me.Filter="판매일자=#" & txt조회일 & "#"

여기서 # 앞뒤의 따옴표가 정상적인 VBA 따옴표(")가 아니라 다른 문자로 입력된 경우 VBA가 문자열의 끝을 찾지 못해

컴파일 오류:

필요한 요소: 문의 끝

오류를 발생시킵니다.

아래처럼 직접 다시 입력해 보세요.

Private Sub cmd조회_Click()

Me.Filter = "판매일자=#" & txt조회일 & "#"

Me.FilterOn = True

End Sub

만약 다른 문제에서도 동일한 오류가 계속 발생한다면 가장 흔한 원인은 다음 3가지입니다.

영문 따옴표(") 대신 한글 따옴표(“ ”) 사용

복사·붙여넣기 과정에서 특수문자 포함

이전 프로시저 또는 모듈에 컴파일 오류 존재

특히 3번의 경우 현재 줄이 빨갛게 표시되더라도 실제 원인은 다른 프로시저에 있을 수 있습니다.

확인 방법:

VBA 편집기에서 [디버그] → [VBAProject 컴파일]

오류가 나는 위치를 확인

모듈 전체에서 빨간색으로 표시된 부분이 있는지 확인

컴활 실기에서 같은 "문의 끝" 오류가 여러 문제에서 반복된다면 코드 자체보다 따옴표 문자 또는 다른 프로시저의 오류일 가능성이 매우 높습니다.

즐거운 하루 되세요.