OfficeTutor 365

액세스에 대한 질문과 답변을 올려주세요. 단, 취지에 맞지 않는 글은 운영자가 삭제합니다.

"000 님, 도와주세요", "부탁 드립니다.", "급합니다!" 등과 같이 막연한 제목을 달지 말아주세요.

[필독] 빠르고 정확한 답변을 얻는 16가지 Tip !

[필독] 저작권법 개정에 따른 이용안내

작성자:    파워돼지 (tskim) 추천:  0 파일:     조회:  2630 제목:   고유번호 연결해서 사용하려합니다
* 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.  - 액세스 버전(95,97,2000,xp,2003,2007): * 아래줄에 질문을 작성하세요 >>  액세스 시작하는데 잘 몰라서 질문드립니다. 대분류테이블에 대분류번호. 대분류명 중분류테이블에 대분류번호. 중분류번호. 중분류명 이있으면  대분류번호가 AA BB CC 가있으면 중분류에서 대분류번호를 선택했을시 중분류번호에서 AA_01,AA_02 BB_01,BB_02 처럼 대분류번호가 자동으로 생성하게 만들고 싶습니다.  　 [불량 게시물 신고]
황동준 파일을 올리시지 않으시면 어떤 구조와 의도인지 알지 못합니다. 중분류입력폼에서 필드{대분류번호,중분류번호,중분류명} 일경우 먼저 대분류번호를 콤보상자등으로 선택한후 중분류번호로 포커스가 왔을때 해당 대분류번호로 시작하는 중분류번호가 없을때 01을 지정하며, 아니면 해당 대분류번호가 포함되는 중분류번호의 최대값을 구한후 더하기 1을 합니다. 03-16 (09:35) ⓧ삭제 ■신고 황동준 Private Sub 중분류번호_GotFocus()     If Not IsNull(대분류번호) Then         Dim strNo         strNo = DMax("중분류번호", "t_중분류", "left(중분류번호,2)='" & Me.대분류번호 & "'")         If IsNull(strNo) Then             Me.중분류번호 = Me.대분류번호 & "_01"         Else             Me.중분류번호 = Me.대분류번호 & "_" & Format(Right(strNo, 2) + 1, "00")         End If     End If End Sub 03-16 (09:36) ⓧ삭제 ■신고
작성일 : 2017-03-14(23:54) 최종수정일 : 2017-03-14(23:54)