doCmd.openreport where 절 프롬프트

2010-07-15 6 views 1 likes

보고서를 열어 간단한 코드를 작성했습니다.doCmd.openreport where 절 프롬프트

Private Sub FormButton_Enter() 
    Dim strwhere As String 
    strwhere = Me.FormText 
    DoCmd.Openreport "rtpname",acViewPreview,,"ColumnName=" & strwhere 
    End Sub

양식에서 필터 기준을 통과하더라도 두 개의 팝업이 나타납니다. 제발 조언.

출처

2010-07-15 misguided

답변

하나의 잠재적 인 원인은 ColumnName이 숫자가 아니며 따옴표로 묶어 두지 않은 것입니다. 이 문제가 해결되면 :

DoCmd.Openreport "rtpname",acViewPreview,,"ColumnName='" & strwhere & "'"

출처

2010-07-15 03:16:41 BenV

매력처럼 작동합니다. 고맙습니다. – misguided

@misguided : 다행이었습니다. 왼쪽에있는 체크 표시를 눌러이 대답을 수락하십시오. – BenV

나는이 대답이 왜 효과가 있는지 알 수 없다. 텍스트 필드에 따옴표를 두어 매개 변수 프롬프트가 나타나서는 안되며 데이터 유형이 일치하지 않아야합니다. –

doCmd.openreport where 절 프롬프트

답변

관련 문제