컴활1급 실기 액세스) 3. 조회 및 출력 20점 (보고서)

실력다지기 1회~5회

 

 

 

***보고서 작업

*** f4 속성시트

***필드를 활용할 때에는 항상 레코드원본을 뒤져서 출처 확인이 기본

 

*** 값이나 계산값은 TEXT, 그냥 글자만 :LABEL

*** 전체적인 설정은 항상 빈칸 누르고 오른쪽 ex 정렬

*** 바운드 : 컨트롤원본에 작성, 바운드할때는 는 안써줘도 되고 그 외(계산함수)에는 다 써줘야함.

*** 필드값 대괄호

*** 탭순서는 빈공간에서 오른쪽마우스

*** 콤보상자도 오른쪽마우스 후에 속성시트 행원본 점점점 지정,  바운드열은 항상 1부터 시작

*** 하위폼은 상단에 폼디자인 도구 -> [디자인] -> [아이콘 알아서 찾아봐], 뭘로 연결되었는지가 중요 알아서 예상해

*** [중복내용숨기기] -> 이전 레코드와 동일한 경우 표시X

*** 반복해서 보이게끔 ? 페이지 머리글, 바닥글

 

***소수점 1자리까지만 표시 -> 형식에서 바꾸지 않는다, 형식은 표준 그대로 냅두기

 

  

-> 형식은 표준, 소수자릿수 1

 

 

* 그 외 컨트롤원본

   =[부서명]& "(" & [부서코드] & ")"

   =format(now(),"yyyy년 mm월")

   =sum([시수])

   =count(*)   -> 빈칸도 세기위해서 [필드명]을 직접 입력하지 않고 별표를 사용한다., 바닥글에서 보통 사용.

   =format([page] , "000페이지")   -> 값이 없어도 0으로 출력되도록 #말고 0을 사용.

 

* Data 찾기함수 필,테,(조건 즉 비교값)

   - 데이터함수에서 프로시저처럼 따옴표 필드구분 안해줘도 된다.

   

  =dlookup("입사일","사원","사번=txt사번")  -> 입사일이 표시된다, 사원테이블에서 사번필드와 (앞항목)txt사번과 비교

 

 

 

 

 

 

 

 

-------------------------------------------------------------------------------------------------------------------------

현재폼에서 : me (=" " ),  다른폼에서 : docmd (는없음 " " ,ac,, " ")

필터이름 부분은 다 공백처리

필드명은 내가 찾기 (액세스 옵션 -> 필드목록 추가)

 

 

★ 조회,[filter]

 

me.filter = " 평가년도= " & txt숫자

me.filteron = true

 

me.filter = " 글자 = ' " & txt문자 & "'"

me.filteron = true

 

 

무엇이랑 비교하는지 속성시트에서 먼저 파악, hint 언바운드 앞에 평가년도가 써있다 hint

docmd.applyfilter  (필터이름 항상 생략) , 평가년도 = txt조회 "

docmd.applyfilter    ," 평가년도 like ' * " & txt조회 & " * ' "

 

   -> 는 대신 like를 써주고 비슷하게 일치하기 위해 별표 추가, 평가년도는 비교할 필드명!!!!

   -> *는 문자이기 때문에 작은따옴표 써주기

 

 

 

 

 

★ recordsource  (입력받은 필드의 상세 정보를 나타냄)

me.recordsource = " select 필 from 테 where 조 "

me.recordsource = " select * from 사원정보(니가 레코드원본에서 찾아봐) where 사번 = ' " & txt 조회& " ' "

 

 

 

 

 

 

★출력,[open]

 

*이벤트 프로시져

docmd.openform "폼이름", 인쇄미리보기 , 필터이름, "조건" 

docmd.openreport "보고서명", 여는방법 , 필터이름, "조건"

 

docmd.openreport "부서별평가현황", acviewpreciew, 필터이름 나온적없으므로 공백, "평가년도=" & txt조회

 

 

 

*매크로

조건 : month([입사일]) =12