1. FAQ
  2. 엑셀(Excel)
  3. AfterEffects
  4. Premiere
  5. Photoshop
  6. ETC

이 게시판은 아별닷컴 회원만 질문을 올릴 수 있습니다. 회원에게 주어지는 특권인셈이지요. 회원이 아닌 분들은 열람만 가능합니다.

vba질문하나 올리겟습니다.ㅠㅠ

VBA 조회 수 7280 추천 수 0 2013.03.27 14:53:53

대학교 모집인원 vba로 추출해보려하는데요

 

sheet1 에 번호와 국어 영어 수학 총점수  가잇고

 

sheet2에는 번호 모집인원 예비인원이 있습니다..

 

합격발표 폼이 잇는데

 

거기 들어잇는 커맨드 박스를 클릭하면 sheet1의 번호와 sheet2의 번호 같은게 잇고

 

모집인원이 1명 이면 총점수에서 가장 큰 점수가 합격여부에 합격이라고 나오고

 

예비인원이 1명이면 2번째로 큰 점수가 예비이라고 나오고

 

나머지는 불합격 이라고 나오고싶은데.. 어떻게 해야할지를 모르겟어요.ㅠ 도와주세요.ㅠㅠ

 

 


댓글 '3'

profile

[레벨:30]아별

2013.03.27 19:30:12
*.104.126.21

gg남자님..

왜 굳이 vba를 사용하시려는지 모르겠습니다.

그냥 수식으로 해도 될까요?

굳이 VBA로 하시려면.. 수식에 적용된 알고리즘을 잘 파악해서 한번 직접 구현해보세요..


조건1. 데이터가 번호순으로 정렬되어 있다는 가정하에 수식을 만들어 보았습니다.

조건2. 셀영역이름은 아래의 1개의 이름을 정의했습니다.

            번호별총점수

            =OFFSET(데이터!$E$4,MATCH(데이터!$A5,데이터!$A$4:$A$12,0)-1,0,COUNTIF(데이터!$A$4:$A$12,데이터!$A5),1)

조건3. 동점자에 대한 처리기준이 없어 동점자는 같이 합격시키거나 불합격시킵니다.


F5셀에 아래의 수식을 입력하면 됩니다.

=IF(RANK(E5,번호별총점수)<=VLOOKUP($A5,기준인원!$A:$C,2,0),"합격",IF(RANK(E5,번호별총점수)<=(VLOOKUP($A5,기준인원!$A:$C,2,0)+VLOOKUP($A5,기준인원!$A:$C,3,0)),"예비","불합격"))


자세한건 첨부파일을 다운 받아 보세요..

다운받기 : abyul.com_20130327_rank.xlsm


[ 미리보기 ]

abyul.com_0000835.jpg


첨부

[레벨:2]LH

2013.03.29 08:56:32
*.42.99.233

지방 기능경기대회 문제를 말씀하시는것같으신데 저는 그 문제 VBA로 해결했습니다.

 

27~29쪽 문제입니다.

 

아별님께서 잘 체크하셨는데요 문제를 읽어보면 다음과 같은 문제가 생깁니다.

1. 동점자 처리

2. 불합격자의 처리

3. (컴퓨터정보과 모집,예비인원)데이터의 약간의 미스?

첨부
profile

[레벨:30]아별

2013.04.01 12:31:15
*.104.126.21

지방기능경기대회 문제라면.. 미리 말을 했어야.. 쿨럭.. =_=;;

LH님 감사합니다.


문제는 확인은 안해봤지만..

제 홈페이지가..

문제풀이해주려고 만든 사이트가 아닐텐데요.. @_@;;

문서 첨부 제한 : 0Byte/ 2.00MB
파일 제한 크기 : 2.00MB (허용 확장자 : *.*)
List of Articles
번호 제목 글쓴이 날짜 조회 수sort
공지 공지 [공지] 아별닷컴의 엑셀 질문방 폐쇄합니다. 카페 질문방 이용하세요.. imagefile [레벨:30]아별 2015-04-23 61676
93 VBA 한셀안의 서식을 다르게 지정할 수 있는 방법 없을까요? file [5] [레벨:4]부루끄 2011-09-28 6500
92 VBA 병합효과 file [3] [레벨:4]고수가되고파 2012-11-22 6348
91 VBA 특정색 행 삭제 메크로 배워보고 싶습니다~ imagefile [2] [레벨:1]굿한넘 2015-01-12 6291
90 VBA 특정값이 변경될 경우 매크로실행 또는 0이 아닐경우 실행 [2] [레벨:3]jmsynn 2014-10-24 5737
89 VBA 엑셀 랜덤돌리기 질문입니다 file [2] [레벨:4]신강현 2012-12-07 5622
88 VBA 파일&폴더 ExecuteExcel4Macro로 다른 파일 열지않고 셀 데이터 가져오기 시 실패 file [레벨:1]소주보이 2014-02-28 5582
87 VBA 엑셀 내용에서 영어만 모두 제거할 수 있을까요?? [1] [레벨:1]초보배움 2015-02-20 5451
86 VBA win7 64bit / 64bit 엑셀 / 32bit DLL의 사용법이 궁금합니다. file [레벨:1]컴바치 2013-01-04 5303
85 VBA 엑셀 메모의 배경으로 삽입한 이미지 추출하기 file [레벨:2]이런젬젬 2015-01-06 5188
84 VBA 엑셀 vba 함수 질문드릴게요. [4] [레벨:4]신강현 2013-03-04 5162
83 VBA 2개의 시트를 비교하여 다른 부분을 찾아내는 프로시저 질문입니다! file [3] [레벨:6]파이스 2011-11-24 5118
82 VBA 외부 어플리케이션 실행 & 유저폼 일괄 닫기 & 리본 메뉴 사용자 추가 탭 숨기거나 보이게 하는 방법 [7] [레벨:3]엑셀대단해 2012-02-08 4989
81 VBA vba로 서식정렬 [4] [레벨:2]정용규 2015-01-03 4940
80 VBA 수식이 입력된 셀은 자동으로 색상이 들어가게 하는 방법 [5] [레벨:4]부루끄 2011-07-15 4930
79 VBA 오늘도 질문!^^있습니다. [레벨:2]정용규 2015-01-19 4751
78 VBA vba 방향키 질문입니다 [4] [레벨:4]기능인 2013-07-11 4733
77 VBA 아별님 안녕하세요 file [레벨:2]북곰 2014-07-09 4700
76 VBA [긴급] Range 범위 "A2:A10" -> 를 변수로 받게 하는 방법.. file [3] [레벨:1]마리너 2012-07-05 4690
75 VBA VBA 서적 추천좀 해주세요 [1] [레벨:1]김학래 2013-04-01 4647
74 VBA 몇가지 질문들 [8] [레벨:2]정용규 2015-01-13 4630